From Clomosy Docs

No edit summary
No edit summary
Line 1: Line 1:
procedure Inc(var Variable Ordinal variable);
<div class="alert alert-ligth border border-3 border-primary-subtle rounded-5 p-4 shadow-sm" role="alert">
The Inc procedure increments the ordinal Variable parameter passed to it.
procedure Inc(var X: Integer); overload;
</div>


'''Example:'''<br>
The Inc procedure increments the ordinal variable parameter passed to it.
:'''Base Syntax'''
  var
    Number    : Integer;
 
  begin
    Number := 23;
    ShowMessage('Number : '+IntToStr(Number));
    '''Inc'''(Number);
    ShowMessage('Number+1 : '+IntToStr(Number));
  end;


:'''TRObject Syntax'''
<b>Example</b><br>
<b>TRObject Syntax</b><br>
<pre>
var
  Number    : Integer;
{
  Number = 23;
  ShowMessage('Number : '+IntToStr(Number));
  Inc(Number);
  ShowMessage('Number+1 : '+IntToStr(Number));
}
</pre>
<b>Base Syntax</b><br>
<pre>
var
  Number    : Integer;
begin
  Number := 23;
  ShowMessage('Number : '+IntToStr(Number));
  Inc(Number);
  ShowMessage('Number+1 : '+IntToStr(Number));
end;
</pre>


  var
<b>Output:</b><br>
    Number    : Integer;
<div class="alert alert-success" role="alert" data-bs-theme="light">
 
Number : 23<br>
  {
Number+1 : 24
    Number = 23;
</div>
    ShowMessage('Number : '+IntToStr(Number));
    Inc(Number);
    ShowMessage('Number+1 : '+IntToStr(Number));
  }


'''Output:'''<br>
<h2> See Also </h2>
Number : 23
* [[System_Library#Math_Functions | Math Functions]]
Number+1 : 24

Revision as of 10:44, 7 October 2024

The Inc procedure increments the ordinal variable parameter passed to it.

Example
TRObject Syntax

 var
   Number    : Integer;
 
 {
   Number = 23;
   ShowMessage('Number : '+IntToStr(Number));
   Inc(Number);
   ShowMessage('Number+1 : '+IntToStr(Number));
 }

Base Syntax

 var
   Number    : Integer;
 
 begin
   Number := 23;
   ShowMessage('Number : '+IntToStr(Number));
   Inc(Number);
   ShowMessage('Number+1 : '+IntToStr(Number));
 end;

Output:

See Also

Retrieved from "http:///index.php?title=Inc&oldid=2597"