na klikanie...niech coś sie stanie...

0

Czesc.... Mógłby mi ktoś powiedzieć gdzie mam ustawic cos takiego aby po kiknięciu klawisza "K" np. przesunoł mi sie button....

thx dla odpowiadających.....

0

no to OnKeyPress

0

Czyli:

if (Key=Ord('K'))or(Key=Ord('k')) then
begin
with Button do
begin
Top:=Top+10;
Left:=Left-10;
end;
end;

[Post editing rulz]

0

ja bym to zrobił tak

if UpCase(chr(Key))='K' then
begin
with Button do
begin
Top:=Top+10;
Left:=Left-10;
end;
end;

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