Delphi-Quellcode:
procedure TFitnessMainForm.FormCreate(Sender: TObject);
begin
left:=0; top:=0;
showmessage ('
Start');
// Position lesen
try left:=inifile.ReadInteger('
Position','
Links',left);
width:=inifile.ReadInteger('
Position','
Breite',width);
height:= inifile.ReadInteger('
Position','
Höhe',height);
top:=inifile.ReadInteger('
Position','
Oben',top);
except showmessage('
exception 1');
end;
showmessage('
inifile gelesen');
Obiger Code produziert auf einem Rechner unter Windows 8 ein völlig rätselhaftes Verhalten. Nacheinander erscheinen, in der angegebenen Reihenfolge, die angehängten Messageboxen.
Obwohl zwischen dem ersten und dem zweiten Showmessage alles in einem try-except-block ist, wird zweimal diese Nachricht mit einer "Zugriffsverletzung" angezeigt, das
Showmessage('Exception2')
wird aber nicht ausgeführt.
Die inifile.readinteger funktionieren offenbar auch alle richtig, denn das Formular wird nicht am linken oberen Rand geöffnet, sondern dort, wo es sein soll.
Auf meinem Rechner mit Win7 wird keine derartige Fehlermeldung angezeigt, das ist nur am Kunden-PC der Fall.
Und nach dem Programmstart funktioniert alles normal, aber ich habe keine Ahnung, was die zwei Zugriffsverletzungsmeldungen sollen und wie ich die wegbekommen könnte.