Главная страница
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.022 c
14-16623
Daemys
2004-01-14 12:38
2004.02.06
Гуманизм и милосердие


1-16503
Легионер
2004-01-28 17:13
2004.02.06
Скорость :(


4-16788
Dimmu
2003-12-01 14:28
2004.02.06
Создание сервиса используя TService


3-16034
ДЕД
2004-01-13 13:10
2004.02.06
Память при вычислениях


7-16750
Вованчик
2003-11-20 09:35
2004.02.06
Фискальный регистратор