[Nelet]

No se si he entendido bien lo que quieres hacer, pero pienso que podrías probar algo como esto, después de asignar el nombre del procedimiento. Sustituyendo el ADOQuery por ADOStoredproc.

procedure TForm1.Button1Click(Sender: TObject);
var
   parametros:TParameters;
begin
  parametros:=AdoQuery1.Parameters; //recoges los parametros definidos en diseño
  AdoQuery2.Parameters:=parametros; //se los asignas al objeto que quieras.
  AdoQuery2.Parameters.ParamByName('SOC').Value:='01';
  AdoQuery2.SQL:=AdoQuery1.SQL;
end;

Suerte.