Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Как работать с бестиповой переменной?, func(VAR BUF;...)   Найти похожие ветки 

 
Alex___   (2010-02-25 17:29) [0]

Функция Send, Recv имеет следующий вид:

function send(s: TSocket; var Buf; len, flags: Integer): Integer;

Что из себя представляет переменная Buf? Как с ней работать? Например: как ее перевести в строку?


 
Игорь Шевченко ©   (2010-02-25 17:45) [1]

string(Buf)


 
Alex___   (2010-02-25 17:47) [2]

Вызывает ошибку


 
Игорь Шевченко ©   (2010-02-25 17:47) [3]


> Вызывает ошибку


Это очень плохо.


 
12 ©   (2010-02-25 17:50) [4]

указатель
как угодно
взять len символов начиная с buf


 
Ega23 ©   (2010-02-25 17:54) [5]

var
 s : string;
begin
 SetLength(s, len);
 Move(@Buf, s, len);
end;


 
Ega23 ©   (2010-02-25 17:57) [6]

Точнее, как-то так

var
s : string;
p : PAnsiChar;
begin
SetLength(s, len);
p := @Buf;
Move(p^, PAnsiChar(s)^, len);
end;


 
Alex___   (2010-02-25 18:43) [7]

При попытке вывести S - ошибка ввода-вывода


 
Alex___   (2010-02-25 18:48) [8]

Все, проблема решена! Спасибо)



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 3.136 c
15-1265624198
Сергей М.
2010-02-08 13:16
2010.08.27
TMozillaBrowser и программный доступ к параметрам конфигурации


15-1263768328
Германн
2010-01-18 01:45
2010.08.27
Темы Windows XP


15-1275679642
REX
2010-06-04 23:27
2010.08.27
Комментарии


15-1271094399
Юрий Зотов
2010-04-12 21:46
2010.08.27
Что будет, если...


2-1271231298
Анна
2010-04-14 11:48
2010.08.27
sp_help доступ к данным второго recordset