Código Delphi [-]
MiLista.Items.Clear;
MiDataset.First;
while not MiDataset.Eof do
begin
MiLista.Items.Add(Midataset.Fieldbyname('Micampo').AsString);
Midataset.Next;
end;
__________________
...Yo naci en esta ribera del arauca vibr@d0r
Soy hermano de la espuma,
de la garza, de la rosa y del sol...
Viva Venezuela
|