ESPERO ESTE EJEMPLO TE SIRVA HAGO UNA CONSULTA Y EL RESULTADO LO AGREGO AL COMBO ....
//hago la consulta..
Código Delphi
[-]
with QUERY1 do
begin
close;
sql.clear;
sql.add('SELECT * FROM CLIENTES');
execSQL;
open;
end;
COMBOBOX1.Clear; COMBOBOX1.Items.Add('TODOS');
QUERY1.First;
WHILE NOT (QUERY1.EOF) DO
BEGIN
COMBOBOX1.Items.Add(QUERY1.FieldValues['CLIENTE']);
QUERY1.Next;
end;
SALUDOS...