Текущий архив: 2004.12.12;
Скачать: CL | DM;

Вниз

мемо   Найти похожие ветки 

← →
Гриша   (2004-11-29 17:36) [0]

BEGIN
 for i:=1 to NMPOP31.MailCount do
  begin
   NMPOP31.GetMailMessage(i);
   tempStr:=NMPOP31.MailMessage.Subject;
   if (Pos("03",tempStr)>0) then
    begin
     // bodymail:="";
      for j:=0 to NMPOP31.MailMessage.Body.count-1 do
      bodymail:=(NMPOP31.MailMessage.Body[j]);
      bodymail:= ReplaceStr(bodymail, #13, " ");
      memo5.lines.add("Îò: "+NMPOP31.MailMessage.From+";"+"Òåìà: "+NMPOP31.MailMessage.Subject+";"+"òåëî ïèñüìà: "+bodymail+";");

вот код мне надо в обдну строку в мемо собрать весь текст, тока тело письма не выравниваеться водну строку, она сохраняяет свою структуру, что делать?

---

← →
tormoz   (2004-11-29 18:06) [1]

#13#10   ?

---

← →
Гриша   (2004-11-29 19:02) [2]

не пашет блин написал же

---

Страницы: 1 вся ветка

Текущий архив: 2004.12.12;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.025 c