Merhaba,
DelphiCan ailesine hoşgeldiniz. DelphiCan ailesine katkı yapmanız temennimizdir.
While döngüsü ile işinizi gerçekleştirebilirsiniz. Kod bloğu aşağıda yer almaktadır.
QueryName.Close;
QueryName.SQL.Clear;
QueryName.SQL.Text := 'SELECT * FROM TABLO_ADINIZ';
QueryName.Open;
QueryName.First;
Listbox1.Items.Clear;
while not QueryName.Eof do
begin
Listbox1.Items.Add(QueryName.FieldByName['ALAN_ADI'].AsString);
QueryName.Next;
end;
QueryName.Close;
end;
N: Yapmış olduğum bileşen setinden alıntıdır. Bileşen setin Combobox bileşeni için mevcuttu. Listbox için denenmedi. Öngörüme göre sorunsuz çalışması gerekmektedir.
İyi çalışmalar.