Detekce 2 stisknutých kláves – Delphi – Fórum – Programujte.com

Mám problém, vždy když detekuji stisk kláves, tak jde jen jedna. Když stisknu dvě klávesy tak se projeví jen ta, která byla stisknuta dříve.

jelikož to neumím dobře vysvětlit, tak to uvedu na následujícím skriptu:

if key=VK_LEFT then x:=x+1;
if key=VK_UP then y:=y+1;

Form1.Label1.Caption:=(floattostr(x));
Form1.Label2.Caption:=(floattostr(y));

Když jsou zmáčknuty obě klávesy současně, tak se zvětšuje jen jedna proměná. A já potřebuji, aby se zvětšovali obě.

Takže jsem na to konečně přišel!!! No jsem absolutně šťasstný, protože jsem na to vůbec nemohl přijít. Je to kvůli tomu, že se učím programovat sám a nemám tak nějaké základy... takže už odpověď nepotřebuji.

a co tak napisat odpoved aj pre inych ludi co by to zaujimalo?:)

Celý vtip spočívá v tom, že tam jsou dvě procedury jedna na stisknutí a jedna, která ověřuje, když tlačítko pustíme.