adjuntar documentos de word

[Casimiro Noteví]

Más o menos es algo así:

procedure TForm1.Button4Click(Sender: TObject);
var
st:Tstream;
begin
st  := TMemoryStream.Create;
clNotas.SaveToStream(st);
  with saa do
  begin
    Params[0].Value := clID_AFILIADO.Value;
     Params[1].Value := clDOCUMENTO.Value;
    Params[2].Value :=  clNOMBRE.Value;
    Params[3].Value := clAPELLIDOS.Value;
     Params[4].Value := clTELEFONOS.Value;
    Params[5].LoadFromStream(st,ftBlob);
    ExecuteMethod
  end;
st.free
end;