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:
yo siempre estaba acostumbrado a poner
o esta
¿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;