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

[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;