Текущий архив: 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.44 MB
Время: 0.043 c