Variables: Declaración y visibilidad
El lenguaje Pascal, que es el que usa el Delphi, (aunque orientado a objetos: Object Pascal, de ahora en adelante, simplemente lo llamaré: Delphi), obliga a declarar explicitamente cada una de las variables que vayamos a usar en nuestra aplicación, además hay que declararlas según el tipo de dato que vaya a contener.
Veamos los tipos de datos que soporta el Delphi:
| Tipo | Rango de valores | Bytes | Detalle |
| Byte | 0 a 255 | 1 | Enteros de 8 bits sin signo. |
| ShortInt | -128 a 127 | 1 | Enteros de 8 bits, con signo |
| SmallInt | -32768 a 32767 | 2 | Enteros de 16 bits, con signo |
| Word | 0 a 65535 | 2 | Enteros de 16 bits, sin signo |
| Integer | Depende del S.O. de -32767 a 32767 de -2147483648 a 2147483647 | 2 4 | Enteros con signo, en sistemas de 16 bits en sistemas de 32 bits |
| LongInt | de -2147483648 a 2147483647 | 4 | Enteros de 32 bits, con signo |
| Cardinal | Depende del S.O. 0 a 32767 0 a 2147483647 | 2 4 | Enteros sin signo, en sistemas de 16 bits en sistemas de 32 bits |
| Boolean | True o False | 1 | Verdadero o Falso |
| ByteBool | " | 1 | Ocupa un byte (igual que Boolean) |
| WordBool | " | 2 | Ocupa 2 bytes |
| LongBool | " | 4 | Ocupa 4 bytes |
| Real | 2.9 x 10^-39 a 1.7 x 10^38 | 6 | Coma flotante, 11-12 dígitos significativos Este tipo existe por compatibilidad con versiones anteriores, no recomendado ya que es más lento. |
| Single | 1.5 x 10^-45 a 3.4 x 10^38 | 4 | Coma flotante, 7-8 dígitos significativos |
| Double | 5.0 x 10^-324 a 1.7 x 10^308 | 8 | Coma flotante, 15-16 dígitos significativos |
| Extended | 3.4 x 10^-4932 a 1.1 x 10^4932 | 10 | Coma flotante, 19-20 dígitos significativos |
| Comp | -9223372036854775808 a 9223372036854775807 | 8 | Enteros de 64 bits con signo, 19-20 dígitos significativos |
| Currency | -922337203685477.5808 a 922337203685477.5807 | 8 | Enteros con 4 decimales, 19-20 dígitos significativos |
| Char | Un caracter de 1 byte | 1 | Un caracter de 1 byte (Ansi) |
| AnsiChar | " | 1 | " |
| WideChar | Un caracter de 2 bytes | 2 | Un caracter de 2 bytes (Unicode) |
| String | Depende del S.O. 255 caracteres ilimitado | Cadena de caracteres en sistemas de 16 bits en sistemas de 32 bits | |
| ShortString | 1 a 255 caracteres | Cadena de caracteres, de un máximo 255 caracteres | |
| AnsiString | 1 a 255 caracteres | Cadena de caracteres | |
| PChar | Puntero a una cadena de caracteres ASCIIZ (terminada en Null) | ||
| PAnsiChar | " | ||
| PWideChar | Puntero a cadena Unicode | ||
| Pointer | Puntero | ||
| Variant | Admite cualquier tipo de datos |
Cómo declarar variables y asignarle datos:
Ya hemos visto los tipos "predefinidos", en su momento veremos cómo crear los nuestros propios.
Ahora vamos a declarar variables que sean capaces de guardar valores de los tipos indicados, o al menos de algunos de ellos.
Ya sabes que para poder almacenar "temporalmente" un valor, necesitamos una variable, según el tipo de ésta, podrá almacenar ciertos valores, en el caso del tipo Variant, se podrá asignar cualquier tipo, el Delphi se encarga automáticamente de usar el tipo adecuado.
Declarar variables:
var:
v : Variant;
i : Integer;
d : Double;
s : String;
begin
v := 100;
i := 25000;
d := 123.456
s := 'Hola Mundo';
end;
Para declarar más de una variable de un mismo tipo, se hará así:i1, i2, i3 : IntegerEs decir, separando las variables con una coma.
http://www.elguille.info/delphi/CURSO/DELPHI01.HTM
visual basic
Los distintos tipos de variables utilizados en Visual Basic son:
Integer
|
Valor Entero
|
2 Bytes
|
Long
|
Valor Entero Largo
|
4 Bytes
|
Single
|
Valor Real
|
4 Bytes
|
Double
|
Valor Real Doble
|
8 Bytes
|
String
|
Carácter (texto)
|
1 Byte por carácter
|
Byte
|
Byte
|
1 Byte
|
Boolean
|
Valor Booleano (1/0)
|
2 Bytes
|
Currency
|
Monedas y Punto Fijo
|
8 Bytes
|
Date
|
Fecha
|
8 Bytes
|
Object
|
Referencias a objetos
|
4 Bytes
|
Variant
|
Cualquiera
|
16-22 Bytes
|
Estas formas son extensibles para las variables tipo Integer, Long, Single, Double, String y Currency.
Integer %
Long &
Single !
Double #
String $
Currency @
Integer %
Long &
Single !
Double #
String $
Currency @
De esta forma, podemos escribir el siguiente código:
Private Sub Command1_Click()
Sum% = 3 + 4
Num# = 32 / Sum%
Label1 = Num#
End Sub
Private Sub Command1_Click()
Sum% = 3 + 4
Num# = 32 / Sum%
Label1 = Num#
End Sub
No hay comentarios:
Publicar un comentario