Wenn du
Exception werfen kannst, ist das doch das einfachste. Falls das nicht geht, dann arbeite mit SafeCall (ist ja auch das, was man u.U. bei Interfaces macht)
Ich dachte du hattest
Exception schon ausgeschlossen, aber wenn nicht, dann nimm lieber diesen Weg.
Exceptions:
Delphi-Quellcode:
interface
type UhrzeitException=class(
Exception);
//... und noch andere Exceptions
implementation
function TGeraet.GetUhrzeit:TUhrzeit;
begin
//...
if Fehler
then raise UhrzeitException.create('
wenn du magst, dann hier noch ein Text');
end;
Beim Aufrufen:
Delphi-Quellcode:
try
xyz:=meingeraet.getuhrzeit;
//...andere Abfragen
except
on UhrzeitException do Uhrzeitfehler
on ... do ...
//...
else raise;
end;