TStringlist.SaveToFile

← →
Groove © (2002-12-18 08:49) [0]

Здравствуйте, господа!
объясните, плизз...
Создаю динамически объект типа TStringlist
заполняю его HTML-тэгами
и
TStringlist.SaveToFile(ExtractFilePath(Application.ExeName)+"Page.htm")
пишет
Cannot Create ... file
Чо ему надо причем пишет когда есть файл икогда его нет
Как работает эта ф-ция?
если нет файла создает, а если есть перезаписывает?
или чЁкаво?

← →
Song © (2002-12-18 08:51) [1]

Попробуй ExtractFileDir()

← →
zavdim (2002-12-18 09:09) [2]

Значит так.
1. считаем до 10.
2. перегружаем комп.
3. во время пергрузки считаем до ...
4. смотрим свободное место там где пишем.
5. молимся
6. пытаимся выполнить
7. если не получилось - начинаем с шага 1.

1. ExtractFilePath - правильно.
2. А ты просто без дельфей попробуй создать такой файл.
3. перезаписывает, если может конечно.

← →
Reindeer Moss Eater (2002-12-18 09:16) [3]

Попробуй закрыть редактор, в котором сейчас открыт файл Page.htm, успешно созданный ранее

← →
Lord Warlock © (2002-12-18 09:29) [4]

Это работает, как ни странно...

var a: TStringList;
begin
a:=TStringList.Create;
try
a.Add("Header");
a.Add("Footer");
a.SaveToFile(ExtractFilePath(ParamStr(0))+"Page.htm");
finally
a.Free;
end;

← →
Reindeer Moss Eater (2002-12-18 09:32) [5]

>Lord Warlock ©
Так сомнений в этом и нет (судя по сообщению об ошибке). Файл просто занят кем-то.

Честно говоря меня смутило это:

> TStringlist.SaveToFile

2Reindeer Moss Eater

> Файл просто занят кем-то.

Семен Семеныч!!!!!!!!(с)Бриллиантовая рука
Сорри господа!
Я создал страничку, загрузил ее в TWebBrouser
а потом обновляю, а она используется, забыл про нее...
сделал так

WebBrouser1.Navigate("about:blank"); SL.SaveToFile(ExtractFilePath(Application.ExeName)+"Page.htm"); WebBrouser1.Navigate(ExtractFilePath(Application.ExeName)+"Page.htm");

И еще, а тут быстрее отвечают, чем на SQL.ru->Delphi
http://www.sql.ru/forum/actualtopics.aspx?bid=20
большое спасибо всем

TStringlist.SaveToFile _ чЁкаво? Найти похожие ветки