000
25.05.2006, 13:49 Uhr
~Itschi
Gast
|
Das Programm soll immer aus geben was es gerade macht. Doch es giebt den Text erst aus wenn das Programm durch gelaufen ist. Was also nichts mehr bringt.
Bis die weil Schleifen beendet werden braucht es immer ein paar Sekunden.
| Zitat: |
Edit1->Text = "Maschine arbeitet";
lese();
setzen(0, 1);
lese();
while(eingang[4] == 1) {
lese();
}
setzen(0, 0);
setzen(3, 1);
lese();
Label1->Caption = "runter bewegen";
while(eingang[2] == 1) {
lese();
}
setzen(1, 1);
setzen(3, 0);
setzen(5, 1);
lese();
Label1->Caption = "hoch bewegen";
while(eingang[1] == 1) {
lese();
}
Label1->Caption = "halten";
setzen(1, 0);
setzen(5, 0);
|
|
--> 
