Einzelnen Beitrag anzeigen

Michael II

Registriert seit: 1. Dez 2012
Ort: CH BE Eriswil
760 Beiträge
 
Delphi 11 Alexandria
 
#15

AW: Installation der Drag and Drop Component von Anders Melander

  Alt 7. Apr 2019, 20:56
[QUOTE=H.Bothur;1429773]
Wo hast Du die Packages denn her?
Aber - die Frage ist was jetzt ? Eigentlich will ich ja nur Anhänge direkt aus einer Mail auf ein Programm-Icon auf dem Windows-Desktop ziehen um das programm mit der Datei aus dem Anhang zu öffnen.
s
Wurde deine Frage nicht bereits bei deinem anderen Thema von AndreasL beantwortet?

Wenn du einen eMail Anhang auf ein Programm Icon (oder auf ein Programm Verknüpfung Icon) ziehst und fallen lässt, dann wird das Programm gestartet und du kannst via paramstr(1..bis) die Filenamen der eMail-Anhänge abrufen.

Also so:

Delphi-Quellcode:
procedure TForm.FormCreate(Sender: TObject);
var i : integer;
begin
  for i := 1 to paramcount do
      listbox1.Items.Add( paramstr(i) );
end;
Wenn ich nun aus Thunderbird Anhänge aufs Icon meines Programms ziehe und fallen lasse, dann werden im Windows TempOrdner die eMail Anhänge gespeichert, mein Programm wird gestartet und ich sehe die Filenamen der eMail Anhänge und habe so Zugriff auf die Files.

Klappt dies mit deinem eMail Client nicht? Oder löst dies dein Problem nicht?
Michael Gasser
  Mit Zitat antworten Zitat