записать переменную в файл

← →
LexXL © (2006-11-08 09:51) [0]

нужно записать переменную в файл (пользуя TFileStream) примеры не работают:
procedure TForm1.Button1Click(Sender: TObject); var stream:TFileStream; ans:ansistring; sFilename:string; begin sFilename:="c:\1.txt"; ans:="123456789"; Stream.Create(sFilename, fmOpenReadWrite or fmCreate); try Stream.Write(ans, length(ans)); //Stream.Write(ans, sizeof(ans)); - и так пробовал //Stream.Write(Pchar(ans)^, sizeof(ans)); - и так пробовал //Stream.Write(Pchar(ans)^, length(ans)); - и так пробовал finally stream.free; end; end;

← →
MBo © (2006-11-08 09:58) [1]

//Stream.Write(Pchar(ans)^, length(ans)); - и так пробовал
значит, плохо пробовал, в этом варианте содержимое строки запишется в файл.

← →
LexXL © (2006-11-08 10:17) [2]

не не раб хоть убей не раб, пробал даже перегружаться
Access violation at address .... in module ..... Write of address 00000002

← →
Percent (2006-11-08 10:20) [3]

Stream := TFileStream.Create(sFilename, fmOpenReadWrite or fmCreate);

← →
Сергей М. © (2006-11-08 10:20) [4]

> LexXL © (08.11.06 10:17) [2]

> Stream.Create(sFilename, fmOpenReadWrite or fmCreate);

Это что за галиматья ?
Ты сам-то понимаешь, что ты в этой строчке пытаешься сотворить ?

← →
ЮЮ © (2006-11-08 10:21) [5]

записалосьбы, если бы вместо
Stream.Create(sFilename, fmOpenReadWrite or fmCreate);
было
stream := TFileStream.Create(sFilename, fmOpenReadWrite or fmCreate);

З.Ы. Однако считывать строку, не зная её длины, будет затруднительно. Конечно, если там будет храниться ещё что-то, кроме одной строки

← →
Percent (2006-11-08 10:22) [6]

Вот они, последствия "не умничайте тут, дайте код!"...

← →
LexXL © (2006-11-08 10:32) [7]

Percent - я не просил кода, если ты заметил я прежде чем кинул вопрос "потренировался" и сдался не сразу...
всем ответившим спасибо, согласен что получилось глупо но я запарился, начал рыть в другом направлении..

← →
Anatoly Podgoretsky © (2006-11-08 10:34) [8]

> LexXL (08.11.2006 10:17:02) [2]

А объекты Пушкин будет создавать.

← →
Anatoly Podgoretsky © (2006-11-08 10:34) [9]

> LexXL (08.11.2006 10:17:02) [2]

> LexXL (08.11.2006 10:17:02) [2]

А объекты Пушкин будет создавать.

я и написал что - глупо получилось

← →
Percent (2006-11-08 10:36) [11]

примеры не работают

Ты писал?

← →
Percent (2006-11-08 10:37) [12]

Ладно... проехали.

>[7] LexXL(c) 8-Nov-2006, 10:32
>Percent - я не просил кода, если ты заметил я прежде чем
>кинул вопрос "потренировался" и сдался не сразу...
оно и видно, что упорный. вместо один раз почитать справку идешь вслед за доблестными китайскими комсомольцами.

записать переменную в файл Найти похожие ветки