AlrtDialog Dialogs - Predefined 

Declaration:

PROCEDURE   AlrtDialog
( message:STRING ) ;

Description:

Procedure AlrtDialog displays an alert dialog to the user.

Parameters:

message The alert message to be displayed.

Example:

AlrtDialog('No objects are selected for this operation.');



  AngDialog Dialogs - Predefined 

Declaration:

FUNCTION   AngDialog
(   request :STRING;
    default :STRING
) :REAL ;

Description:

Function AngDialog displays a dialog box which requests the user to enter an angle value. The dialog automatically screens for valid numeric input, and will accept supported angle formats.

Parameters:

request Dialog user prompt string.
default Default value for input field.

Example:

AngleValue := AngDialog('Enter an angle value:', '0°');



  AngDialog3D Dialogs - Predefined 

Declaration:

PROCEDURE   AngDialog3D
(   displayStr :STRING;
    xStr :STRING;
    yStr :STRING;
    zStr :STRING;
  VAR  xAngleResult :REAL;
  VAR  yAngleResult :REAL;
  VAR  zAngleResult :REAL
) ;

Description:

Function AngDialog3D displays a dialog box which requests the user to enter three angle values. AngDialog3D will accept angle values in any supported angle format.

Parameters:

displayStr Dialog user prompt string.
xStr Default value for input field.
yStr Default value for input field.
zStr Default value for input field.
xAngleResult Returns user input X value.
yAngleResult Returns user input Y value.
zAngleResult Returns user input Z value.

Example:

AngDialog3D('Enter the angle values:','0','0','0',x,y,z);



  DidCancel Dialogs - Predefined 

Declaration:

FUNCTION   DidCancel
:BOOLEAN ;

Description:

Function DidCancel detects whether the Cancel button in a predefined dialog was pressed. DidCancel is intended for use with conditional statements to signal that a cancel event has occurred.

Example:

PROCEDURE Example;
VAR
  i : INTEGER;
BEGIN
  i := IntDialog('Enter an integer:','0');
  IF NOT DidCancel THEN BEGIN
    i:=i*3;
    Message(i);
  END;
END;
RUN(Example);



  DistDialog Dialogs - Predefined 

Declaration:

FUNCTION   DistDialog
(   request :STRING;
    default :STRING
) :REAL ;

Description:

Function DistDialog displays a dialog box which requests the user to enter a distance value.

DistDialog automatically screens for valid numeric input.

Parameters:

request Dialog user prompt string.
default Default value for input field.

Example:

DistValue := DistDialog('Enter a distance value:','0','0"');



  IntDialog Dialogs - Predefined 

Declaration:

FUNCTION   IntDialog
(   request :STRING;
    default :STRING
) :INTEGER ;

Description:

Function IntDialog displays a dialog box which requests the user to enter an integer value.

IntDialog automatically screens for valid numeric input.

Parameters:

request Dialog user prompt string.
default Default value for input field.

Example:

distValue := IntDialog('Enter an integer value:','0');



  NonUndoableActionOK Dialogs - Predefined 

Declaration:

FUNCTION   NonUndoableActionOK
:BOOLEAN ;

Description:

Function NonUndoableActionOK displays a dialog informing the user that the action that is about to be performed cannot be undone. If the user selects OK, the function returns TRUE.



  PtDialog Dialogs - Predefined 

Declaration:

PROCEDURE   PtDialog
(   request :STRING;
    defaultX :STRING;
    defaultY :STRING;
  VAR  x :REAL;
  VAR  y :REAL
) ;

Description:

Procedure PtDialog displays a dialog box which requests the user to enter a coordinate (point) value.

Parameters:

request Dialog user prompt string.
defaultX Default value for input field.
defaultY Default value for input field.
x Returns user input X value.
y Returns user input Y value.

Example:

PtDialog('Enter a coordinate.','0','0',cX,cY);



  PtDialog3D Dialogs - Predefined 

Declaration:

PROCEDURE   PtDialog3D
(   displayStr :STRING;
    xStr :STRING;
    yStr :STRING;
    zStr :STRING;
  VAR  xPt :REAL;
  VAR  yPt :REAL;
  VAR  zPt :REAL
) ;

Description:

Procedure PtDialog3D displays a dialog box which requests the user to enter a 3D coordinate (point) value.

Parameters:

displayStr Dialog user prompt string.
xStr Default value for input field.
yStr Default value for input field.
zStr Default value for input field.
xPt Returns user input X value.
yPt Returns user input Y value.
zPt Returns user input Z value.

Example:

PtDialog3D('Enter the 3D location:','0','0','0',x,y,z);



  RealDialog Dialogs - Predefined 

Declaration:

FUNCTION   RealDialog
(   request :STRING;
    default :STRING
) :REAL ;

Description:

Function RealDialog displays a dialog box which requests the user to enter a REAL value. RealDialog automatically screens for valid numeric input.

Parameters:

request Dialog user prompt string.
default Default value for input field.

Example:

RealValue:=RealDialog('Enter a real value:','0.00');



  StrDialog Dialogs - Predefined 

Declaration:

FUNCTION   StrDialog
(   request :STRING;
    default :STRING
) :STRING ;

Description:

Function StrDialog, displays a dialog box which requests the user to enter a string value.

Parameters:

request Dialog user prompt string.
default Default value for input field.

Example:

StrValue:=StrDialog('Choose a letter:
          A.This
          B.That
          C.The Other','');
{displays dialog using the format of the text in the prompt string parameter}



  YNDialog Dialogs - Predefined 

Declaration:

FUNCTION   YNDialog
( s:STRING ) :BOOLEAN ;

Description:

Function YNDialog displays a dialog box which requests the user to select a Yes or No value. If the user selects the Yes button in the dialog box, the value returned by YNDialog is TRUE; if the user selects No, the function returns FALSE.

Parameters:

s Dialog user prompt string.

Example:

Answer := YNDialog('Do you wish to continue?');