Windows Explorer DragNDrop auf TImage (DragAcceptFiles)

[Rolf Frei]

Hast du schon versucht das Form.Handle zu nutzen oder Applicaiton.Handle. Du müsstest dann noch festellen was auf der Form an der besagten DROP-Position für ein Control liegt und gegebenfalls was machen oder halt ignorieren, wenn es sich da nicht um das TImage handelt.

[DieDolly]

Auf die idee bin ich noch gar nicht gekommen.

Ich habe es jetzt etwas anders gemacht, aus zweierlei Gründen. Als erstes habe ich ein TImage. Auf dem TImage ist ein TLabel.
Vorher war es so, dass man auf eine der zwei Komponenten klicken konnte, und es ging ein Dialogfenster auf. Etwas umständlich.
Ich habe über alle zwei Komponenten jetzt ein TStaticText ohne Caption gelegt. Drag and Drop funktioniert da drauf wunderbar.

Look and Feel ist nach wie vor benutzerfreundlich und Windows-typisch.

[Delbor]

Hi zusammen

Auf die Gefahr hin, dass ich das Problem nicht wirklich verstanden habe: wieso legst du das Image nicht einfach auf ein Panel, setzt dessen Bevelinner und Bevelouter auf none und Autosize auf true? Das Image hat auch dann kein Handle, aber Image.Parent schon.

Gruss
Delbor

[himitsu]

TImage, TLabel, TBevel sind keine "Windows"-Komponenten und besitzen keine eigenen HWND und Canvas/DC auf der Form.

Sie hängen sich in das Zeichenereignis ihres Parents ein und zeichnen sich auf dessen Canvas.


Also, wie schon mitbekommen, kannst du die Form und dessen Handle nutzen,
oder z.B. ein Panel (ohne Rahmen) hinter dein Image und dort dann das aktivieren.



Nur TLabel hat eine "eigene" Lösung, denn die "echte" TEXT-Komponente vom Windows ist im Delphi enthalten und nennt sich TStaticLabel, welches dann ein eigenes HWND/DC besitzt.
Der Gund ist: einsparung von Handles, denn die ersten Windowsen hatten nicht Viele und so kann die Komponente auch sehr einfach transparent werden, indem sie nicht alle Pixel ihres Parents unter sich übermalt.

[DieDolly]

Zitat:

Auf die Gefahr hin, dass ich das Problem nicht wirklich verstanden habe: wieso legst du das Image nicht einfach auf ein Panel, setzt dessen Bevelinner und Bevelouter auf none und Autosize auf true? Das Image hat auch dann kein Handle, aber Image.Parent schon.

Wie würdet ihr es denn eher machen. Image auf Panel oder StaticText auf Image ?

[Delbor]

Hi DieDolly

Legst du das Image aufs Panel, brauchst du Platz für Image.Parent.Boundsrect (oder so). Beim StaticText(oder was auch immer, solange es TWinControl ist), auch - aber du musst zusätzlich StaticText.Boundsrect auf die Masse des Image bringen, das Statictext unsichtbar (und wohl auch disabled) machen. Und wie willst du das Image anklicken, wen es vom Staic verdeckt wird? Und wie willst du das Static anklicken, wenn es disabled und unsichtbar ist?

Gruss
Delbor

[DieDolly]

Zitat:

das Statictext unsichtbar (und wohl auch disabled) machen. Und wie willst du das Image anklicken,

Das Image ist nicht klickbar. Klickbar ist das StaticText und es ist auch Enabled.