Fórum e-mail com anexo no Indy #253993
11/10/2004
0
Boa tarde amigos,
Estou precisando anexar anexos em e-mail que envio usando o componente Indy.
Estou recebendo a seguinte mensagem de erro no momento de compilar o sistema: ´Too many actual parameters´
Ja tentei escrever o código de duas maneiras distintas:
1.
if BuscarAnexos.Execute then
begin
TIdAttachment.Create(IdMensagem.MessageParts, OpenDialog1.FileName);
ResetAttachmentListView;
end;
2.
TIdAttachment.Create(IdMensagem.MessageParts, ´C:\ClubeMG\Teste.txt´);
Em ambas as formas o erro é o mesmo, e a agulha para sempre após a vírgula: TIdAttachment.Create(IdMensagem.MessageParts,...
Qualquer ajuda será muito bem vinda.
Estou precisando anexar anexos em e-mail que envio usando o componente Indy.
Estou recebendo a seguinte mensagem de erro no momento de compilar o sistema: ´Too many actual parameters´
Ja tentei escrever o código de duas maneiras distintas:
1.
if BuscarAnexos.Execute then
begin
TIdAttachment.Create(IdMensagem.MessageParts, OpenDialog1.FileName);
ResetAttachmentListView;
end;
2.
TIdAttachment.Create(IdMensagem.MessageParts, ´C:\ClubeMG\Teste.txt´);
Em ambas as formas o erro é o mesmo, e a agulha para sempre após a vírgula: TIdAttachment.Create(IdMensagem.MessageParts,...
Qualquer ajuda será muito bem vinda.
Vetorzero
Curtir tópico
+ 0
Responder
Posts
11/10/2004
Vetorzero
Uma dica, uma direção, um toque... ou quem sabe até a solução... ajudem aí amigos...
Logo abaixo da primeira mensagem de erro([color=orange:ce50cdcf58]Too many actual parameters[/color:ce50cdcf58]) vem a que se segue: [color=blue:ce50cdcf58]Constructing instance of TIdAttachment containing abstract methods[/color:ce50cdcf58].
Logo abaixo da primeira mensagem de erro([color=orange:ce50cdcf58]Too many actual parameters[/color:ce50cdcf58]) vem a que se segue: [color=blue:ce50cdcf58]Constructing instance of TIdAttachment containing abstract methods[/color:ce50cdcf58].
Responder
Gostei + 0
11/10/2004
Ipc$
Tente criar sem o Filename:
TIdAttachment.Create(IdMensagem.MessageParts); TIdAttachment(IdMensagem.MessageParts[0]).FileName := OpenDialog1.FileName;
Responder
Gostei + 0
15/12/2007
Sitelocal
TIDATTACHMENT.CREATE(IDMSG.MESSAGEPARTS,TFILENAME(´C:\ARQUIVOS DE PROGRAMAS\AUTOCOM.NET\´
+´PvD´+FORMATFLOAT(´00000´,STRTOINT(DMDADOS.CDSVENDASDIR1.FIELDBYNAME(´IDVENDIR´).VALUE))+´.PDF´))
+´PvD´+FORMATFLOAT(´00000´,STRTOINT(DMDADOS.CDSVENDASDIR1.FIELDBYNAME(´IDVENDIR´).VALUE))+´.PDF´))
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)