Nutze doch einfach die Laufzeitverzögerung - damit müsste es gehen.
Ich ahtte auch schon mal so ein Problem. Oder einfach vddx(par1) aus der FX-Lib. Den MMX-Timer gibts dort auch. Einfach mal danach suchen (
www.fireball.de) - da findest du immer was. Such z.B. mal nach "mmx 3jk", da findest du ne menge!
Probier doch mal folgendes: (nicht erschrecken, weil es so lang ist. ist wirklich total simple)
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
| program TestProgramm-MMX;
$FXlib.jk;
uses ...
...
var meineVar : int;
bind: FXlib;
vddx(meineVar);
SEND_MMX.timer: "3JK" ;
main-mmx = 3jk;
surf.mmx ? (003);
try: FX ;
wait(3000);
goto [fx]];
if FX := 0
begin
write ('Fehler')
end;"switch(73f/nkz=tes2)
select
(EE = 0): x := 19
(EE = 1): x := 2
else: x := 1
()) =3K + j;
Chr();
Chr(22);
$00FF = 0;
WideChar($1234); |
Moderiert von 
UGrohne: Schriftgröße korrigiert
Moderiert von Tino: Delphi-Tags hinzugefügt.
