VPF::Аналог PHP функции pack на Delphi - Форум программистов

ShamanDeath

Дата 2.1.2009, 20:47 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 11
Регистрация: 5.4.2008

Репутация: нет
Всего: нет

Есть код на PHP

Код


$fs=@fsockopen($ip,$port) or die('Sock ERROR');
$pck=pack("vCi",6,0,-3);
fwrite($fs,$pck);
$r=fread($fs,73);
fclose($fs);
$a=unpack("vsize/Cid/iworld/imax/icurrent/iplaying/istore",$r);

Надо сделать это же но на делфи...подскажите как, были уже мысли и подключать библиотеку php к программе, но может будут другие решения?
Спасибо

lukas

Дата 2.1.2009, 22:30 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 771
Регистрация: 23.2.2007

Репутация: 3
Всего: 15

ShamanDeath, для этих средств можно использовать ZLib библиотеку, тобиш для сжатия информации.

--------------------

http://code.google.com/p/orionphp/ - opensource скриптовой язык Orion (аналог PHP) для freepascal/delphi.

ShamanDeath

Дата 2.1.2009, 23:12 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 11
Регистрация: 5.4.2008

Репутация: нет
Всего: нет

Мне нужно отправить информацию на сокет. Но нужно сформировать её подобно той функции перед этим. Там как я понял бинарная упаковка, а ZLib сделает это?

Это сообщение отредактировал(а) ShamanDeath - 2.1.2009, 23:12

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »