Hola
Código Delphi
[-]
QueryDataModule.CiudadZQuery.Sql.Text:= 'Select * from ciudad where ciudad.Ciudad like '''+CiudadEdit.Text+'%''';
QueryDataModule.CiudadZQuery.Open;
While not QueryDataModule.CiudadZQuery.Eof do
begin
ListBox1.Items.Add(QueryDataModule.CiudadZQuery.Fields[0].Text);
QueryDataModule.CiudadZQuery.Next;
end;
QueryDataModule.CiudadZQuery := False;
end;
Fields[0] seria el primer campo de la tabla, se tiene que poner el campo correcto (0,1,2 etc....), o en tal caso el nombre con FileByName.
Saludos