Re: Fail
From: Christakis John (you'll_just_send_spam_at_me.if.I.tell)
Date: 12/10/03
- Next message: Netsak: "Re: Fail"
- Previous message: Ian Patton: "Cursors"
- In reply to: Netsak: "Fail"
- Next in thread: Netsak: "Re: Fail"
- Reply: Netsak: "Re: Fail"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Thu, 11 Dec 2003 03:12:47 +1000
I can see a missing ' where the line is
cj
"Netsak" <netsak@frac.dk> wrote in message
news:7FHBb.1468$Vl7.952@news.get2net.dk...
CitrusWhy dosn't this work?
The failure is Unidentified TRegistry
procedure SetStartup;
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', True)
then
begin
Reg.WriteString('programtitle__________,
'"C:\The\Path\_With_\Quotes.exe"');
Reg.CloseKey;
end;
finally
Reg.Free;
end;
end;
- Next message: Netsak: "Re: Fail"
- Previous message: Ian Patton: "Cursors"
- In reply to: Netsak: "Fail"
- Next in thread: Netsak: "Re: Fail"
- Reply: Netsak: "Re: Fail"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|
