Announcement

**Alexander Schlemmer** · 03.06.2001, 14:30

Schreib in die Schleife, dass sie einmal mehr durchlaufen soll, vielleicht liegt's daran

**Gast_1** · 03.06.2001, 14:40

hab ich probiert, dann kommt eine fehler meldun

**Gast_1** · 03.06.2001, 14:42

int j, g, h, o; 

g =(Pop->MailCount); // Mailbox Nummer max. 
ProgressBar1->Max = g; // Setzt max auf max. 
 
for(j=1;j<=g;j++) //(mind. 1; solange bis j = g ist; z�hlt hoch) 
{ 
// Wenn Anhang da dann .... 
if (Pop->MailMessage->Attachments->Text != ""){}; 
 
Table3->Insert(); 
 
Memo1->Clear(); 
Memo1->Lines = Pop->MailMessage->Body; 
Memo1->Lines->SaveToFile(regTmp+"\\tmp"); 
Table3Body->LoadFromFile(regTmp+"\\tmp"); 
 
Memo1->Clear(); 
Memo1->Lines = Pop->MailMessage->Head; 
Memo1->Lines->SaveToFile(regTmp+"\\tmp1"); 
Table3Text->LoadFromFile(regTmp+"\\tmp1"); 

Table3->Post(); 
Pop->GetMailMessage(StrToInt(j)); // Aktuelle Mail. 
ProgressBar1->Position = j; // Setzt ProgressBar auf aktuell. 
Label5->Visible = true; // Zeige Label5 (/) 
Label3->Caption = j; // Zeigt Mail Status an. 
Label4->Caption = g; // Zeigt max Mail an. 
}<br&gt

**G�nther Weber** · 03.06.2001, 15:27

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Neue Seite 1</title>
</head>

<body>

<pre>int j, g, h, o;
g =(Pop->MailCount); // Mailbox Nummer max.
ProgressBar1->Max = g; // Setzt max auf max.
for(j=1;j<=g;j++) //(mind. 1; solange bis j = g ist; z�hlt hoch)
{
// Wenn Anhang da dann ....
if (Pop->MailMessage->Attachments->Text != "&quot

{};
// was soll diese Zeile denn bewirken ?
Table3->Insert();
Memo1->Clear();
Memo1->Lines = Pop->MailMessage->Body;
Memo1->Lines->SaveToFile(regTmp+"\\tmp&quot

;
Table3Body->LoadFromFile(regTmp+"\\tmp&quot

;
// Was ist Table3Body ?
Memo1->Clear();
Memo1->Lines = Pop->MailMessage->Head;
Memo1->Lines->SaveToFile(regTmp+"\\tmp1&quot

;
Table3Text->LoadFromFile(regTmp+"\\tmp1&quot

;
// Was ist Table3Text ?
Table3->Post();
Pop->GetMailMessage(StrToInt(j)); // Aktuelle Mail.
// JETZT wird die Mail erst gelesen, aber Du hast sie schon gespeichert ?
// Diese Zeile geh�rt doch wohl an den Anfang der Schleife !
// Im ersten Durchlauf wird Schrott gelesen, der Letzte Durchlauf vernichtet Daten !
ProgressBar1->Position = j; // Setzt ProgressBar auf aktuell.
Label5->Visible = true; // Zeige Label5 (/)
Label3->Caption = j; // Zeigt Mail Status an.
Label4->Caption = g; // Zeigt max Mail an.
}

</pre>

</body>

</html&gt

Announcement

email

email

Comment

Comment

Comment

Comment