izmenjeno 2 puta, poslednji put savkic 18.01.2009. u 23:56
Izmene poruke
- savkic18.01.2009. u 23:56zapis iz teksta poruke
- Brkic18.01.2009. u 14:42zapis iz teksta poruke
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
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;
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;