Create OnMouseDown event for the Edit: procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); ...
確定! 回上一頁