Código Delphi [-] with DataModule.Tabla do begin Open; while not Eof do begin if GroupBox.ItemIndex = 0 then ComboBox1.Values.Add(DataModulo.TablaCampo1.AsString) else ComboBox1.Values.Add(DataModulo.TablaCampo2.AsString); Next end end
with DataModule.Tabla do begin Open; while not Eof do begin if GroupBox.ItemIndex = 0 then ComboBox1.Values.Add(DataModulo.TablaCampo1.AsString) else ComboBox1.Values.Add(DataModulo.TablaCampo2.AsString); Next end end