Вниз
Скачать: CL | DM;

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

 
ыавпып   (2007-05-14 15:27) [0]

здраствуйте!! вы не подскажете почему такое происходит и как это исправить:
var
 f: file;
 buf: array if byte;
 str_file: string;
 d: integer;
begin
...........
d:=Length(str_file);
 SetLength(buf,d+5);
 buf[0]:=1;
 
 Move(d,buf[1],4);
 Move(str_file,buf[5],d);
 BlockWrite(F,buf[0],d+5);
....

и вместо строки он пишет в файл какие-то каракули... вы не подскажете как туда строку записать?


 
palva ©   (2007-05-14 15:37) [1]

> вы не подскажете как туда строку записать?
Вообще открывают текстовый файл на запись и используют функцию Write


 
ыавпып   (2007-05-14 15:39) [2]

меня это не устраивает...
у меня туда потом записывается массив данных...
и мне нужен не текстовый файл, а именно нетипизированный...


 
umbra ©   (2007-05-14 15:52) [3]

Move(str_file[1],buf[5],d);


 
Desdechado ©   (2007-05-14 15:53) [4]

> и вместо строки он пишет в файл какие-то каракули..
> у меня туда потом записывается массив данных
Как-то не стыкуется. Если у тебя нетипизированный, то зачем ты его пытаешься анализировать как текстовый (каракули)?

Или ты кодироку не ту пишешь?


 
Reindeer Moss Eater ©   (2007-05-14 15:53) [5]

и мне нужен не текстовый файл, а именно нетипизированный...

<Цитата>

Тогда изучай типы параметров используемых функция, физическую организацию динамических массивов и отличия адреса от указаталя.


 
palva ©   (2007-05-14 16:00) [6]

См. [3] - не в ту сторону копируешь.


 
ыавпып   (2007-05-14 16:40) [7]

спасибо, разобрался... =)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c
2-1178996245
likenoother
2007-05-12 22:57
2007.06.03
из Timage в Tpaintbox


2-1179122080
RomanLN
2007-05-14 09:54
2007.06.03
как объеденить ячейки в StringGrid???


2-1179127096
Gentos
2007-05-14 11:18
2007.06.03
ord( : ) , ord( ; )


2-1179297317
Darvin
2007-05-16 10:35
2007.06.03
Вызов метода процедурного типа


3-1172300426
impuls
2007-02-24 10:00
2007.06.03
как подружить Mysql v 5.0.24 и Delphi7




   Наверх