Chami.com Tips

Home > Tips > Programming > Your own object inspector

300+ book mentions, 95% thumbs up, millions of downloads. Get HTML-Kit Tools for $39 (limited time offer)

Web Hosting Web Hosting UK Dedicated Servers Domain Names

Categories

Internet
HTML
JavaScript
» Programming
Windows

Keywords

Delphi
Functions

Downloads

objins sample

Your own object inspector

See Also

Easy way to find out which properties should be set when creating components at run time

We all like the "Object Inspector" for its ease of use and all the information it can provide. Wouldn't it be great to have your own possibly non-visual object inspector available at run time -- so you can find out which properties and methods a given object (or component) may have and what type these properties are? Try this:

uses TypInfo;

procedure ObjectInspector(
  Obj   : TObject;
  Items : TStrings );
var
  n        : integer;
  PropList : TPropList;
begin
  n := 0;
  GetPropList(
    Obj.ClassInfo,
    tkProperties + [ tkMethod ],
    @PropList );
  while( (Nil <> PropList[ n ]) and
         (n < High(PropList)) ) do
  begin
    Items.Add(
      PropList[ n ].Name + ': ' +
      PropList[ n ].PropType^.Name );
    Inc( n );
  end;
end;

Listing #1 : Delphi code. Download objins (0.38 KB).

For example, let's say you want to get information about a listbox named "ListBox1" and store the information in the same "ListBox1"

ObjectInspector( ListBox1, ListBox1.Items );

Listing #2 : Delphi code. Download sample (0.17 KB).

Applicable Keywords : Delphi, Delphi 1.x, Delphi 2.x, Delphi 3.x, Functions

Previous Tip : Quick way to retrieve current screen resolution
Random Tip : Are you sure you have the latest version of Windows 95?
Next Tip : Go back to your parent...