Scalabium Software

• Delphi/C++Builder
  • VCL components
  • Database/SQL
  • Reports, printing
  • Email, Internet
  • Windows API
  • Menu
  • Tools API/IDE
  • OLE, COM, DDE
  • Files, drives, network
  • Algorithmes
  • Conversions
  • Multimedia
  • Miscellaneous
• .NET/C#
  • Database
  • Conversions
  • Miscellaneous
  • Files, drives, network
  • OLE/Interop
  • Visual controls
  • Multimedia, images
• Java

If you needs a list of published properties for some component, you must use the GetPropInfos function in TypInfo unit. For example,

uses TypInfo;

procedure GetPublishedProperties(comp: TComponent; lst: TStrings);
var
  Props: PPropList;
  TypeData: PTypeData;
  i: Integer;
begin
  TypeData := GetTypeData(comp.ClassInfo);
  if (TypeData = nil) or (TypeData^.PropCount = 0) then Exit;

  GetMem(Props, TypeData^.PropCount * sizeof(Pointer));
  try
    GetPropInfos(comp.ClassInfo, Props);
    for i := 0 to TypeData^.PropCount-1 do
    begin
      with Props^[i]^ do
        lst.Add(Name);
    end;
  finally
    FreeMem(Props);
  end;
end;

PS: I started to develop the component like Object Inspector for SMReport Designer. So maybe in some future I'll finish it...

Published: April 19, 2000

Copyright© 1998-2024, Scalabium Software. All rights reserved.
webmaster@scalabium.com