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

Вниз

Как быстро сохранить инф. из s:string {H+} в file.txt   Найти похожие ветки 

 
mazepa   (2002-06-27 19:00) [0]

В s:string при вкл. Huge String находится что-то типа отсчета, короче обычный текст но очень больших размеров. Как его быстро сохранить?
Заранее благодарен.


 
Victor_Kozel   (2002-06-27 19:08) [1]

Примерно так

procedure Save(aHugeString: string);
var aFile: TFileStream;
begin
aFile := TFileStream.Create("File Name", fmOpenReadWrite);
// или fmCreate
try
aFile.Write(aHugeString[1], Length(aHugeString));
finally
aFile.Free;
end;
end;


 
Anatoly Podgoretsky   (2002-06-27 19:23) [2]


var
F : TextFile;
begin
AssighFile(F,"File.txt");
Rewrite(F);
Write(F,S);
CloseFile(F);
end;


 
mazepa   (2002-06-27 19:33) [3]

А можно ли таким же образом его открыть?
А если файл не совсем текст?
например: текст, value (любое) ???

p.s. про массивы и blockread не будем...


 
Volj   (2002-06-27 19:39) [4]

Если
текст =value,
то рекомендую TIniFile


 
mazepa   (2002-06-27 19:42) [5]

Я знал что будет такой расклад, но надо как нибудь по другому...



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

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

Наверх




Память: 0.44 MB
Время: 0.012 c
1-47271
greenrul
2002-06-29 18:28
2002.07.15
CheckBox.Parent:=DrawGrid; - почему чекбокс ненажимаемый?


14-47771
MaximatorVeter
2002-06-11 19:41
2002.07.15
Некоторые символы выводятся только после двойного нажатия.


1-47247
Валет
2002-06-28 14:42
2002.07.15
Bmp


3-47176
BizonWar
2002-06-17 18:00
2002.07.15
Нужно преслать данные из Paradox в SQL Server


1-47440
zje
2002-07-02 17:13
2002.07.15
Как получить рабочую группу и описание компьютера?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский