Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Drag and Drop Outlook Anhang (https://www.delphipraxis.net/204130-drag-drop-outlook-anhang.html)

oakley 26. Apr 2020 18:24

Drag and Drop Outlook Anhang
 
Hallo zusammen,

ich experimentiere noch mit der Drag and Drop Suite herum und bin bei den Adaptern angekommen.
Das TOutlookDataFormat erlaubt mit ganze Emails zu droppen und den Inhalt aus zu lesen.
Ich möchte gerne versuchen, das gleiche nur mit den Anhängen hin zu bekommen.
Also einen Anhang aus Outlook in eine Treelist ziehen zum Beispiel.
Ich glaube das geht mit TOutlookDataFormat nicht oder?
Ich habe mir zu die VirtualFile Demo angeschaut und die Inhalte des Clipboards als Stream in eine Datei schreiben lassen.
funktioniert gut, aber immer nur eine Datei nach der anderen.

Kennt sich jemand mit den Komponenten aus und könnte mir bitte helfen?

LG

Mirko

jottel 7. Mai 2020 15:40

AW: Drag and Drop Outlook Anhang
 
Hallo Mirko,
Ich teste gerade die D&D Suite, denn ich will (fast) das gleiche Problem lösen:
Die Dateinamen der Attachments erhälst du per TVirtualFileStreamDataFormat.FileNames.
Ich suche jetzt noch nach der Möglichkeit die Attachments zu speichern.
Hast du das schon gelöst?

Jottel

oakley 16. Mai 2020 18:43

AW: Drag and Drop Outlook Anhang
 
Hallo Jottel,

ja den Stream schreibe ich in eine Datei.

procedure TFormMain.DropFileTarget1Drop(Sender: TObject;
ShiftState: TShiftState; Point: TPoint; var Effect: Integer);
var testfs : TFilestream;
begin
testfs := TFileStream.Create ('c:\temp\'+FTargetDataFormat.FileName, fmCreate);
testfs.Position := testfs.Size;
testfs.Write(PChar(FTargetDataFormat.Contents)^, length(FTargetDataFormat.Contents));
testfs.Free;
end;

Nur habe ich das Problem, dass ich damit immer nur eine Datei schreiben kann.
FTargetDataFormat.Contents beherbergt den Inhalt der zu schreibenden Datei.

LG

Mirko

zeras 17. Mai 2020 08:47

AW: Drag and Drop Outlook Anhang
 
Mal ne Frage zwischendurch.
Wo finde ich die entsprechende Suite?

oakley 17. Mai 2020 12:13

AW: Drag and Drop Outlook Anhang
 
Hallo Zeras,

die aktuellste Version für 10.3 Rio findest Du hier: https://github.com/DelphiPraxis/The-...ite-for-Delphi

LG

Mirko


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:51 Uhr.

Powered by vBulletin® Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2020 by Daniel R. Wolf