Solo acceder a componentes de un TPanel

[ecfisa]

Hola gcaffe.

Para aclarar el concepto, revisá este [ hilo ].

Entonces podría ser:

Código Delphi [-]
  with PanSvr do
    for i := 0 to ControlCount - 1 do
    begin
      if (Controls[i] is TLabel) then
      begin
        TLabel(Controls[i]).Left := MapaIzq.Value;
        TLabel(Controls[i]).Top := MapaArr.Value;
        TLabel(Controls[i]).Caption := MapaTexto.Value;
        TLabel(Controls[i]).Width := MapaAncho.Value;
        TLabel(Controls[i]).Visible := MapaVisible.Value;
      end
      else if (Controls[i] is TEdit) then
      begin
        TEdit(Controls[i]).Left := MapaIzq.Value;
        TEdit(Controls[i]).Top := MapaArr.Value;
        TEdit(Controls[i]).Width := MapaAncho.Value;
        TEdit(Controls[i]).Visible := MapaVisible.Value;
        TEdit(Controls[i]).TabOrder := MapaOrden.Value;
      end;
    end;

Saludos.