Форум: "Основная";
Текущий архив: 2004.12.12;
Скачать: [xml.tar.bz2];
Внизмемо Найти похожие ветки
← →
Гриша (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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.044 c