Jak zasilić ComboBox lub DBComboBox z bazy danych wykorzystując jakieś zapytanie?
Poprosił bym dość jasną instrukcję!!!
0
0
Nie wiem jak jest z zapytaniem bo nie umiem SQL, ale np. kolumnę tabeli do Combobox'a wpisuję tak:
procedure TForm1.Button8Click(Sender: TObject);
begin
Table1.First;
while not Table1.Eof do
begin
Combobox1.Items.Add(Table1.FieldByName('Nazwisko').asString);
Table1.Next;
end; end;
Jak dojdziesz z tym zapytaniem to chętnie popatrzę na kod.
0
MyQuery1.SQL.Clear;
MyQuery1.SQL.Add('Select Distinct Kod From test.test');
MyQuery1.Active := True;
for i := 0 to MyQuery1.RecordCount -1 do
begin
wart := MyQuery1.Fields[0].AsString;;
ComboBox2.Items.Add(wart);
MyQuery1.Next;
end;
Rozwiązanie za pomocą MyDAC ale można tak samo za pomocą innych komponentów...