@Andreas danke für die Infos
Habe jetzt den Code nicht studiert möchte aber mal zeigen wie ich den Inspector fülle.
Delphi-Quellcode:
UIObject.ShowSelProperties(FInspector,aCtrl,
['Autosize' ,'Width', 'Height', 'Picture'], 'Background Picture');
Delphi-Quellcode:
procedure TCAVEUIObject.ShowSelProperties(Inspector: TJvInspector;
aObj: TObject; Props: array of string; NodeText: string);
var
i : integer;
Category: TJvInspectorCustomCategoryItem;
begin
Inspector.Root.Clear;
Category := TJvInspectorCustomCategoryItem.Create(Inspector.Root, nil);
Category.DisplayName := NodeText;
Inspector.Root.SortKind := iskNone;
for i:=Low(Props) to High(Props) do
TJvInspectorPropData.New(Category, aObj, GetPropInfo(aObj, Props[i]));
Category.Expanded := True;
end;
Es werden also vom TImage nur die oben übergebenen Eigenschaften übergeben.
Di eigenschaft Picture ist dann vorhanden was mir fehlt ist hinter dieser eigenschaft ein Button
mit dem ich einen Dialog aufrufen kann um ein bild auswählen zu können.
Werd mir dein Beispiel nochmal genau anschauen .. denke aber nur um einen Button zu adddieren
scheint mir das recht viel an Code.. oder ich habe mich wiedermal nicht richtig ausgedrückt
EDIT:
Bei der Initialisierung registriere ich ja schon die defaulteigenschaften
TJvInspectorTImageIndexItem.RegisterAsDefaultItem;
Könntest du mir bitte einen Link geben woher du diese Infos hast ?
ShowPictureEditor(Pic); >>>> nicht vorhanden
Eigenschaft IsEmpty nicht vorhanden bei TPicture
FUnktion Edit .. auch nicht von TJvInspectorMacroItem.Edit
Data.AsOrdina gibt es auch nicht..
gruss Emil