Multiform Anwendung Drag Drop

[needatip]

Hallo,

ich arbeite mit der JVDragDrop Komponente von Jedi.
Ich möchte Dateien vom Windows Explorer in meine Anwendung ziehen.
Bei meiner bisherigen "normalen Formularanwendung" funktioniert das einwandfrei.
JvDragDrop Komponente auf das Formular, Eigenschaft AcceptDrag anhaken und DropTarget Komponente einstellen und schon akzeptiert die entsprechende Komponente die Dateien.

Meine neue Anwendung hat aber mehrere Formulare die alle auf einem Panel entsprechend geladen werden.
d.h.
Ich habe links auf meinem Hauptformular eine Navigationskomponente(JvNavigationPane) mit der ich die einzelnen Formulare dann rechts auf mein Panel(sog. Containerpanel) anzeige.

Delphi-Quellcode:

procedure TForm1.NavP1Change(Sender: TObject);
var
  NewFormClass: TFormClass;
  NewForm: TForm;
begin
  begin
    case NavP1.ActivePage.PageIndex of
      0:
        begin
          NewFormClass := TmyForm1;
          if ContainerPanel.ControlCount > 0 then
            ContainerPanel.Controls[0].Free;
          if Assigned(NewFormClass) then
          begin
            NewForm := NewFormClass.Create(Self);
            NewForm.Hide;
            NewForm.BorderStyle := bsNone;
            NewForm.Parent := ContainerPanel;
            NewForm.Align := alClient;
            NewForm.Show;
          end;
        end;
      1:
        begin
          NewFormClass := TmyForm2;
          if ContainerPanel.ControlCount > 0 then
            ContainerPanel.Controls[0].Free;
          if Assigned(NewFormClass) then
          begin
            NewForm := NewFormClass.Create(Self);
            NewForm.Hide;
            NewForm.BorderStyle := bsNone;
            NewForm.Parent := ContainerPanel;
            NewForm.Align := alNone;
            NewForm.Show;
          end;
        end;
    end;
  end;
end;

Weil ich

Code:

NewForm.Parent := ContainerPanel;

zuweise, funktioniert die DragDrop Funktion nicht mehr.
Muss ich in dem Containerpanel noch irgendwas zuweisen bzw. woran liegt es?

[blawen]

Hallo

Persönlich nutze ich die Funktionen aus der Winapi.ShellAPI und nicht die jvDragDrop Komponente.
In meinem Falle hatte ich eine ähnliche Situation, sprich mit nur einer Form funktioniert das ganze einwandfrei und nach dem hinzufügend von weiteren Formularen, schien das ganze nicht mehr zu funktionieren. Schlussendlich habe ich herausgefunden, dass die AppMessage vom falschen (dem zuletzt erstellten) Formular ausgewertet wurde.

In meinem Fall erzeuge ich das benötigte Formular erst, wenn ich es effektiv benötige und gebe es danach auch gleich wieder frei.

Gruss
Blawen

[needatip]

Danke,
ich denke daß dann beim Containerpanel was eingestellt gehört bwz. daß die DragDrop funktion was durchreichen muss.