TWebBrowser und Drag ?

[shifter]

Hi,

Ich versuche von TWebBrowser ein Image per Drag & Drop in ein TListView zu ziehen,
leider komme damit nicht ganz zu recht. Ich habe auch festgestellt das ich eingentlich von
TWebBrowser sogut wie nichts runter ziehen kann.

Habt Ihr eine lösung oder ne Idee ?

Gruss
seba

[toms]

Hallo

Der folgende Code aktiviert drag&drop:

Delphi-Quellcode:

uses
  {...,}ActiveX;

// Diesen Code am Ende der Unit anfügen:

initialization
  OleInitialize(nil);

finalization
  OleUninitialize;
end.

[shifter]

Wow,

das ging aber schnell,

besten Dank für die Mega schnelle Antwort.

Jetzt bin ich auf jeden fall schritt weiter.



Und da hab ich dann noch eine frage zur thema :

Wie bekomme ich ein Bild von TWebBrowser in ein TListView ?

Zur Test zwecken hab ich beim DragOver -> accept := True gesetzt.
Aber irgend wie bin ich doch zu blöd.

gruss
seba