@Stephan
habe das mal getestet beomme aber das von dir benannte event nicht
weder onMouseMove ,Down noch ein anderes.
kann es also aObj nicht zuweisen.
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]));
if aObj.classname = 'TImage' then
tmpImage := TImage(aObj);
Category.Expanded := True;
end;
gruss Emil