programın konumunu almak
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
programın konumunu almak
kendi programımı açtığım zaman mesela bir label e konumu yazıcak atıyorum c:/asdasd/adasd/ dizininde yazıcak bunu nasıl yapabilirim?
procedure TForm1.FormCreate(Sender: TObject);
begin
halt;
end;
begin
halt;
end;
Re: programın konumunu almak
procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Caption := ExtractFilePath(Application.ExeName);
end;
begin
Label1.Caption := ExtractFilePath(Application.ExeName);
end;
Re: programın konumunu almak
tesekkurler
procedure TForm1.FormCreate(Sender: TObject);
begin
halt;
end;
begin
halt;
end;