Delphi Temperatur steuerung ????????

Thema durchsuchen

Ansicht

Themen-Optionen

Temperatur steuerung ????????

Ein Thema von melssner · begonnen am 20. Aug 2009 · letzter Beitrag vom 21. Aug 2009

Vorheriger Beitrag

Nächster Beitrag

melssner

Registriert seit: 14. Jul 2009
18 Beiträge

Delphi 7 Enterprise

#23

Re: Temperatur steuerung ????????

20. Aug 2009, 19:39

Ich habs jetzt soweit gemacht allerdings ohne der vorherigen abfrage IsOn

zusammenfalten · markieren

Delphi-Quellcode:

			if (Thermometer = 'OFF') and (StrToInt(AktTemp) > StrToInt(Temperatur)+0.1) then

 begin

  IsOn:= false;

 end;

if (Thermometer = 'OFF') and (StrToInt(AktTemp)+1.9 < StrToInt(Temperatur)) then

 begin

  IsOn:= true;

 end;

if (Thermometer = 'false') then

 begin

  IsOn:= true;

 end;