• Registered: 2015-04-04
  • Posts: 262

Topic: mailto

Ув. Админ. Есть такой скрипт:
procedure frmMain_Button1_OnClick (Sender: string; var Cancel: boolean);
    begin
        OpenFile('mailto:'+frmMain.Label3.Caption+'?Subject='+'Кормандон: фармоиши калиди барнома'+'&Body='+frmMain.Edit6.Text+'&Body='+frmMain.Edit7.Text+'&Body='+frmMain.Edit8.Text);
    end;

При frmMain_OnShow:
frmMain.Edit3.Text:= GetUserName;
frmMain.Edit8.Text:=frmMain.Edit3.Text;

Теперь когда нажимаю на Button1 открывается Outlook. В поле Адрес данные берутся из frmMain.Label3.Caption. В поле Тема данные берутся из ?Subject='+'Кормандон: фармоиши калиди барнома'. В поле Тело т.е. Body имеется только данные из frmMain.Edit8.Text. Проблема в том что нет данных из frmMain.Edit6.Text и frmMain.Edit7.Text, которые изначально пусты и наполняются юзером.
Почему так происходит?

  • Registered: 2014-02-14
  • Posts: 10,294

Re: mailto

Попробуйте так

OpenFile('mailto:'+frmMain.Label3.Caption+'?Subject='+'Кормандон: фармоиши калиди барнома'+'&Body='+frmMain.Edit6.Text+' '+frmMain.Edit7.Text+' '+frmMain.Edit8.Text);
Dmitry.