CYFROWY BARON • PROGRAMOWANIE

Program juz mam.
Pobieram maile, wyświetlam mail w ListView w ktorym mam kolumny, Nadwaca, temat, Data, klikając na pobranego maila wyswietlam jego zawartosc o ile nie jest ona w HTML w o okienku MEMO, i teraz moje pytanie jest takie.
Jak zapisać daną wiadomość na dysku z rozszerzeniem EML, czy mam to zapisywać poprzez ListView czy tez przez Memo np z użyciem SaveDialog.
Drugie pytanie juz mniej ważne. Jak zrobić aby wiadomosc w html wyswietlała sie w MEMO?

invert napisał(a):czy mam to zapisywać poprzez ListView czy tez przez Memo np z użyciem SaveDialog.

Savedialog wyświetla tylko okienko i zwraca odpowiednie parametry np. ścieżka. Możesz połączyć te dwie możliwości.

invert napisał(a):Jak zrobić aby wiadomosc w html wyswietlała sie w MEMO?

Nie ma takiej możliwości. W memo możesz mieć tylko czysty tekst.

wargo napisał(a):Savedialog wyświetla tylko okienko i zwraca odpowiednie parametry np. ścieżka. Możesz połączyć te dwie możliwości.

OK, jak sie wogole do tego zabrać. Niemam pojęcia jak to ruszyć.

wargo napisał(a):Nie ma takiej możliwości. W memo możesz mieć tylko czysty tekst.

W takimrazie za pomocą czego moge wyświetlać wiadomosci w HTML i TXT?

Jeśli wiadomość, a właściwie sama część body wiadomości jest w formacie HTML możesz wyświetlić ją w komponencie typu TCppWebBrowser jesli chcesz uzyskać wygląd strony HTML.

Kolego! Jeżeli nie wiesz jak działa SaveDialog to chyba za wcześnie na taki program, najpierw powinieneś poznać podstawy.

Przykład użycia komponentu SaveDialog:

Kod: Zaznacz cały

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   if(SaveDialog1->Execute())
   {
    Memo1->Lines->SaveToFile(SaveDialog1->FileName);
   }
}


---

Co do formatu EML, to jest to format pliku Outlook'a, zawierający jakieś tam formatowanie. Żeby zapisać cokolwiek w tym formacie, trzeba najpierw rozpracować, czyli zapoznać się ze sposobem formatowania tegoż pliku i stworzyć algorytm zapisujący pliki w takimże formatowaniem. Nie znam tego modelu formatowanie i nie znam żadnej biblioteki, która by udostępniała takież formatowanie.
Możesz równie dobrze stworzyć własny format pliku zawierający takie formatowanie jakie sam wymyślisz i zapisywać wiadomości w tym formacie.
Nie jest tak, ze wszystkie programy pocztowe zapisują wiadomości z wykorzystaniem formatu Outlook'a, np. Thunderbird wykorzystuje własne, zupełnie inne formatowanie pliku.

Darek_C++ napisał(a):Co do formatu EML, to jest to format pliku Outlook'a, zawierający jakieś tam formatowanie. Żeby zapisać cokolwiek w tym formacie, trzeba najpierw rozpracować, czyli zapoznać się ze sposobem formatowania tegoż pliku i stworzyć algorytm zapisujący pliki w takimże formatowaniem. Nie znam tego modelu formatowanie i nie znam żadnej biblioteki, która by udostępniała takież formatowanie.
Możesz równie dobrze stworzyć własny format pliku zawierający takie formatowanie jakie sam wymyślisz i zapisywać wiadomości w tym formacie.
Nie jest tak, ze wszystkie programy pocztowe zapisują wiadomości z wykorzystaniem formatu Outlook'a, np. Thunderbird wykorzystuje własne, zupełnie inne formatowanie pliku.

Dziekuje ci bardzo za odpowiedz. Mam jeszcze takie pytanie. Czy masz moze przykładowy algorytm zapisu maila do jakiegos formatu?
Wczoraj jeszcze udało mi sie zapisac do pliku zawartosc listView ale nawet jak zmienie rozszerzenie na eml to zaden prorgram pocztowy odczytuje plik jako pusty.
Ewentualnie, zapis całego maila czyli całe źródło, do pliku txt.

Myliłem się. EML to tylko rozszerzenie, możesz zapisać wiadomość jako plik tekstowy lub z formatowaniem HTML nadając takiemu plikowi rozszeżenie EML i już będzie rozpoznawane przez programy.

Zapisanie zawartości Memo do pliku tekstowego podałem Tobie w poprzednim poście:

Kod: Zaznacz cały

    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
       if(SaveDialog1->Execute())
       {
        Memo1->Lines->SaveToFile(SaveDialog1->FileName);
       }
    }


Jednakże plik EML powinien zawierać przed treścią wiadomości informacje nagłówka, np:





Jeżeli nie dodasz nagłówka i zapisze tylko zawartość Memo do pliku i nadasz mu rozszerzenie EML to i tak zostanie on rozpoznany przez Outlooka jako wiadomość e-mail, jednak nie bzie zawierała takich informacji jak: Od Data Do Temat

Poczytaj działy: porady
   ListBox
   ListView
   TStringList
   TRichEdit & Memo

Zawartość wyswietlam w Memo o ile wiadomosc jest wyslana jako txt. I po zapisie w formacie eml jest bez problemu odczytywana przez program pocztowy

Udało mi się zapisać ListView do pliku txt, ale jak juz go przekształcę na eml to w programie pocztowy nic nie jest wyświetlane. Teraz jak pobrać ten nagłówek

Udało mi się zapisać ListView do pliku txt, ale jak juz go przekształcę na eml to w programie pocztowy nic nie jest wyświetlane. Teraz jak pobrać ten nagłówek

Trzeba przepisać zawartość wiersza obiektu ListView do np. obiektu typu TStringList, potem dodać do tego jeszcze zawartość Memo i całość zawartą w TStringList zapisać do pliku:

Kod: Zaznacz cały

//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
TStringList *tmp = new TStringList;
__int16 x = ListView1->ItemIndex;

  if(x < 0) return;

tmp->Add(ListView1->Items->Item[x]->Caption);
// dalsza częśc zależy od liczby kolumn w ListView1
tmp->Add(ListView1->Items->Item[x]->SubItems->Strings[0]);
tmp->Add(ListView1->Items->Item[x]->SubItems->Strings[1]);
// wstawienie pustej lini
tmp->Add("");
// dodawanie zawartości obiektu Memo1
tmp->Add(Memo1->Lines->Text);

if(SaveDialog1->Execute())
{
  tmp->SaveToFile(SaveDialog1->FileName);
}
delete tmp;
}
//---------------------------------------------------------------------------


---

Nie rozumiem jak możesz tworzyć program pocztowy mając tak niewielką wiedzę o programowaniu. Chyba powinieneś najpierw poćwiczyć.
Co co tutaj wyjaśniam, to są podstawy.

Dziekuję za pomoc, program juz skonczyłem, zostało mi tylko wyświetlenie wiadomości wysłanej w html przez komponent CppWebbrowser.
W jednym z twoich porad zauwazylem taki kod:

CppWebBrowser->Navigate(WideString("about:blank")); // wypełnienie kontrolki pustą stroną.
TMemoryStream *stm = new TMemoryStream();
Memo1->Lines->SaveToStream(stm);

IPersistStreamInit *psi;
stm->Seek(0, 0);

TStreamAdapter *sa = new TStreamAdapter(stm, soReference);

if(SUCCEEDED(CppWebBrowser->Document->QueryInterface(IID_IPersistStreamInit, (void **)&psi)))
psi->Load(*sa);

delete stm;

zaadoptowałem go do programu. Wyświetla wiadomość z Memo, ale nie tak jak powinien mianowicie.
Gdy zaznaczę wiadomość i nacisnę Button "Wyświetl" to wyświetli elegancko wiadomość w HTML, natomiast gdy chce zobaczyć druga wiadomość to juz nie zostaje ona wyświetlona, cały czas jest pusta strona w CppWebbrowser.