Cita:
Empezado por Chichero
Gracias hermano eso lo coloco antes del for?
|
Hola Chichero, tiene que estar dentro del for, pero primero tienes que darle valores (1,2,3....) a la propiedad Tag de cada comboBox ya que por defecto es 0.
Código Delphi
[-]
Ape:= StrToFloat(Edit1.Text)
for i:= 0 to ComponentCount -1 do
if Components[i] is TComboBox then
with TComboBox(Components[i]) do
if Tag in [1..4] then
begin
if ItemIndex <> -1 then
begin
..........................................
..........................................
Saluditos