Opendialog

Тема в разделе "Delphi - FAQ", создана пользователем Wild_cat, 27 июл 2006.

Статус темы:
Закрыта.
  1. Wild_cat

    Wild_cat Гость

    Здравствуйте, мне сново нужна помощь

    f.LoadFromFile('ways.log');
    выкидывает что файл не найден, при том ссылается на путь где файла 'ways.log' не должно быть,
    то есть в папку где был взят путь через OpenDialog
    так надо чтобы ways.log загружался из той же папки где сама программа.

    var
    Path:string;
    OpenDialog1: TOpenDialog;
    f:TStrings;
    begin
    OpenDialog1 := TOpenDialog.Create(Application);
    if OpenDialog1.Execute then
    Path := OpenDialog1.FileName;
    if Path <> ''then
    begin
    f:= TStringList.Create();
    f.LoadFromFile('ways.log');
    f.add(path);
    f.SaveToFile('ways.log');
    f.Free;
    ListBox1.Items.LoadFromFile('ways.log');
    end;


    За ранее спасибо за помощь.
     
  2. Wild_cat

    Wild_cat Гость

    Все я сам нашел решение через Getcurrentdir+'\ways.log'
     
Статус темы:
Закрыта.

Поделиться этой страницей