Код: procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if Bool then begin R:=Rect(X0,Y0,X,Y); Form1.Canvas.DrawFocusRect ...
確定！ 回上一頁
