Как определить путь к запускаемому фаилу?

[Cerebrum]

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

[Terran]

Procedure TForm1.Button1Click(Sender: TObject);
Begin
Edit1.Text:=ExtractFilePath(ParamStr(0));
End;

[Cerebrum]

Выручил!
Буду почаще заходить сюда...может когда-нибудь и я смогу кого-то выручить)

[Манжосов Денис :)]

Можно ещё так

Edit1.Text := ExtractFilePath(Application.Exename);