|
Registriert seit: 4. Mär 2007
Ort: Sponheim
1.021 Beiträge
Delphi XE2 Professional
|
Re: Temperatur steuerung ????????
20. Aug 2009, 10:07
Evtl so:
Delphi-Quellcode:
//Startzeit 1 schalten
if (tmpTime > Start1) and (tmpTime < Ende1) and (OFF1 = '') and (aktTemp <= 26) then
begin
h:= OpenDevice(0);
SetDigitalChannel(1);
CloseDevice;
Image1.Picture:=nil;
Imagelist1.GetBitmap(2,Image1.Picture.Bitmap); //0=Disable, 1=OFF, 2=ON, 3=Notschalter
Label11.Font.Color:= clGreen;
end;
Marc 9 von 10 Stimmen in meinem Kopf sagen ich bin nicht verrückt, die 10. summt die Melodie von Tetris... | Wenn das die Lösung ist, dann hätte ich gerne mein Problem zurück! |  engbarth.es
|
|
|
Zitat
|