procedure TForm1.StartCapture(Sender: TObject; hwnd: Integer; x1: Integer; y1: Integer; x2: Integer; y2: Integer);begin {perform the capture}end;....................wMonitor.OnWEvent := StartCapture; |
|
|
|
WMonitorX component > WEvent Interface >
Delphi |