Komponente wie von: PropertyEditorForm auf: Entwurf-Formular kommen ?

[paule32.jk]

Hallo,
wie komme ich am besten von einen PropertyEditorForm Marke Eigenbau, auf das zugrunde liegende
Formular um an Informationen zu gelangen ?
Siehe Anhang - ein ScreenShot.

[himitsu]

Genauso, wie in normalen Programmen.

Der Editor gibt dir das/die selektierten Komponenten
und nun rate mal wer dessen/deren Owner ist? :wink:

[paule32.jk]

ich habe das jetzt so geregelt, das ich Designer.CurrentParent speichere, und dann im Formular
anwende - also die Variable MyCurrentPanel

Delphi-Quellcode:

procedure TResourceComponentPropertyEditor.Edit;
var
  LPropertyForm: TSelectControlForm;
begin
  MyCurrentParent := Designer.CurrentParent;
  LPropertyForm := TSelectControlForm.Create(nil);
  try
    LPropertyForm.ShowModal;
    self.Designer.Modified;
  finally
    LPropertyForm.Free;
  end;
end;

Dann kann ich in der Designer-Form:

Delphi-Quellcode:

for I := 0 to MyCurrentParent.ComponentCount - 1 do
begin
  ListBox1.Items.Add(MyCurrentParent.Components[I].ClassName);
end;