Visual Basic .NET <-> Free Pascal | Explicit konverzió 16bites egészre

Visual Basic .NET

CShort

Leírás

 CShort (expr)
Használt kulcsszavak: cshort

Bemenet


Kimenet

Példaprogramok

Visual Basic .NET

Explicit konverzió 16bites egészre lehetséges használata:
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
.
Free Pascal

smallint

Leírás

 smallint (expr)
Használt kulcsszavak: smallint

Bemenet


Kimenet

Példaprogramok

Free Pascal

Explicit konverzió 16bites egészre lehetséges használata:
xmin := -32768; ymax := 32767;
x:= -1234;        // x = -1234
y:= -(1500 mod 60);// y = -25
y := smallint((x * y));    // z = 30850

Megtalálható a következő gyűjteményekben: Explicit típus konverziók
Más nyelveken: en hu cz sk