Position der Icons auf dem Desktop ermitteln

[eragon123]

Delphi-Quellcode:

procedure TForm1.saveRegistryKey();
  var regist: TRegistry;
begin
  regist := TRegistry.Create(KEY_ALL_ACCESS);
  try
    regist.RootKey:=HKEY_CURRENT_USER;
    if regist.KeyExists(lbledtpath.Text) then ShowMessage('Schlüssel existiert');
    regist.OpenKey(lbledtpath.Text, False);
    if regist.SaveKey(lbledtpath.Text,lbledtsavepath.Text+'\reg') then
      ShowMessage('Key "' + lbledtpath.Text + '" wurde erfolgreich in "'+lbledtsavepath.Text+'" gespeichert!');
    regist.CloseKey;
  finally
    regist.free;
  end;
end;

ja hab ich. Siehe oben