Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 11
  1. #1

    (Delphi 7) eliminare informazioni di versione

    io sto utilizzando il componente Indy SMTP e Message ma non riesco a eliminare i dati riguardo alla versione, ogni volta che invio una email nel sorgente si legge che è stato inviato con Indy 9.0 ho letto nel manuale ma più di questo non sono riuscito a trovare mi potete dare una mano?

    Identifies the version number for the Indy component suite.
    Pascal
    property Version: string;
    Description
    Version is a read-only String property that identifies the version number for the Internet Direct (Indy) components installed on your computer.
    Version returns the value specified in gsIdVersion in the return value.
    See Also
    TIdBaseComponent.GetVersion
    gsIdVersion

    Segue...

    Version number for Indy component suite.
    Pascal
    function GetVersion: string;
    Returns
    String - version number for the Indy component suite.
    Description
    GetVersion is a String function used as the read access specifier for the Version property and returns the Internet Direct (Indy) version number for the components installed on your computer.
    GetVersion returns the value specified in gsIdVersion as the return value.
    See Also
    TIdBaseComponent.Version

  2. #2
    puoi modificare il sorgente o una sua copia
    ciao
    sergio

  3. #3

    Re: (Delphi 7) eliminare informazioni di versione

    ogni volta che invio una email nel sorgente si legge che è stato inviato con Indy 9.0
    Dove lo vedi esattamente?

    Hai provato a settare la proprietà MailAgent?

    HTH,

  4. #4
    a me sembra che si possa fare solo modificando il sorgente, io avevo fatto così una volta che mi è capitato di usarlo
    ciao

  5. #5
    Può darsi (anche se mi sembra molto strano). Però io ho appena provato e "Indy 9.0" non lo vedo da nessuna parte nel messaggio ricevuto. Anche vedere un po' di codice non guasterebbe...

  6. #6
    se vai sulle opzioni di visualizzazione è possibile vedere il sorgente dell'email e li trovi la voce indy 9 io questa informazione la voglio eliminare, in quale sorgente devo vedere nel mio o in quello dell'indy? se indy qualè il file sorgente da modificare?

  7. #7
    se vai sulle opzioni di visualizzazione è possibile vedere il sorgente dell'email e li trovi la voce indy 9
    Sì, questo lo sapevo, grazie, ma come ho già detto ho verificato e a me quella stringa non compare. Quello che ti ho chiesto è in quale punto del messaggio trovi la voce "Indy". Se ad esempio la trovi come valore del tag "X-Mailer" (o qualcosa di simile) puoi modificare quella voce con la proprietà MailAgent.

    Se posti un po' di codice potrebbe essere più facile aiutarti.

  8. #8
    codice:
    From - Wed Oct 14 20:09:21 2009
    X-Account-Key: account2
    X-UIDL: ALVoUtQAADlUStYTwA0oFXW0c88
    X-Mozilla-Status: 0001
    X-Mozilla-Status2: 00000000
    X-Mozilla-Keys:                                                                                 
    X-Apparently-To: camaleonteplus@yahoo.it via 212.82.104.181; Wed, 14 Oct 2009 11:09:04 -0700
    X-YahooFilteredBulk: 62.13.171.46
    X-YMailISG: xel7RXgWLDtpoyaHFTEPwG1jbzJ6o43nwbUat32ALxoLXK3k1IHoz_drD1Y7beGLprCno7zXfgo7HMWtyGckh_TdhhvIj9ZeBRra4msb21gGJcYSDNRZnISNeuHrwyXJtKn8FPZx4yevP4wxWAqtg2.ahJ8Brtk7L1vFqnarzmJ5i0XdpUyEj54hDcC9kZIKvuGcYaNw8sji3S7vcKNeBaUtFbVo2_m8bF6XbeHolpF40Vs_JlIgwVyETjcTBXghW4p_WdxcfKZ0rGy8dmzl60li4Cav0NMcTm5Hyw--
    X-Originating-IP: [62.13.171.46]
    Authentication-Results: mta1056.mail.sp2.yahoo.com  from=yahoo.it; domainkeys=neutral (no sig); from=yahoo.it; dkim=neutral (no  sig)
    Received: from 127.0.0.1  (EHLO relay2.tre.it) (62.13.171.46)
      by mta1056.mail.sp2.yahoo.com with SMTP; Wed, 14 Oct 2009 11:09:04 -0700
    Received: from miummr0mt01.um.ced.h3g.it ([10.216.58.129])
    	by relay2.tre.it  with ESMTP id n9EI8t0A004163
    	for <camaleonteplus@yahoo.it>; Wed, 14 Oct 2009 20:08:55 +0200
    Received: from Indy ([94.161.184.99])
    	by miummr0mt01.um.ced.h3g.it (MOS 3.6.5-GR)
    	with ESMTP id BPT44449;
    	Wed, 14 Oct 2009 20:08:29 +0200 (CEST)
    Message-Id: <200910141808.BPT44449@miummr0mt01.um.ced.h3g.it>
    From: "prova" <prova@yahoo.it>
    Subject: Indy
    To: camaleonteplus@yahoo.it
    Date: Wed, 14 Oct 2009 20:08:55 +0200
    X-Priority: 3
    X-Library: Indy 9.00.10
    X-Mailer: Thunderbird
    X-Antivirus: avast! (VPS 091013-0, 13/10/2009), Inbound message
    X-Antivirus-Status: Clean
    Prova Indy
    Come puoi notare compare in X-Library: Indy 9.00.10

  9. #9
    codice:
    X-Mozilla-Status: 0001
    X-Mozilla-Status2: 00000000
    
    X-Library: Indy 9.00.10
    X-Mailer: Thunderbird
    Scusa, ma sei sicuro che questo messaggio è stato inviato direttamente da Delphi tramite Indy?

    Hai provato con il metodo QuickSend?

    Prova a postare il codice che usi.

  10. #10
    Preferisco Indy perchè più completo per le mie neccessità posto il mio codice.
    codice:
    procedure TForm1.SpedisciClick(Sender: TObject);
    begin
      SMTP.Host := Server.Text;
      SMTP.Port := StrToInt(ServerPort.Text);
    if None.checked= true then begin
    Smtp.AuthenticationType := atNone;
    end;
    if Login.checked= true then begin
    Smtp.AuthenticationType := atLogin;
    end;
       SMTP.MailAgent := Agent.Text;
       SMTP.HeloName:= Helo.Text;
    if EhloAttivo.checked= True then begin
       SMTP.UseEhlo:= True;
    end;
    if EhloDisattivato.checked= True then begin
       SMTP.UseEhlo:= False;
    end;
    if Massima.checked= true then begin
       MailMessage.Priority := TIdMessagePriority (mpHighest);
    end;
    if Alta.checked= true then begin
       MailMessage.Priority := TIdMessagePriority (mpHigh);
    end;
    if Normale.checked= true then begin
       MailMessage.Priority := TIdMessagePriority (mpNormal);
    end;
    if Bassa.checked= true then begin
       MailMessage.Priority := TIdMessagePriority (mpLow);
    end;
    if Minima.checked= true then begin
       MailMessage.Priority := TIdMessagePriority (mpLowest);
    end;
       MailMessage.From.Address := Da.Text;
       MailMessage.From.Name := Nome.Text;
       MailMessage.Organization := Org.Text;
       MailMessage.Recipients.EMailAddresses :=
       A.Text + ' ' + Lista.Text;
       MailMessage.CCList.EMailAddresses := CC.Text;
       MailMessage.BccList.EMailAddresses := Ccn.Text;
       MailMessage.Subject := Oggetto.Text;
       MailMessage.Body.Text := Messaggio.Text;
    if FileExists(Allegato.Text) then
       TIdAttachment.Create(MailMessage.MessageParts, Allegato.Text);
    try
    try
       SMTP.Connect(10000);
       SMTP.Send(MailMessage);
    except on E:Exception do
       ShowMessage('Errore: ' + E.Message);
    end;
    finally
    if SMTP.Connected then
       SMTP.Disconnect;
       StatusBar.Panels[2].Text:='Email Inviata';
       MessageBeep(20);
    end;
    end;

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.