iwunit1.pas

Delphi 应用举例

unit IWUnit1;
{PUBDIST}

interface

uses
  IWAppForm, IWApplication, IWTypes, IWDBStdCtrls, Classes, Controls,
  IWControl, IWGrids, IWDBGrids, IWExtCtrls, Graphics, IWDBExtCtrls,
  IWCompEdit;

type
  TformMain = class(TIWAppForm)
    IWDBGrid1: TIWDBGrid;
    IWDBNavigator1: TIWDBNavigator;
    IWImage1: TIWImage;
    IWImageFile1: TIWImageFile;
    IWDBImage1: TIWDBImage;
    name: TIWDBEdit;
    size: TIWDBEdit;
    weight: TIWDBEdit;
    area: TIWDBEdit;
    bmp: TIWDBFile;
  public
  end;

implementation
{$R *.dfm}

uses
  ServerController,DatamoduleUnit;

end.