Tags:
delphi
hvordan kan jeg finde stien til mit program?? jeg kan bruge denne kode, men denne virker jo ikke hvis brugeren har omdømt fil navnet. det skal ikke være stien til mappen, men hele file navnet: c:\\blah\\blah.exe
Function AppPath(): string;
begin
result := ExtractFilePath(Application.Exename);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
showmessage(AppPath + 'Project1.exe');
end;
3 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma
0
0
Du kunne også bare have fjernet ExtractFilePath'en, og skrive Result := Application.ExeName;
MH.
The-Freak
Livet er for kort til at kede sig.