unit1.pas

小区水费管理系统源代码水费收费管理系统 水费收费管理系统

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  se_controls, KsSkinForms, KsSkinEngine, Db, DBTables, KsSkinDBControls,
  KsSkinGroupBoxs, Grids, DBGrids, KsSkinDBGrids, KsSkinLabels;
  
type
  TForm1 = class(TForm)
    Table1: TTable;
    DataSource1: TDataSource;
    DataSource2: TDataSource;
    Table2: TTable;
    SeSkinDBGrid1: TSeSkinDBGrid;
    SeSkinLabel1: TSeSkinLabel;
    SeSkinEngine1: TSeSkinEngine;
    SeSkinGroupBox1: TSeSkinGroupBox;
    SeSkinDBLookupComboBox1: TSeSkinDBLookupComboBox;
    SeSkinDBLookupListBox1: TSeSkinDBLookupListBox;
    SeSkinForm1: TSeSkinForm;
    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 DBDemo v. ' + sSeSkinVersion;
end;

end.