Daten aus Datenbank in Combobox

[BluesKid]

Delphi-Quellcode:

with TPersonal do begin
  first;
  while not eof do begin
    combobox1.items.add(fieldbyname('name').text);
    next;
  end;//while
end;//with