From Clomosy Docs

(Created page with " function Ord(Arg AnsiChar | Char | WideChar | Enumeration | Integer):Integer; The Ord function returns an integer value for any ordinal type Arg. It is principally used to convert characters or enumerations into their numeric equivalents. '''Example:'''<br> '''var''' S : AnsiChar; M : Char; W : WideChar; control : Boolean; number : Integer; I64 : Int64;<br> '''begin'''<br> // Set type values S := 'S'; M := 'M'; W := 'W';...")
 
No edit summary
Line 3: Line 3:


'''Example:'''<br>
'''Example:'''<br>
'''var'''
:'''Base Syntax'''
  S  : AnsiChar;
  var
  M  : Char;
    S  : AnsiChar;
  W  : WideChar;
    M  : Char;
  control  : Boolean;
    W  : WideChar;
  number  : Integer;
    control  : Boolean;
  I64 : Int64;<br>
    number  : Integer;
'''begin'''<br>
    I64 : Int64;
  // Set type values
 
  S  := 'S';
  begin
  M  := 'M';
 
  W  := 'W';
    // Set type values
  control  := True;
    S  := 'S';
  number  := 22;
    M  := 'M';
  I64 := 64;<br>
    W  := 'W';
  // Show value
    control  := True;
  ShowMessage('S = '+IntToStr(Ord(S)));
    number  := 22;
  ShowMessage('M = '+IntToStr(Ord(M)));
    I64 := 64;
  ShowMessage('W = '+IntToStr(Ord(W)));
 
  ShowMessage('control = '+IntToStr(Ord(control)));
    // Show value
  ShowMessage('number = '+IntToStr(Ord(number)));
    ShowMessage('S = '+IntToStr('''Ord'''(S)));
  ShowMessage('I64 = '+IntToStr(Ord(I64)));<br>
    ShowMessage('M = '+IntToStr('''Ord'''(M)));
'''end;'''
    ShowMessage('W = '+IntToStr('''Ord'''(W)));
    ShowMessage('control = '+IntToStr('''Ord'''(control)));
    ShowMessage('number = '+IntToStr('''Ord'''(number)));
    ShowMessage('I64 = '+IntToStr('''Ord'''(I64)));
 
  end;
 
:'''TRObject Syntax'''
 
  var
    S  : AnsiChar;
    M  : Char;
    W  : WideChar;
    control  : Boolean;
    number  : Integer;
    I64 : Int64;
 
  {
 
    // Set type values
    S  = 'S';
    M  = 'M';
    W  = 'W';
    control  = True;
    number  = 22;
    I64 = 64;
 
    // Show value
    ShowMessage('S = '+IntToStr('''Ord'''(S)));
    ShowMessage('M = '+IntToStr('''Ord'''(M)));
    ShowMessage('W = '+IntToStr('''Ord'''(W)));
    ShowMessage('control = '+IntToStr('''Ord'''(control)));
    ShowMessage('number = '+IntToStr('''Ord'''(number)));
    ShowMessage('I64 = '+IntToStr('''Ord'''(I64)));
 
  }


'''Output:'''<br>
'''Output:'''<br>

Revision as of 13:09, 13 February 2024

function Ord(Arg AnsiChar | Char | WideChar | Enumeration | Integer):Integer;

The Ord function returns an integer value for any ordinal type Arg. It is principally used to convert characters or enumerations into their numeric equivalents.

Example:

Base Syntax
 var
   S   : AnsiChar;
   M   : Char;
   W   : WideChar;
   control   : Boolean;
   number   : Integer;
   I64 : Int64;
 
 begin
 
   // Set type values
   S   := 'S';
   M   := 'M';
   W   := 'W';
   control   := True;
   number   := 22;
   I64 := 64;
 
   // Show value
   ShowMessage('S = '+IntToStr(Ord(S)));
   ShowMessage('M = '+IntToStr(Ord(M)));
   ShowMessage('W = '+IntToStr(Ord(W)));
   ShowMessage('control = '+IntToStr(Ord(control)));
   ShowMessage('number = '+IntToStr(Ord(number)));
   ShowMessage('I64 = '+IntToStr(Ord(I64)));
 
 end;
TRObject Syntax
 var
   S   : AnsiChar;
   M   : Char;
   W   : WideChar;
   control   : Boolean;
   number   : Integer;
   I64 : Int64;
 
 {
 
   // Set type values
   S   = 'S';
   M   = 'M';
   W   = 'W';
   control   = True;
   number   = 22;
   I64 = 64;
 
   // Show value
   ShowMessage('S = '+IntToStr(Ord(S)));
   ShowMessage('M = '+IntToStr(Ord(M)));
   ShowMessage('W = '+IntToStr(Ord(W)));
   ShowMessage('control = '+IntToStr(Ord(control)));
   ShowMessage('number = '+IntToStr(Ord(number)));
   ShowMessage('I64 = '+IntToStr(Ord(I64)));
 
 }

Output:

S = 83
M = 77
W = 87
control = -1
number = 22
I64 = 64