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

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

← →
TurburatoR   (2003-10-20 12:02) [0]

Как полностью очистить переменную типа String[x].

Например, после VarStr:="" в ней всеравно остаются прошлые значения (проявляется при записи в файл), а только длина устанавливается в 0.

Заранее спасибо.


← →
Zergling ©   (2003-10-20 12:05) [1]

наверно с кодом у тебя чегото нето, приведи код.


← →
Skier ©   (2003-10-20 12:06) [2]


> проявляется при записи в файл

Неправильно пишешь ! Всего и делов-то !


← →
Song ©   (2003-10-20 12:06) [3]

Обратись к IronHawk"у :)


← →
Rouse_ ©   (2003-10-20 12:17) [4]

FillChar
Желаю успехов


← →
Anatoly Podgoretsky ©   (2003-10-20 12:19) [5]

S:="abc";
s:="";
WriteLn(S);
Readln;


← →
TurburatoR   (2003-10-20 12:23) [6]

Код:


type
TRec = record
Prefix : String[40];
DN: String[80]
end;
var
RT : TRec;
RF : File of TRec;

begin
RT.Prefix:="123abc";
RT.DN:="asd12";
Write(RF,RT); //в файл запишется (6)123abc (5)asd12
(в скобках указал длину строки)
RT.Prefix:="123";
RT.DN:="asd";
Write(RF,RT); //в файл запишется (3)123abc (3)asd12

RT.Prefix:="";
RT.DN:="";
Write(RF,RT); //в файл запишется (0)123abc (0)asd12

end.


т.е. работает все правильно, но ненадо чтоб неиспользуемый хвост дописывался.


← →
Игорь Шевченко ©   (2003-10-20 12:26) [7]

by design


← →
TurburatoR   (2003-10-20 12:27) [8]

2 Rouse_

Спасибо за идею.


← →
jack128 ©   (2003-10-20 12:40) [9]

В типизированном файле "хвосты" будут всегда!
В случае с Rouse_ они будут состоять из символов #0.
Советую еще раз почитать что такое типизированные файлы..


← →
Anatoly Podgoretsky ©   (2003-10-20 12:43) [10]

Нельщя, у тебя типизированный файл, все записи фиксированной длины и пишется как бы не строка, а память фиксированого размера. А что в этой памяти без разницы. Но в в ней всегда что то есть, это никак не мешает работе.


← →
icWasya ©   (2003-10-20 14:02) [11]

делай так
FillChar(RT.Prefix,SizeOf(RT.Prefix),0);



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

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



Память: 0.47 MB
Время: 0.014 c
14-98878
Igorek
2003-10-10 12:39
2003.10.30
Есть идея - универсальный парсер


1-98703
able
2003-10-21 06:12
2003.10.30
Плззз!!! Хелп!!!


6-98757
TButton
2003-09-03 17:55
2003.10.30
ЛАН


1-98583
ИМГусак
2003-10-20 09:40
2003.10.30
Параметры запуска MicrosoftOutlook


11-98534
Фдучфтвук
2003-02-09 14:27
2003.10.30
[Delphi6] чтение секторов с дискеты




   Наверх