Mail angang mit Indy empfangen

[snapman]

Hallo,
ich möchte meine Mail anhänge die ich mit der indy pop3 komponente bekomme abspeichern.
nun habe ich versucht mal zu schauen wie das mit dem demo geht das bei indy bei ist, nur da kommt immer nur access violation!!

könnt ihr mir weiterhelfen, vielleicht habt ihr sowas schonmal gemacht oder habtn beispiel!

is echt wichtig leute!! danke!!


was noch anzumerken wäre:
es handelt sich um kein direktes attatchment sondern um ein bild was in eine html mail eingefügt wurde!

[snapman]

habs selber gefunden!!
das indy demo in den delphi demos geht, das auf der HP von indy nicht!!


{display message parts we selected}
if lvMessageParts.Selected <> nil then
begin
if lvMessageParts.Selected.Index > Msg.MessageParts.Count then
begin
MessageDlg('Unknown index', mtInformation, [mbOK], 0);
end
else
begin
for i := 0 to Msg.MessageParts.Count - 1 do begin
if Msg.MessageParts.Items[i] is TIdAttachment then begin
if SaveDialog1.Execute then
TIdAttachment(Msg.MessageParts.Items[i]).SaveToFile(
SaveDialog1.FileName);
break;
end;
end;
end;
end;