Cita:
Empezado por Casimiro Notevi
¿Qué más ayuda quiéres, DANIEL1818? si te ha puesto el código, solamente tienes que sustituir "tuDataset" por el nombre del tuyo (dm.subasta)
|
Ciertamente...
Daniel, mi pregunta sobre el componente apuntaba a que resulta mas simple de ver (y seguramente mas eficiente) filtrar los resultados antes de cargar el combo, para tu caso:
Código Delphi
[-]
...
with DM.Subastas do
begin
Close;
Open;
Filtered := False;
Filter := Format('NOMBRE_USUARIO = %s AND FECHA_FIN < %s', [MiNombre, DateToStr(Date)]);
Filtered := True;
DisableControls;
try
while not Eof do
begin
ComboBox1.Items.Add(FieldByName('TITULO').AsString);
Next;
end;
finally
EnableControls;
Filtered := False; end;
end;
ComboBox1.ItemIndex := 0;
end;
Saludos