Ĺadny brzuch
W jaki sposób zrzucić do komponentu Memo zawartość kluczy dotyczących autostartu. Chodzi mi o zrzucenie ścieżki programów. Mam nadzieję że wiecie o co chodzi :)
Registry+memo.lines.add+Help
Registry+memo.lines.add+Help
to wiem, ale chodzi mi o pełną procedurę ... :blink:
uses Registry; [...] procedure TForm1.FormCreate(Sender: TObject); var reg: TRegistry; i: integer; begin try memo2.Lines.Clear; reg:= TRegistry.Create; reg.RootKey:= HKEY_CURRENT_USER; reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run', true); reg.GetValueNames(memo2.Lines); for i:= 0 to memo2.Lines.Count-1 do  memo1.Lines.Add(reg.ReadString(memo2.Lines[i])); finally reg.CloseKey; reg.Free; end; end;
mozesz sobie ustawic memo2.Visible na false, wtedy memo2 bedzie niewidoczne.
wielkie dzięki !
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Registry+memo.lines.add+Help
Registry+memo.lines.add+Help
to wiem, ale chodzi mi o pełną procedurę ... :blink:
uses Registry; [...] procedure TForm1.FormCreate(Sender: TObject); var reg: TRegistry; i: integer; begin try memo2.Lines.Clear; reg:= TRegistry.Create; reg.RootKey:= HKEY_CURRENT_USER; reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run', true); reg.GetValueNames(memo2.Lines); for i:= 0 to memo2.Lines.Count-1 do  memo1.Lines.Add(reg.ReadString(memo2.Lines[i])); finally reg.CloseKey; reg.Free; end; end;
mozesz sobie ustawic memo2.Visible na false, wtedy memo2 bedzie niewidoczne.
wielkie dzięki !