Întrebarea este simplă. Cum se găsește dosarul curent în care se află programul.
Dar sarcina nu este destul de simplă. De exemplu, în versiunea în limba engleză a sistemului de operare, care utilizează alfabetul chirilic în modul în care, GetCurrentDir dă următoarele: „C :. \ Users \“ în loc de chirilice semne de întrebare, așa că nu specifică calea în care cererea are reședința. Dacă aplicația este în Startup, apoi GetCurrentDir = "C: \ WINDOWS" și se pare că nu recunoașteți dosarul aplicației și nici nu o setați ca cea curentă.
Întrebarea este: cum să instalați folderul curent al aplicației lansate?
Forum cu mini-întrebări
În acest scop, puteți utiliza funcțiile unicode din kernel32.dll (descrise în Windows.pas):
În ceea ce privește catalogul programului - nu știu ce va reveni în această situație ParamStr (0), dar există și un alt mod:
Nu am folosit aceste funcții, așadar îmi explic răspunsul meu ca pe un post pe forum.
Experiment.
Fac laboratoare și tutoriale despre Delphi și Turbo Pascal. Pentru bere! Scrieți în mod personal și, de preferință, în ICQ. Și chiar mai bine - sunați la Skype!
De fapt, nu există semne de întrebare. Doar limba engleză este prost și caracterele chirilice nu pot afișa. Ei bine, ea nu le cunoaște. Dar acest lucru nu o împiedică să o acționeze.
Sursa fișierului exe este determinată exact de linia Application.ExeName.
Bifarea "dovada citirii" este un rău universal.
atunci calea spre exe va fi scrisă la variabila dir
dacă are un astfel de aranjament
Din: /my/programs/test.exe
atunci directorul va fi scris
De la: / my / programs