Ver Mensaje Individual
  #3  
Antiguo 03-07-2015
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola rufo.

Podes hacerte un procedimiento para refrescar el combo cada vez que lo precises
Código Delphi [-]
procedure RefreshComboBox(CB: TComboBox; aDataSet: TDataSet; const aFieldName: string);
begin
  CB.Items.Clear;
  with  aDataSet do
  begin
    First;
    while not aDataSet.Eof do
    begin
      CB.Items.Add(FieldByName(aFieldName).AsString);
      Next;
    end;
  end;
  CB.ItemIndex := 0;
end;

Un ejemplo de uso:
Código Delphi [-]
procedure TtuForm.tuDataSetAfterPost(DataSet: TDataSet);
begin
  RefreshComboBox(ComboBox1, tuDataSet, 'NOMBRE_DE_LA_COLUMNA'); // (*)
end;
(*) Donde, 'NOMBRE_DE_LA_COLUMNA' deberás reemplazarlo por el nombre de columna que usaste para cargar el combo.

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita