unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  DBActns, ActnList, ImgList, Db, DBTables, KsHooks, KsForms, KsSkinForms,
  KsSkinEngine, KsControls, KsPanels, KsSkinPanels, DBCtrls, ExtCtrls,
  KsButtons, KsSkinButtons, KsEdits, KsSkinEdits, KsSkinDBControls,
  StdCtrls;

type
  TForm1 = class(TForm)
    SeSkinEngine1: TSeSkinEngine;
    SeSkinForm1: TSeSkinForm;
    ActionList1: TActionList;
    DataSource1: TDataSource;
    Table1: TTable;
    ImageList1: TImageList;
    DataSetCancel1: TDataSetCancel;
    DataSetDelete1: TDataSetDelete;
    DataSetEdit1: TDataSetEdit;
    DataSetFirst1: TDataSetFirst;
    DataSetInsert1: TDataSetInsert;
    DataSetLast1: TDataSetLast;
    DataSetNext1: TDataSetNext;
    DataSetPost1: TDataSetPost;
    DataSetPrior1: TDataSetPrior;
    DataSetRefresh1: TDataSetRefresh;
    DBImage1: TDBImage;
    SeSkinDBEdit1: TSeSkinDBEdit;
    SeSkinButton1: TSeSkinButton;
    SeSkinButton2: TSeSkinButton;
    SeSkinButton3: TSeSkinButton;
    SeSkinButton4: TSeSkinButton;
    Label1: TLabel;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses KsSkinVersion;

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
  Caption := 'SkinEngine DBNav v. '+sSeSkinVersion;
end;

end.
 