Saber si existe algún TComboBox o un TEdit sin llenar.

[jorge82]

A ver si así te sirve:

Código Delphi [-]
for I := ControlCount-1 downto 0 do
    if Controls[i] is TComboBox then
    begin
      if TComboBox(Controls[i]).Text = '' then
        TComboBox(Controls[i]).Color := clRed;
    end
    else if Controls[i] is TEdit then
    begin
      if TEdit(Controls[i]).Text = '' then
        TEdit(Controls[i]).Color := clRed;
    end;

Saludos.

[Roilo]

Hola Jorge.
tu código se acerca más, pero no me pone en rojo a ninguno de los TEdit o TCombobox que dejo sin llenar.
Gracias por la luz, seguiremos en contaco.