开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Delphi控件源码 > 查看源码
OrderF.pas
资源名称：delphi.rar　[点击查看]
上传用户：fh681027
上传日期：2022-07-23
资源大小：1959k
文件大小：1k
源码类别：

Delphi控件源码

开发平台：

Delphi

OrderF.pas：源码内容
  1. unit OrderF;
  3. interface
  5. uses
  6.   SysUtils, Windows, Messages, Classes, Graphics, Controls,
  7.   StdCtrls, Forms, DBCtrls, DB, DBGrids, DBTables, ExtCtrls, DBLookup,
  8.   Grids, Mask;
  10. type
  11.   TOrdersForm = class(TForm)
  12.     ScrollBox: TScrollBox;
  13.     Label1: TLabel;
  14.     EditOrderNo: TDBEdit;
  15.     Label3: TLabel;
  16.     EditSaleDate: TDBEdit;
  17.     Label4: TLabel;
  18.     EditShipToContact: TDBEdit;
  19.     Label5: TLabel;
  20.     EditShipToAddr: TDBEdit;
  21.     Label6: TLabel;
  22.     EditShipToAddr2: TDBEdit;
  23.     Label7: TLabel;
  24.     EditShipToCity: TDBEdit;
  25.     Label8: TLabel;
  26.     EditShipToState: TDBEdit;
  27.     Label9: TLabel;
  28.     EditShipToZip: TDBEdit;
  29.     Label10: TLabel;
  30.     EditShipToCountry: TDBEdit;
  31.     Label11: TLabel;
  32.     EditPaymentMethod: TDBEdit;
  33.     Label12: TLabel;
  34.     EditItemsTotal: TDBEdit;
  35.     DBGrid1: TDBGrid;
  36.     DBNavigator: TDBNavigator;
  37.     Panel1: TPanel;
  38.     dsOrders: TDataSource;
  39.     Panel2: TPanel;
  40.     Panel3: TPanel;
  41.     QueryOrders: TQuery;
  42.     QueryItems: TQuery;
  43.     dsItems: TDataSource;
  44.     Label2: TLabel;
  45.     DBEdit1: TDBEdit;
  46.   private
  47.     { private declarations }
  48.   public
  49.     { public declarations }
  50.   end;
  52. var
  53.   OrdersForm: TOrdersForm;
  55. implementation
  57. {$R *.DFM}
  59. end.