Hallo Community, und schon wieder ein problem - oder ich bin zu dumm für diese programmiersprache
folgendes:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Spvoice1.Volume:= 100;
if key = vk_right then begin
xk:=xk+1;
yk:=0;
end else if key = vk_left then begin
if xk > 0 then begin
xk:=xk-1;
yk:=0;
end;
end;
spvoice1.Speak(inttostr(xk)+'\'+inttostr(yk), 1);
end;
xk und yk sind globale Variablen
dabei tritt folgendes problem auf:
drücke ich pfeil rechts wird mir angesagt 1\0 drücke ich aber 3x schnell werden mir erst alle vorherigen Koordinaten angesagt. hat jemand eine Idee, wie dies zu lösen ist?
bei meiner suche mit google stieß ich auf "spvoice.skip('word', maxint)", das erzeugt aber nur einen fehler
grüße blinder007