detbase.pas

来自「《Delphi开发人员指南》配书原码」· PAS 代码 · 共 28 行

unit DetBase;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ComCtrls, HeadList;

type
  TBaseDetailForm = class(TForm)
    DetailTabs: TTabControl;
    DetailLB: THeaderListbox;
    DetailSB: TStatusBar;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

type
  TDetailStrings = array[0..3] of string[31];

implementation

{$R *.DFM}

end.