Avatar billede athlon-pascal Juniormester
05. marts 2002 - 13:43 Der er 19 kommentarer og
1 løsning

Samme dir som exe-filen

Er der ikke en funktion i Delphi der kan finde exe-filens dir? exe-filen skal kunne omdøbes uden problemer!
Eksempel:

VAR
  sl : TStringlist;
BEGIN
  sl := TStringlist.Create;
  sl.LoadFromFile(exe-filensdir,'myfile.txt');
END;

"exe-filensdir skal erstates af det dir hvor exe-filen (og evt. projectet) ligger, så hvis exe-filen ligger i c:\programmer\myprog skal koden gøre sådan:

VAR
  sl : TStringlist;
BEGIN
  sl := TStringlist.Create;
  sl.LoadFromFile('c:\programmer\myprog\myfile.txt');
END;

Hvis man omdøber c:\programmer\myprog til c:\programmer\myapp skal den loade c:\programmer\myapp\myfile.txt.

Bruger Delphi 4 standard under Win98

se evt. http://www.eksperten.dk/spm/178365
Avatar billede morten_s Nybegynder
05. marts 2002 - 13:46 #1
ExeStartUpPath := ExtractFilePath(Application.ExeName);
Avatar billede pellelil Nybegynder
05. marts 2002 - 13:47 #2
I "ParamStr(0)" finde du hele stien (inkl. navnet) på dit program's exe fil.
Avatar billede morten_s Nybegynder
05. marts 2002 - 13:47 #3
Hvor ExeStartUpPath  er en almindelig string
Avatar billede ziron Nybegynder
05. marts 2002 - 13:48 #4
ShowMessage(ExtractFilePath(ParamStr(0)));

/ZIRON
Avatar billede martinlind Nybegynder
05. marts 2002 - 13:49 #5
sl.LoadFromFile(ChangeFileExt(Application.ExeName,'.txt'));
Avatar billede athlon-pascal Juniormester
05. marts 2002 - 13:50 #6
Er ikke ved Delphi, kigger på det!
Avatar billede ziron Nybegynder
05. marts 2002 - 13:51 #7
hmm det gik sku da pænttt stærkt det her :)

/ZIRON
Avatar billede athlon-pascal Juniormester
05. marts 2002 - 13:54 #8
ziron> Ja, Eksperterne er hurtige til de nemme!
Avatar billede Marting Forsker
05. marts 2002 - 13:58 #9
>> Zoron

jeg se lidt på jers hjemme side!!! kan jeg bilve bliv. medlem??
det er vil ikke kun din hejmmeside???

Martin
Avatar billede athlon-pascal Juniormester
05. marts 2002 - 14:04 #10
marting> Hvilken hjemmeside (nysgerig)?
Avatar billede ziron Nybegynder
05. marts 2002 - 14:06 #11
marting >> jo det kan man jo altid snakke om, kontakt mig på icq : 50365252 MSN : ziron@kulhytten.dk eller mail den samme...

/ZIRON
Avatar billede ziron Nybegynder
05. marts 2002 - 14:09 #12
www.kulhytten.dk :)

/ZIRON
Avatar billede easysoft_studios Nybegynder
05. marts 2002 - 14:34 #13
100 point - det er jo tosset :)
ExePath := ExtractFilePath(Application.ExeName)
Avatar billede Marting Forsker
05. marts 2002 - 14:37 #14
>>Ziron !!

jeg skal lige hjem først!!!!

så kan vi lige sankke ved!!!

Martin
Avatar billede athlon-pascal Juniormester
05. marts 2002 - 14:55 #15
easysoft_studios> 100 point - det virker! (se ale de hurtige svar)

Tjekker koden om et øjebik!
Avatar billede athlon-pascal Juniormester
05. marts 2002 - 15:07 #16
Morten_s> Først til mølle...
Avatar billede easysoft_studios Nybegynder
05. marts 2002 - 15:10 #17
øv !!!
Avatar billede easysoft_studios Nybegynder
05. marts 2002 - 15:11 #18
det havde virker ligeså godt for 30 point :)
Avatar billede ziron Nybegynder
05. marts 2002 - 15:46 #19
marting du skriver bare lige en icq eller noget men jeg tjekker den nok først imorgen. hygge hygge...

/ZIRON
Avatar billede athlon-pascal Juniormester
06. marts 2002 - 09:20 #20
easysoft_studios> Hvis jeg vælger at bruge 100 point på et spørgsmål, må jeg så ikke selv om det?
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester