[[movorack]]

qhubo...

No se si entendí bien pero que tal esto?

Código Delphi [-]
procedure ValidarEdits(Edits : Array of TEdit);
  var
    i : integer;
begin
  for i := 0 to Length(Edits)-1 do
  begin
    Edits[i].Text; //Haces lo que sea con ellos...
  end;
end;

para llamar al procedimiento...

Código Delphi [-]
  ValidarEdits([EditNombre, EditApellido, EditCorreo]);