Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Per Drag & Drop eine Datei in externes Programm schieben (https://www.delphipraxis.net/133301-per-drag-drop-eine-datei-externes-programm-schieben.html)

KeMa 29. Apr 2009 13:04


Per Drag & Drop eine Datei in externes Programm schieben
 
Hallo zusammen,

ich würde gerne eine Datei, deren Pfad in einem StringGrid gelistet ist, auf ein geöffnetes externes Programm ziehen und dort ausführen. ich habe bereits im Forum nach Drag & Drop Beiträgen gesucht, konnte aber keine Lößung finden. :coder2:

Merci schonmal...
KeMa

juergen 29. Apr 2009 18:21

Re: Per Drag & Drop eine Datei in externes Programm schi
 
Hallo KeMa,

ich verweise dich mal an die Schweizer.

Dateien von der eigenen Anwendung per Drag and Drop kopieren

Ich hoffe dich dann auch richtig verstanden zu haben. :mrgreen:

KeMa 30. Apr 2009 10:38

Re: Per Drag & Drop eine Datei in externes Programm schi
 
Hallo Juergen,

merci für deine Antwort!
Ich hab das mal ausprobiert und bekomme beim Aufruf der Function

Delphi-Quellcode:

var
  SelFileList: TStrings;
  DataObject: IDataObject;
  Effect: DWORD;
...
...
  DoDragDrop(DataObject, Self, DROPEFFECT_COPY, Effect);
folgende Fehlermeldung:

[Fehler] FLMain.pas(620): Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen

Hat jemand ne Idee was daran falsch sein könnte?

juergen 30. Apr 2009 18:03

Re: Per Drag & Drop eine Datei in externes Programm schi
 
Hallo KeMa,

deklariere die Variable Effect als LongInt, anstelle DWord.

KeMa 5. Mai 2009 07:10

Re: Per Drag & Drop eine Datei in externes Programm schi
 
Hallo Juergen,

so funktionierts... SUPER!
Ich versteh das zwar nicht, denn in der Beschreibung der Funktion DoDragDrop wird der entsprechende Übergabeparameter als DWORD angegeben... :gruebel: Naja, Hauptsache es funktioniert... :thumb:

Merci...
Gruß KeMa


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:45 Uhr.

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