![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Текстовый Фаил [D5, D6, Win95/98, Win2k]
hooky-mars © (2002-04-14 16:50:00)Saluer!
Подскажите люди, как в текстовый фаил что-то написать? И чтобы можно было потом в блакноте прочесть! Очень надо!
Зарние благодарен.
hooky-mars (2002-04-14 17:04:00) [21]Только Delphi 6 поставил, и сразу в эту муть полез. Ну что есть соображенния
hooky-mars (2002-04-14 17:02:00) [22]
> MBo
Да
hooky-mars (2002-04-14 17:01:00) [23]
> MBo
В моём случае это может быть технологически трудно, т.к. я это делаю в PageProducer`е.
MBo (2002-04-14 17:00:00) [24]тебе знакомы слова Win Cp1251, Koi-8 ?
hooky-mars (2002-04-14 16:59:00) [25]
> MBo
Какой?
hooky-mars (2002-04-14 16:57:00) [26]
> MBo
Я какрас испльзую rewrite
writeln
MBo (2002-04-14 16:57:00) [27]а строке этой какая кодировка?
hooky-mars (2002-04-14 16:56:00) [28]
> MBo
FV:String;
MBo (2002-04-14 16:55:00) [29]а что у тебя в FV ? :)
hooky-mars (2002-04-14 16:55:00) [30]
> Anatoly Podgoretsky
В моём случаеё врядли возможен данный способ!
Anatoly Podgoretsky (2002-04-14 16:54:00) [31]Memo.Lines.SaveToFile
hooky-mars (2002-04-14 16:53:00) [32]Пишу так:
var
F: File of TStrings;
i:integer;
StringList:Tstrings;
begin
AssignFile(F, "Unit12.html");
Rewrite(F);
try
StringList := TStringList.Create;
StringList.Text:="<html>"+FV+"</html>";
Seek(F, 1);
Write (F,StringList);
finally
CloseFile(F);
StringList.free;
end;
А получается что-то такое њЉЕ
MBo (2002-04-14 16:53:00) [33]способов уйма
Assignfile
rewrite
writeln
closefile
StringList.Savetofile
и т.д.