Thema: Delphi TPropertyEditor Frage

Einzelnen Beitrag anzeigen

Benutzerbild von MaBuSE
MaBuSE

Registriert seit: 23. Sep 2002
Ort: Frankfurt am Main (in der Nähe)
1.837 Beiträge
 
Delphi 10 Seattle Enterprise
 
#3

Re: TPropertyEditor Frage

  Alt 21. Sep 2006, 19:15
Zitat von MaBuSE:
siehe Onlinehilfe (F1 Taste)
bzw.
Siehe auch die Quelltexte der ToolsAPI
$(DELPHI)\Source\ToolsAPI (bei Delphi 7)

Dateien:
DesignEditors.pas und DesignIntf.pas

Die Default Editoren der DesignEditors sind den verschidenen Eigenschaften zugeordnet.
Du mußt also einen eigenen registrieren, um das Default Verhalten abzuschalten.

Wenn Du eine Klasse als property hast, (was bei Dir glaube ich der Fall ist)
dann ist automatisch der TClassProperty Editor aktiv.
Der implementiert die paSubProperties, die dafür verantwortlich ist.

Delphi-Quellcode:
{ ********************************************************************** }
{ Delphi and Kylix Cross-Platform Open Tools API                         }
{ Copyright (C) 1995, 2001 Borland Software Corporation                  }
{ All Rights Reserved.                                                   }
{ ********************************************************************** }
unit DesignEditors;

...

  TClassProperty = class(TPropertyEditor)
  public
    function GetAttributes: TPropertyAttributes; override;
    procedure GetProperties(Proc: TGetPropProc); override;
    function GetValue: string; override;
  end;

...

function TClassProperty.GetAttributes: TPropertyAttributes;
begin
  Result := [paMultiSelect, paSubProperties, paReadOnly];
end;

...
So ich hoffe das reicht Dir an Info...
(°¿°) MaBuSE - proud to be a DP member
(°¿°) MaBuSE - proud to be a "Rüsselmops" ;-)
  Mit Zitat antworten Zitat