[RusSTEEL]

Код:

s.LoadFromFile('Путь к файлу');

Есть ли аналог команды, с помощью которого можно убрать привязку к определенному месту? т.е чтоб он искал в папке с программой?


Суть такова что выводит курсы валют в Edit-Ы, НО т.к нету интернета нужно чтобы выводил со скачанной страницы.

[NumLock]

тут смотри

[RusSTEEL]

Сообщение от NumLock

тут смотри

Код:

ShellExecute(0,nil,PCHar(IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName))+ '2.EXE'),nil,nil,SW_HIDE);

дак оно открывает а нужно чтобы оттуда брал данные
Может посоветуете что?

[Snake22]

Сообщение от RusSTEEL

Код:

s.LoadFromFile('Путь к файлу');

Есть ли аналог команды, с помощью которого можно убрать привязку к определенному месту? т.е чтоб он искал в папке с программой?

вообще если путь не прописан а просто имя файла s.LoadFromFile('1.txt'); то файл береться из папки с самой программой.ну а так вообще есть такая функция (ParamStr(0)) которая возвращает путь к ехешнику.
например

Код:

path := ExtractFilePath(ParamStr(0))

[NumLock]

ну так:

Код:

s.LoadFromFile(IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName))+ 'name.ext');

либо:

Код:

unit Forms;

  TApplication = class(TComponent)
  public
    property ExeName: string read GetExeName;

function TApplication.GetExeName: string;
begin
  Result := ParamStr(0);
end;

[RusSTEEL]

Сообщение от Snake22

вообще если путь не прописан а просто имя файла s.LoadFromFile('1.txt'); то файл береться из папки с самой программой.н[/code]

Спасибо =)