Visual Basic .NET <-> Object Pascal | Explicit conversion to 16-bit integer

Visual Basic .NET

CShort

Description

 CShort (expr)
Used keywords: cshort

Input


Output

Examples

Visual Basic .NET

Explicit conversion to 16-bit integer the possible of use:
xmin = -32768
 ymax = 32767
Dim x As short= -1234        ' x = -1234
Dim y As short= -(1500 mod 60)' y = -25
y = CShort((x * y))    ' z = 30850
.
Object Pascal

smallint

Description

 smallint (expr)
Used keywords: smallint

Input


Output

Examples

Object Pascal

Explicit conversion to 16-bit integer the possible of use:
xmin := -32768; ymax := 32767;
x:= -1234;        // x = -1234
y:= -(1500 mod 60);// y = -25
y := smallint((x * y));    // z = 30850

You can find it in the following collections: explicit type conversions
Languages: en hu cz sk