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

Вниз

TFileStream   Найти похожие ветки 

 
denkop ©   (2004-01-20 23:42) [0]

Пишу в поток строчку:

var
FileStream:TFileStream;
S:string;
begin
FileStream:=TFileStream.Create("c:\1.ttt",fmCreate);
S:="123456";
FileStream.Write(S,SizeOf(string));
FileStream.Free;
end;


а прочитать нужно только текстом, т.е.

var
f:textfile;
S:string;
begin
AssignFile(f,"c:\1.ttt");
Reset(f);
ReadLn(f,s);
ShowMessage(S);
CloseFile(f);
end;


Как и следовало ожидать в S нечитаемые двоичные данные. Как эти данные преобразовать в читаемую строку?


 
хз ©   (2004-01-20 23:55) [1]

ИМХО, длину строки надо указать. То есть:

S:String[255];


 
хз ©   (2004-01-20 23:55) [2]

ИМХО, длину строки надо указать. То есть:

S:String[255];


 
MBo ©   (2004-01-21 06:49) [3]

FileStream.Write(S[1],Length(S));
Если будет читаться ReadLn-ом, и строк больше одной, нужно после каждой еще писать #13#10, а вообще то в таком случае и писать лучше средствами, предназначенными именно для текстовых файлов (writeln или TStringList)


 
denkop ©   (2004-01-25 14:09) [4]

Спасибо разобрался



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

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

Наверх




Память: 0.47 MB
Время: 0.047 c
14-16613
Eagle Owl
2004-01-13 22:43
2004.02.06
Дизассемблеры...


6-16559
umx
2003-12-01 23:49
2004.02.06
Tthread


1-16272
MakNik
2004-01-26 11:09
2004.02.06
ASCII коды кнопок управления курсором


3-16105
YuRock
2004-01-08 19:29
2004.02.06
Настройка BDE


7-16749
baataars
2003-11-14 19:32
2004.02.06
Как определить сколько времени запущена программа