Einzelnen Beitrag anzeigen

Wadim

Registriert seit: 31. Aug 2003
185 Beiträge
 
#3

Re: if abfrage bei mouse_event??

  Alt 23. Apr 2004, 16:05
Zitat von NicoDE:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Caption := '';
  if (GetKeyState(VK_LBUTTON) < 0) then
    Caption := 'LMT ';
  if (GetKeyState(VK_MBUTTON) < 0) then
    Caption := Caption + 'MMT ';
  if (GetKeyState(VK_RBUTTON) < 0) then
    Caption := Caption + 'RMT ';
end;
big THX

mfg wadim
  Mit Zitat antworten Zitat