07. november 2003 - 19:16Der er
6 kommentarer og 1 løsning
RegEdit Fejl hvorfor?
procedure TForm1.Button1Click(Sender: TObject); var Registry: TRegistry; begin Registry:=TRegistry.Create; Registry.RootKey:=HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run; If Registry.OpenKey('Rebugger',True) then begin Registry.WriteString('%drive%\Rebugger\AutoBug.exe'); Registry.Free; end; end;
Hvis jeg ellers har forstået dit spørgsmål rigtigt, så prøv med nedenstående:
procedure TForm1.Button1Click(Sender: TObject); var Registry: TRegistry; begin Registry:=TRegistry.Create; Registry.RootKey:= HKEY_LOCAL_MACHINE; If Registry.OpenKey('\SOFTWARE\Microsoft\Windows\CurrentVersion\Run',True) then Registry.WriteString('Rebugger', '%drive%\Rebugger\AutoBug.exe'); Registry.Free; end;
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.