Tema: VAR y CONST?
Ver Mensaje Individual
  #10  
Antiguo 16-03-2005
alfredosg19 alfredosg19 is offline
Miembro
 
Registrado: ene 2005
Ubicación: Barcelona
Posts: 91
Reputación: 20
alfredosg19 Va por buen camino
Variable Boolean.

Hola, sobre las variables Boolean, a ver comienzo con un ejemplo que se verá más fácil. Son variables que solo tienen dos posibilidades o son True o False, es decir o Verdadero o Falso. Aquí lo verás más claro:

Cita:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Buttons;

type
TForm1 = class(TForm)
SpeedButton1: TSpeedButton;
procedure SpeedButton1Click(Sender: TObject);
private
{ Private declarations }
public
sino: Boolean;
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
if sino=False then
begin
sino:=True;
Showmessage('Falso');
end
else
begin
sino:=False;
Showmessage('Verdadero');
end;
end;

end.
A mí me resultan muy útiles, por ejemplo para reservas de mesas (ocupadas o desocupadas), para usuarios (usuario desconectado, usuario en pausa), tiene infinidad de utilidades y más si empezamos a hablar de funciones(functions)..

Ha el StrtoInt es una función de Delphi para pasar un texto (de número porque si son letras saldrá un error) numérico a números enteros, también se puede hacer al revés InttoStr, por ejemplo para mostrar en pantalla resultados de operaciones matemáticas. Ejemplo:
Cita:
var
a,b: integer
begin
a:=2;
b:=3;
Showmessage(InttoStr(a+b));
end;
si no el pones el InttoStr el programa dice incompatibles tipes.
También tenemos el CurrtoStr para pasar de números con decimales a String y viceversa (StrtoCurr). El FloattoStr para pasar números con más de cuatro decimales a String y viceversa.. y si hay más yo no las uso.
Espero que te haya servido de ayuda mi aportación.

Pta. Estamos haciendo una buena ayuda sobre variables en este hilo.
__________________
"La perseverancia es el camino del éxito"
Responder Con Cita