Zitat von
kiar:
hallo,
mit diesem Quelltext:
Delphi-Quellcode:
procedure LoadSettings;
var
Ini: TIniFile;
xP : PSettings;
begin
new(xP);
Ini:= TIniFile.Create(ExtractFilePath(Paramstr(0)) + 'maxes.ini');
with Ini, xP^ do
Begin
FZa1:= ReadString('Zahlen', 'Zahl1', '10');
FZa2:= ReadString('Zahlen', 'Zahl2', '10');
iFk := ReadInteger('Funktionen', 'Funktion', 0);
end;
ini.free;
end;
trten erstmal kein Zugriffsverletzungen auf, leider ist der Zugriff auf die procedure von einen anderen form immer noch nicht definiert
Das ist doch ziemlich klar. 8) xP ist nur lokal definiert und deshalb ist es außerhalb der Prozedur eben nicht definiert --> nur Hyroglyphen.
@Kiar : Man darf natürlich das xP, wenn es schon mit new nur lokal erzeugt wird auch nicht als Wert-Parameter sondern als Var-Parameter übergeben. Da hat einer sich nicht so richtig an das Prinzip der Datenkapselung gehalten.
