18.08.2009, 18:34
|
|
Познающий
Регистрация: 13.06.2009
Сообщений: 32
С нами:
8901549
Репутация:
2
|
|
Сообщение от flacs
Потому что вы никуя не умеете программить, а лишь компилите готовые куски кода, и ни в состоянии исправить элементарные ошибки.....
Код:
var
f: file of char;
c: char;
data: string;
begin
AssignFile(f,'путь');
Reset(f);
while not eof (f) do begin
Read(f,c);
case c of
'0'..'9','A'..'Z', 'a'..'z', #32, #9, ':': data:=data+c;
end;
end;
CloseFile(f);
Memo1.text:=data;
end;
)))))) я не про то что ошибка в коде была) я про то что он в мемо загрузит одну строчку и всё)) хотя сам файл кук мег весит))
Мне просто надо куки приводить в читабельный вид чтобы потом пост запросом отправить на сервер)
|
|
|