Hallo,
ich benutze gerade erstmals den FullAutoRepeat des Tasturtreibers.
Mein Setup sind 4 Taster, von denen 2 die Repeatfunktion benötigen.
Im Prinzip sieht das so aus:
If PipeStat(SwitchKeyPipe_G)<>0
then
Key:=PipeRecv(SwitchKeyPipe_G);
If SMode in [0..1]
then
Case Key of
0:DecToLim(Speed,8,2);
|
2:IncToLim(Speed,360,2);
|
EndCase;
else
Case Key of
0:DecToLim(SSteps,1,1);
|
2:IncToLim(SSteps,999,1);
|
EndCase;
EndIf;
EndIf;
Auch die beiden anderen Tasten landen ja in der Pipe, obwohl hier die Funktion nicht benötigt wird.
Wie macht ihr das? Alle Tasten an dieser Stelle auswerten oder habt ihr zusätzlich im Programm ein
drin.
Gruss
Harry
ich benutze gerade erstmals den FullAutoRepeat des Tasturtreibers.
Mein Setup sind 4 Taster, von denen 2 die Repeatfunktion benötigen.
Im Prinzip sieht das so aus:
Code
If PipeStat(SwitchKeyPipe_G)<>0
then
Key:=PipeRecv(SwitchKeyPipe_G);
If SMode in [0..1]
then
Case Key of
0:DecToLim(Speed,8,2);
|
2:IncToLim(Speed,360,2);
|
EndCase;
else
Case Key of
0:DecToLim(SSteps,1,1);
|
2:IncToLim(SSteps,999,1);
|
EndCase;
EndIf;
EndIf;
Auch die beiden anderen Tasten landen ja in der Pipe, obwohl hier die Funktion nicht benötigt wird.
Wie macht ihr das? Alle Tasten an dieser Stelle auswerten oder habt ihr zusätzlich im Programm ein
Code
If Inp_Raise_G(SRun)
then
then
drin.
Gruss
Harry
