Einzelnen Beitrag anzeigen

CalganX

Registriert seit: 21. Jul 2002
Ort: Bonn
5.403 Beiträge
 
Turbo Delphi für Win32
 
#2
  Alt 22. Feb 2003, 15:15
Hmm... wenn das Ereignis "OnDblClick" nicht existiert:
Delphi-Quellcode:
procedure TForm1.PageSheet1MouseDown({...}); // im OnMouseDown deiner Seite
begin
  inc(iClickCounter);
  if iClickCounter = 2 then begin
    //tu' was...
    iClickCounter := 0;
  end;
end;
Wobei iClickCounter eine globale Variable vom Typ Byte oder Word ist.

Chris
  Mit Zitat antworten Zitat