ImageEn, unit imageenview |
|
TImageEnView.OnRulerGripDblClick
Declaration
property OnRulerGripDblClick: TRulerGripClickEvent;
Description
Occurs when the user double-clicks a grip on a
ruler.
procedure TForm1.ImageEnView1RulerGripDblClick(Sender: TObject; RulerDir: TRulerDir; Grip: integer; GripPos: Double);
begin
case RulerDir of
rdHorizontal : ShowMessage( format( 'Grip %d double-clicked on horizontal ruler', [ Grip ]));
rdVertical : ShowMessage( format( 'Grip %d double-clicked on vertical ruler', [ Grip ]));
end;
end;