Problem sa čitanjem ini fajla

[ Brkic @ 18.01.2009. 12:03 ] @

Problem je u sledećem...
program radi naj normalnije kada se ručno pokrene i kada ga ručno stavim u startup windows-a
ali kada ga ubacim u registri bazu,da se pokreće sa winom umesto iz startup-a onda se pokrene sa win-om ali neće da isčita ini fajl,već program moram ugasiti i ponovo pokrenuti i onda radi OK.
Ima li tu neka caka sa registi bazom ??

Sada sam otkrio kada napravim Shortcut i ako ne stavim u polje "Start in" direktorijum gde se nalazi program isto neće da pročita ini fajl.
da napomenem da ini fajl nije u istom direktorijumu sa izvršnim fajlom,nego u pod direktorijumu

Verovatno ima neka caka sa registri bazom.

ovim kodom ubacujem program u registri bazu

Code:

Reg:=TRegistry.Create;
    Reg.Rootkey:=HKEY_LOCAL_MACHINE;
    if Reg.OpenKey ('\Software\Microsoft\Windows\CurrentVersion\Run', true) then
     if not Reg.ValueExists('mc') then
      begin
       Reg.WriteString('mc',dir+'\mc.exe');
       Reg.Closekey;
       Reg.free;
      end;

_{[Ovu poruku je menjao Brkic dana 18.01.2009. u 14:42 GMT+1]}

_{[Ovu poruku je menjao savkic dana 18.01.2009. u 23:56 GMT+1]}

[ savkic @ 18.01.2009. 23:01 ] @

Verovatno prilikom učitavanja ini fajla ne navodiš punu već relativnu putanju i u kom slučaju se on traži u odnosu na CurrentDir koji je različit od dira gde je program. Moraš koristiti: ExtractFilePath(ParamStr(0)) + 'Program.ini';

[ Brkic @ 20.01.2009. 13:11 ] @

Bio si u pravu,
ja sam za određivanje direktorijuma koristio getdir(0,dir) i ako je program u startup-u vraćala se vrednost C:\Documents and Settings\ kako-zašto ne znam,sada sam stavio ExtractFileDir(Application.ExeName) i radi kako treba.

Koja je razlika između

ExtractFilePath(ParamStr(0))
ExtractFilePath(Application.ExeName)

rezultat je isti ??

[ savkic @ 20.01.2009. 13:41 ] @

> Koja je razlika između
> ExtractFilePath(ParamStr(0))
> ExtractFilePath(Application.ExeName)

Code:

function TApplication.GetExeName: string;
begin
Result := ParamStr(0);
end;

[ X Files @ 20.01.2009. 16:11 ] @

Jedna napomena kod koriscenja ParamStr() i ParamCount().

Postoji par bagova, mislim da su neki jos uvek aktuelni:

Citat:

Report No: 43340 (RAID: 248675)
ParamStr() does not allow quotations inside of parameters
http://qc.codegear.com/wc/qcmain.aspx?d=43340

Report No: 3946 (RAID: 262032)
ParamStr() and ParamCount() ignore legitimate parameters
http://qc.codegear.com/wc/qcmain.aspx?d=3946