treeinspector.pas

来自「FlexGraphics是一套创建矢量图形的VCL组件」· PAS 代码 · 共 43 行

unit TreeInspector;

interface

{$IFNDEF VER80}                { DELPHI 1.0     }
 {$IFNDEF VER90}               { DELPHI 2.0     }
  {$IFNDEF VER93}              { C++Builder 1.0 }
   {$IFNDEF VER100}            { DELPHI 3.0     }
    {$IFNDEF VER110}           { C++Builder 3.0 }
     {$IFNDEF VER120}          { DELPHI 4.0 }
      {$IFNDEF VER125}         { C++Builder 4.0 }
       {$DEFINE DELPHI5_UP}
       {$IFNDEF VER130}        { DELPHI/C++Builder 5.0 }
        {$DEFINE DELPHI6_UP}
       {$ENDIF}
      {$ENDIF}
     {$ENDIF}
    {$ENDIF}
   {$ENDIF}
  {$ENDIF}
 {$ENDIF}
{$ENDIF}

{$IFDEF VER200}
  {$DEFINE DELPHI12_UP}
{$ENDIF}

uses
  Windows, Classes, Controls, ComCtrls, CommCtrl, StdCtrls, Messages, Graphics,
  SysUtils, Forms, Mask;

const
  WM_FORCEFOCUS = WM_USER + 1234;

type
  TCustomTreeInspector = class;

  TGridEditStyle = (geSimple, geEllipsis, gePickList, geDataList, geUserDefine);

{ TGridListBox }

  {
    蔓镟溧