001
25.08.2005, 10:59 Uhr
Th
|
Du mußt einen Timer benutzen, der mittels OnMouseDown aktiviert und mittels OnMouseUp wieder deaktiviert wird, also z.B.
| C++: |
void __fastcall TPositionieren::btnReMouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
Timer->OnTimer = OnTimer;
Timer->Interval = 1000; // statt Sleep(1000);
Timer->Enabled = true;
}
void __fastcall TPositionieren::btnReMouseUp(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
Timer->Enabled = false;
}
void __fastcall TPositionieren::OnTimer(TObject *Sender)
{
static bool st_bFlag = true; // statt Zähler I, außer du brauchst den Zähler noch für was anderes
if(st_bFlag)
Out=(Out|SBIT2); //Ausgabe an LPT
else
Out=(Out&LBIT2); //Ausgabe an LPT
my_outp(PORT_ADR,Out);
st_bFlag = !st_bFlag;
}
|
Dieser Post wurde am 25.08.2005 um 11:02 Uhr von Th editiert. |
