Hallo.
Ich würde das zu prüfende Relais von einer allgemeinen Klasse TCustomRelais ableiten. Dieser würde ich die Methoden Show() und Hide() geben. Die Methode Check() könnte dann so aussehen:
Delphi-Quellcode:
function TSpecialRelais.Check: Boolean;
begin
Show;
// .. perform tests
Hide;
end;
Grüße vom marabu