Кружок нубов(Вопрос-Ответ)

[Gromzzz]

У меня такой вопрос: Как целое число переменной i:integer, преобразовать Dword ?
Например как мне преобразовать 1 в 01 00 00 00 ?

Dword:='???';
Я так понимаю должно быть что то вроде этого:
Dword:='IntToDword(1)'

//J-Fobos: вот пример:

buf:='';
WriteD(integer);

В результате у вас в переменной buf будет 4 преобразованных байта.


Cпасибо! Все получилось! =)

Добавлено через 22 часа 22 минуты
Procedure Delay(msec: Cardinal)
Делает задержку в скрипте. передаваемый параметр - милисекунды.
Стоит учесть что на время задержки для текущего соединения полностью блокируеться передача данных между клиентом и сервером.
Вопрос: Можно ли как то заменить Delay в моем случае, чтобы не блокировалась передача данных?

 
if FromClient and (pck=HStr('1B 06 00 00 00')) then for i:=1 to 10 do begin 
  if FromClient and (pck=HStr('1B 05 00 00 00')) then break;  //Соц Нет
--------
--------
delay(1000);
pck:='';
End;