onkey...events

Hi Hulp 
Ik wil graag met linker cq. rechte pijltjes toets een lineaal over een grafiek laten bewegen doch al mijn mogelijke
ideen zijn mislukt. Hoe kan ik een onkey event schrijven voor de pijltjestoetsen op je keyboard. of hoe benader ik
de pijtjes toeten...ook met een key:= #??? 
Wie weet een oplossing?? of heeft een suggestie 

Bedankt Frits

--

Hoi Frits, 

gebruik het onkey down event ipv key press. 
In de on key press worden de pijltjes toetsen NIET doorgegeven. 
in de on key down wel test het maar met onderstaande code 

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; 
Shift: TShiftState); 
begin 
if key = vk_left then 
ShowMessage('links'); 
if key = vk_right then 
ShowMessage('rechts'); 
end; 

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); 
begin 
if key = Char(vk_left) then 
ShowMessage('links'); 
if key = Char(vk_right) then 
ShowMessage('rechts'); 
end; 

Natuurlijk wel de een of de andere gebruiken dan zul je zien dat de on key press niets doet. 

Roelof. 

--

Hoi Roelof 
Dit is precies wat ik zocht... met erg lang zoeken, kon ik dit in geen enkel boek vinden, ontzettend bedankt voor je hulp. 
groetjes Frits