[Delphi] Okienko Edit

0

Jak w najprostszy sposób zablokować w oknie Edit przesuwanie kursora strzałkami ?

0

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = vk_Left) then //Napisz dla strzlki w prawo (vk_Right)
Key := #0;
end;

Tylko jest taki dylemat. Nie jestem pewien, zy powinienes ten kod napisac ddla zdazenia KeyDown czy KeyPress. Z gory mowie, ze jesli KeyDown nie pomoze, to jak badziesz pisal dla KeyPress to nie bedzie to vk_Left tylko 77(prawo) i 75(lewo).
P.S. po prostu musisz troszke pokombinowac:)--Delphi vs. Visual C++ = ?:?

0

Dzięki - popróbuję :-)

1 użytkowników online, w tym zalogowanych: 0, gości: 1