Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Подскажите - почему я данные не получаю? (TClientSocket) [D6, Win2k]

Andrey1234 © (2004-02-06 20:04:00)
Подскажите - Где ошибка? Что я неправильно делаю?

Type
pTBlock=^TBlock;
TBlock=array[0..10000] of byte;

Var
Data:pTBlock;

Посылаю:

xSize:=length(xStr);
getmem(data,xSize);
System.Move(xStr[1],data^[0],xSize);
ClientSocket1.Socket.SendBuf(data,xSize);

Принимаю:

Procedure TForm1.ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
begin
xSize:=Socket.ReceiveLength;
GetMem(data,xSize);
Socket.ReceiveBuf(data^[0], xSize);
end;

ReceiveLength возвращает кол-во посылаемых байт, а в Data мусор

Digitman (2004-02-07 12:53:00) [1]

> Verg © (07.02.04 12:26) [11]

ну и ты, Андрей, тоже хорош)
взял спровоцировал "меньшинства" на публичную акцию волеизъявления))

надеюсь, ты понял меня)

Verg (2004-02-07 12:26:00) [2]
Ух, как ты меня "уел" :)))
Ай молодца!

Да уж, точно говорят "Не мечите бисер перед свиньями..."

Иди, "люби людей", сексменьшинство ты наш...

Digitman (2004-02-07 12:16:00) [3]

> Andrey1234 (06.02.04 22:35) [7]

> а ты читай, что тебе пишут лучше

нет вы посмотрите на него, а ? каков умник нашелся !?

а ты хам, братец, однако !

тебе мгновенно указали на твою ошибку, ты же еще в идиотские амбиции бросаешься ...

> не, мне надо блок байт, строку я и сам могу

AnsiString-строка, по твоему, не является блоком байт ?
марш учить матчасть !!

Andrey1234 (2004-02-07 02:33:00) [4]
был бы ты рядом 1,2,3, я бы тебя трахнул, чтоб не обзивался, противная
коза,
ох, подоил бы

p.s.
людей надо любить :) а таких как ты - в жопу, да поглубже поглубже.

Verg (2004-02-06 22:48:00) [5]

> Andrey1234 (06.02.04 22:35) [7]
> спасибо,
> больше тупить не буду, дошло где ошибался(1), а ты читай, что
> тебе пишут лучше(2)

1) Жираф?
2) Иди лесом, мудень.

Andrey1234 (2004-02-06 22:35:00) [6]
спасибо,
больше тупить не буду, дошло где ошибался, а ты читай, что тебе пишут лучше

Verg (2004-02-06 22:16:00) [7]

> Andrey1234 (06.02.04 22:10) [5]
> так ClientSocket1.Socket.SendBuf(data,xSize);

ClientSocket1.Socket.SendBuf(data ^[0], xSize);

Долго еще тупить будем?

Andrey1234 (2004-02-06 22:10:00) [8]
так ClientSocket1.Socket.SendBuf(data,xSize);

тоже не пашет - обсолютно такая же ситуация как и у
arhis, которого Вы послали дружно

Verg (2004-02-06 22:02:00) [9]

> > не, мне надо блок байт, строку я и сам могу

Не, ну это, конечно шедевр....

Я фиг-гею...

Verg (2004-02-06 22:00:00) [10]

> Andrey1234 (06.02.04 21:43) [2]
> не, мне надо блок байт, строку я и сам могу
>
> а вот в чем здесь проблема не пойму никак.

Я че-то не понял :(
Ты спросил где ошибка, я тебе ответил:

> Verg © (06.02.04 20:29) [1]
>
> > ClientSocket1.Socket.SendBuf(data ^[0],xSize);

Че, не понятно?

Andrey1234 (2004-02-06 21:43:00) [11]
не, мне надо блок байт, строку я и сам могу

а вот в чем здесь проблема не пойму никак.
Может у кого примерчик есть с использованием SendBuf и ReceiveBuf
был бы очень признателен.

Verg (2004-02-06 20:29:00) [12]

> ClientSocket1.Socket.SendBuf(data ^[0],xSize);

А вообще зачаем эти бессмысленные манипуляции с блоками памяти.
НАсколько я понял xStr - строка, т.е. в сущности тоже блок данных

> ClientSocket1.Socket.SendBuf(xStr[1], length(xStr));

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »