Einzelnen Beitrag anzeigen

Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.130 Beiträge
 
Delphi 10.3 Rio
 
#5

AW: Propertyeditor nicht Modal

  Alt 30. Okt 2013, 18:38
OK für alle die es Interessiert...

Es geht so...

Delphi-Quellcode:
TMyComponentEditor = class(TForm,IDesignNotification)
...
  protected
    procedure DesignerClosed(const ADesigner: IDesigner; AGoingDormant: Boolean);
    procedure DesignerOpened(const ADesigner: IDesigner; AResurrecting: Boolean);
    procedure ItemDeleted(const ADesigner: IDesigner; AItem: TPersistent);
    procedure ItemInserted(const ADesigner: IDesigner; AItem: TPersistent);
    procedure ItemsModified(const ADesigner: IDesigner);
    procedure SelectionChanged(const ADesigner: IDesigner;const ASelection: IDesignerSelections);
...
end

implementation

procedure TMyComponentEditor.FormCreate(Sender: TObject);
begin
  ...
  RegisterDesignNotification(Self as IDesignNotification);
end;

procedure TMyComponentEditor.FormDestroy(Sender: TObject);
begin
  UnregisterDesignNotification(Self as IDesignNotification);
  ...
end;

procedure TMyComponentEditor.SelectionChanged(const ADesigner: IDesigner;const ASelection: IDesignerSelections);
var
  i : integer;
begin // Workingtest
  memo1.Lines.Clear;

  for i:=0 to ASelection.Count-1 do
    begin
      Memo1.Lines.Add(ASelection.Items[i].ClassName);
    end;
end;
Grüsse Mavarik

PS.: Auch ein nicht modaler Editor funktioniert!
  Mit Zitat antworten Zitat