OK, also hier der Quellcode:
Delphi-Quellcode:
procedure TFrame1.Speichern;
var F: TiniFile;
begin
if SaveDialog1.Execute then
begin
try
F:=TIniFile.create(ExtractFilePath(ParamStr(0))+SaveDialog1.Filename);
F.WriteString('Kenndaten','Name',EKenndaten[1].text);
finally
F.Free;
end;
end;
end;
Wenn ich keine Berechtigung habe, dann bekomme ich von Windows eine Meldung. Er fragt mich dann, ob ich im Ordner 'Dokumente' speichern will, klicke ich dann auf 'JA' und speichere, dann kommt folgende Fehlermeldung von Delphi:
Im Projekt test.exe ist eine
Exception der Klasse TIniFileException mit der Meldung 'In C:\Users\Sebastian\Desktop\Projekt\C:\Users\Sebast ian\Documents\test.ini kann nicht geschrieben
werden' aufgetreten