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

Вниз

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

 
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]

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


 
LexXL ©   (2006-11-08 10:35) [10]

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


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

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

Ты писал?


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

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


 
Ketmar ©   (2006-11-08 11:07) [13]

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



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

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

Наверх




Память: 0.49 MB
Время: 0.04 c
4-1152770235
тт
2006-07-13 09:57
2006.11.26
Как узнать серийный номер HDD в Win2000, не имея прав админа?


15-1162754774
Ice
2006-11-05 22:26
2006.11.26
Кто смотрел Хоттабыча?


2-1163018531
Lamerok_iz_NN
2006-11-08 23:42
2006.11.26
Не компилируется


15-1162981114
umbra
2006-11-08 13:18
2006.11.26
загадочный С


2-1162984640
daser
2006-11-08 14:17
2006.11.26
Как очистить СтрингГрид?