Ver Mensaje Individual
  #1  
Antiguo 17-06-2015
franco_cvm franco_cvm is offline
Miembro
NULL
 
Registrado: abr 2015
Posts: 20
Reputación: 0
franco_cvm Va por buen camino
¿Que esta indicando esta expresión?

Hola, navegando por Internet, encontré un código de lista de punteros y me surgió curiosidad de la forma en que escribió una sentencia de WHILE, donde la variable bandera es un booleano:
Código Delphi [-]
While (bandera) do
yo siempre estaba acostumbrado a poner
Código Delphi [-]
While (bandera=false) do
o esta
Código Delphi [-]
While (bandera=true) do

¿que significa cuando la variable esta sola?

acá el código completo, ordena la lista de menor a mayor según la información de los nodos:
Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var
  ULT,X,Y,Z: pnodo;
  bandera:Boolean;
  aux:integer;
BEGIN
ULT:=nil;
bandera:=True;
While (bandera) do
  Begin
    X:=CZO^.prox;
    Y:=X^.prox;
    bandera:=False;
    While (Y<>ULT) do
      begin
        if (X^.data)>(Y^.data) then
          begin
            bandera:=true;
            aux:=x^.data;
            X^.data:=Y^.data;
            Y^.data:=aux;
          end;
        X:=Y;
        Y:=Y^.prox;
      end;
      if (Y=ULT) then
          ULT:=X;
    End;
   Z:=CZO;
While (Z^.prox)<>nil do
  begin
  Z:=Z^.prox;
  memo2.Lines.Add(inttostr(Z.data));
  end;
END;
Responder Con Cita