Auf Fehlerrückgabe prüfen

[DelphiManiac]

Hallo,

ich habe ein Designproblem bei meiner Gestaltung meines Quelltextes:

Ich habe ein API Klasse zu Steuerung eines Gerätes entworfen, die kann u.a. folgendes:

Delphi-Quellcode:

TGeraet.GetUhrzeit(var uhrzeit:TUhrzeit):integer;
TGeraet.GetParamter(var paramter:Word):integer;
TGeraet.GetSeriennummer(var sn:string):integer;

die Methoden geben einen Fehlercode zurück:

0 -> kein Fehler
120 -> Timeout
130 -> Checksum Error...

Nun finde ich es irgendwie blöd jedes mal wenn ich eine Methode aufrufe
dieses zu machen

Delphi-Quellcode:

if (meinGeraet.GetSeriennummer(sn) <>0) then
begin
  // Fehlerbehandlung
end;
...
if (meinGeraet.GetUhrzeit(uz) <>0) then
begin
  // Fehlerbehandlung
end;

da ich sehr viele Kommunikationsanfragen habe und das ganze meinen Quelltext aufquellt

Danke vielleicht wisst ihr ja eine vielleicht auch OOP-Design-Lösung

Gruß
DelphiManiac