Pozri tuto temu:
http://www.pcforum.sk/rs-232-vt109347.html
Co sa tyka zaznamenania stlaceneho klavesu, mozes si spravit jednoduchu funkciu Keypressed:
Kód:
function Keypressed( var ch: byte ): boolean;
var i: byte;
begin
for i:= 0 to 255 do
if GetKeyState(i) and 128 = 128 then
begin
Result:= true;
ch:= i;
Exit;
end;
Result:= false;
end;
a doriesit to TTimer-om, ktory bude mat interval 1 a bude zapnuty hned od zaciatku aplikacie. V jeho tele potom bude nieco taketo:
Kód:
if Keypressed( znak ) then
// pozadovany kod
pozeral som aj nejake tie knihy ale v malo kniach o visual basicu som nasiel nieco o seriovej komunikacii preto som sa rozhodol oslovit toto forum
