Hi Schlaumis,
habe noch ein Problem. Wie kann ich bei einer
Exception die Messagebox abschalten, da ich selbst die Fehlerbehandlung vornehmen möchte und den Benutzer nicht mit für ihn unverständlichen
Access Violations lanweilen möchte.
Delphi-Quellcode:
////Beispiel für ein EAccessViolation die nicht angezeigt werden soll:
procedure CheckObject;
var
bObject: TForm;
bHandle: Cardinal;
begin
bObject :=
nil;
try
bHandle := bObject.Icon.Handel;
//hier wird ein EAccessViolation erzeugt
MessageDLG('
Handle='+IntToStr(bHandle), mtInformation, [mbOK], 0);
except
//Eine Messagebox mit dem EAccessViolation wird ausgegeben. Wie kann sie
//abgeschaltet werden.
on E:
Exception do
bObject := TForm.Create(Application);
end;
end;
Danke für die Hilfe im voraus.
Schlumpf