An alle TAction Kracks - TDataSetAction reagieren nicht!!!!!

[Konchulio]

ju habe ich schon versucht keinen Fehler gefunden.

Ich nehme an das das Formular das aus der DLL dynamisch erzeugt wird irgendwie keinen WinControl bekommt oder die Actions diesen nicht finden können. Hab es schon mit der TCustomForm Funktion "CMActionexecute" bzw. "CMActionexecute" im Hauptformular und in den Formularen die in der DLL sind, probiert --> kein Änderung der Situation!!!

Mist

Hier die beiden Proceduren:

Info: das Gleiche macht auch die "CMActionexecute" Prozedur.

Delphi-Quellcode:

procedure Tform1.CMActionupdate(var Message: TMessage);
var
  bPerformed : Boolean;
  i : Integer;
  DockForm : TfrmFamilyFormExt;
begin

  bPerformed := False;

    for i := 0 to pred(Application.ComponentCount) do begin
      if Application.Components[i] is TForm then begin
        DockForm := TForm(Application.Components[i]);
        if DockForm.Active then begin
          Message.Result := DockForm.Perform(Message.Msg,0,Message.LParam);
          bPerformed := Message.RESULT = S_OK;
         
          if bPerformed then exit;
        end;
      end;
    end;

  if not bPerformed then inherited;
end;