Fernsteuer-ID toggle?

Das geht mit jedem Befehl einfach zu bauen, habe ich auch schon mal beschrieben (hier). Man muß nur eine Variable mitlaufen lassen, die sich merkt, was gerade an ist. Oder aus.

var
  Status: boolean;

procedure OnLoad;
begin
  ExecuteCommand('SHOWSTATUS OFF');
  Status := false;  
end;

procedure OnExecuteCommand(Command: string);
begin
  if Command = 'SHOWSTATUS ON/OFF' then
    if Status then
      ExecuteCommand('SHOWSTATUS OFF')
    else
      ExecuteCommand('SHOWSTATUS ON');
end;

begin
end.

1 Like