To open any link in a new tab, preserving your position in the current article, just hold down the <CTRL> key on your keyboard before clicking the link or click using your mouse wheel.
Skip to end of metadata
Go to start of metadata

You are viewing an old version of this page. View the current version.

Compare with Current View Page History

« Previous Version 3 Next »

User Input - GetPoint

GetPoint prompts the user to select a point by clicking on the active plan, the returns the point coordinates in X and Y .

If the user clicks a valid point, the result is 1 (True), otherwise the result is 0 (False).

Declaration:

GetPoint(Var X: Double; Var Y: Double; Hint: String): Integer;

Source Code:

var
  x, y: double;

begin
  if getpoint(x,y, 'Click a point') = 1 then
    showmessage('Clicked at ' + floattostr(x) + ', ' + floattostr(y))
  else
    showmessage('Canceled');
end;
  • No labels