Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
KeyPress
0 views
Skip to first unread message
Andrzej
Feb 17, 2002, 6:39:39 AM2/17/02
to
Chce otworzyc inny formularz przy pomocy klawisza INS
procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if key = Chr(VK_INSERT) then;
Form3.Show;
end;
Jak na zlosc otwiera przy wcisnieciu kazdego innego klawisza lecz nie INS
Andrzej
tocbac
Feb 17, 2002, 9:56:05 AM2/17/02
to
Andrzej napisał(a) w wiadomości: ...
Program nie robi Ci na złość. On robi to, co mu każesz.
Wywal średnik po słowie then (co on tu robi ?) i użyj np. OnMouseDown.
Tocbac.
tocbac
Feb 17, 2002, 10:15:35 AM2/17/02
to
tocbac napisał(a) w wiadomości: ...
Przepraszam, chciałem pisać OnKeyDown.
Tocbac.
Adam Boduch
Feb 17, 2002, 10:55:13 AM2/17/02
to
> Chce otworzyc inny formularz przy pomocy klawisza INS
>
> procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
> begin
> if key = Chr(VK_INSERT) then;
> Form3.Show;
> end;
>
>
> procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
> begin
> if key = Chr(VK_INSERT) then;
> Form3.Show;
> end;
>
IMO klawisz Insert moze byc wlaczony lub nie! Tak, a odczytanie tego:
if (GetKeyState(VK_INSERT) <> 0) = true then
...
Ten kod wpisz w OnKeypress.
--
_______________________________
Adam Boduch, <ad...@4programmers.net>
www.4programmers.net
0 new messages