VAR y CONST?

[alfredosg19]

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:

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:

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.

[unko!]

oooh... entonces las var sirven para decirle al programa ke se trataran de X dato... pero despues le pones el dato ke kieres ke almacenen dependiendo de la funcion ke le diste... yeah! lo se!!!


PD---> teienes razon... es una MUY BUENA aportacion

[unko!]

intente practicar eso de las VAR y CONST y me falla... algo me falta y no se ke es....

tengo uas preguntas mas...

¿Donde se declaran las VAR?
¿Donde se declaranlas CONST?

como kedaria el codigo si kiero ke cada 5 seg el label cambie de 0 a 1... (incrementando 1 cada que pasen 5 seg del timer)

thanx salu2!

[mamcx]

Chico, si lees algo de Ingles visita http://www.delphibasics.co.uk/ es todo muy bien explicado y con ejemplos. En las ayudas tambien esta el manual del lenguaje donde se explica con lujo de detalles todos estas cosas.

[unko!]

es lo uniko ke me falta saber