You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
175 lines
4.6 KiB
Plaintext
175 lines
4.6 KiB
Plaintext
unit u_crm_client_view;
|
|
|
|
interface
|
|
|
|
uses
|
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
|
Dialogs, DB, ADODB, dxExEdtr, ComCtrls, DBCtrls, dxDBGrid, dxDBTLCl,
|
|
dxGrClms, bsSkinCtrls, wwdbdatetimepicker, dxTL, dxDBCtrl, dxCntner,
|
|
wwdbedit, Wwdotdot, Wwdbcomb, RxLookup, StdCtrls, bsdbctrls, Mask,
|
|
bsSkinTabs, BusinessSkinForm;
|
|
|
|
type
|
|
Tfrm_crm_client_view = class(TForm)
|
|
t_crm_client1: TDataSource;
|
|
t_crm_client_linkman: TADOQuery;
|
|
t_crm_client_linkman1: TDataSource;
|
|
bsSkinPageControl1: TbsSkinPageControl;
|
|
bsSkinTabSheet1: TbsSkinTabSheet;
|
|
bsSkinGroupBox1: TbsSkinGroupBox;
|
|
Label1: TLabel;
|
|
Label3: TLabel;
|
|
Label9: TLabel;
|
|
Label12: TLabel;
|
|
DBEdit1: TDBEdit;
|
|
DBEdit3: TDBEdit;
|
|
DBEdit11: TDBEdit;
|
|
DBEdit12: TDBEdit;
|
|
bsSkinGroupBox2: TbsSkinGroupBox;
|
|
Label13: TLabel;
|
|
Label14: TLabel;
|
|
Label15: TLabel;
|
|
Label16: TLabel;
|
|
DBEdit13: TDBEdit;
|
|
DBEdit14: TDBEdit;
|
|
DBEdit15: TDBEdit;
|
|
DBEdit16: TDBEdit;
|
|
bsSkinGroupBox4: TbsSkinGroupBox;
|
|
bsSkinDBCheckRadioBox1: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox2: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox3: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox4: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox5: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox6: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox7: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox8: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox12: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox13: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox14: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox15: TbsSkinDBCheckRadioBox;
|
|
bsSkinGroupBox3: TbsSkinGroupBox;
|
|
Label4: TLabel;
|
|
Label5: TLabel;
|
|
Label2: TLabel;
|
|
Label7: TLabel;
|
|
Label6: TLabel;
|
|
Label10: TLabel;
|
|
Label11: TLabel;
|
|
Label8: TLabel;
|
|
Label17: TLabel;
|
|
Label18: TLabel;
|
|
Label62: TLabel;
|
|
DBEdit4: TDBEdit;
|
|
DBEdit5: TDBEdit;
|
|
DBEdit2: TDBEdit;
|
|
DBEdit7: TDBEdit;
|
|
DBEdit6: TDBEdit;
|
|
DBEdit10: TDBEdit;
|
|
DBEdit9: TDBEdit;
|
|
DBEdit8: TDBEdit;
|
|
DBEdit17: TDBEdit;
|
|
DBEdit18: TDBEdit;
|
|
DBEdit45: TDBEdit;
|
|
bsSkinTabSheet2: TbsSkinTabSheet;
|
|
bsSkinGroupBox5: TbsSkinGroupBox;
|
|
Label20: TLabel;
|
|
Label21: TLabel;
|
|
Label22: TLabel;
|
|
Label164: TLabel;
|
|
DBEdit20: TDBEdit;
|
|
DBEdit21: TDBEdit;
|
|
DBEdit22: TDBEdit;
|
|
bsSkinGroupBox6: TbsSkinGroupBox;
|
|
Label19: TLabel;
|
|
Label24: TLabel;
|
|
Label25: TLabel;
|
|
Label45: TLabel;
|
|
Label46: TLabel;
|
|
DBEdit19: TDBEdit;
|
|
DBEdit24: TDBEdit;
|
|
DBEdit25: TDBEdit;
|
|
wwDBComboBox5: TwwDBComboBox;
|
|
DBEdit30: TDBEdit;
|
|
bsSkinGroupBox7: TbsSkinGroupBox;
|
|
Label23: TLabel;
|
|
Label26: TLabel;
|
|
Label27: TLabel;
|
|
Label28: TLabel;
|
|
DBEdit26: TDBEdit;
|
|
DBEdit23: TDBEdit;
|
|
DBEdit27: TDBEdit;
|
|
bsSkinDBCheckRadioBox9: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox10: TbsSkinDBCheckRadioBox;
|
|
bsSkinDBCheckRadioBox11: TbsSkinDBCheckRadioBox;
|
|
DBEdit28: TDBEdit;
|
|
bsSkinGroupBox8: TbsSkinGroupBox;
|
|
Label29: TLabel;
|
|
Label30: TLabel;
|
|
Label31: TLabel;
|
|
Label32: TLabel;
|
|
Label33: TLabel;
|
|
DBEdit29: TDBEdit;
|
|
DBEdit31: TDBEdit;
|
|
DBEdit32: TDBEdit;
|
|
DBEdit33: TDBEdit;
|
|
DBEdit34: TDBEdit;
|
|
bsSkinTabSheet3: TbsSkinTabSheet;
|
|
Label36: TLabel;
|
|
Label37: TLabel;
|
|
Label38: TLabel;
|
|
Label39: TLabel;
|
|
Label40: TLabel;
|
|
Label41: TLabel;
|
|
Label42: TLabel;
|
|
Label43: TLabel;
|
|
Label44: TLabel;
|
|
Label47: TLabel;
|
|
Label48: TLabel;
|
|
Label49: TLabel;
|
|
Label50: TLabel;
|
|
Label51: TLabel;
|
|
Label52: TLabel;
|
|
Label53: TLabel;
|
|
dxDBGrid2: TdxDBGrid;
|
|
dxDBGrid2Column1: TdxDBGridMaskColumn;
|
|
dxDBGrid2Column2: TdxDBGridMaskColumn;
|
|
dxDBGrid2Column3: TdxDBGridMaskColumn;
|
|
DBEdit35: TDBEdit;
|
|
DBEdit37: TDBEdit;
|
|
DBEdit38: TDBEdit;
|
|
DBEdit39: TDBEdit;
|
|
wwDBComboBox2: TwwDBComboBox;
|
|
DBEdit36: TDBEdit;
|
|
DBEdit40: TDBEdit;
|
|
DBEdit41: TDBEdit;
|
|
DBEdit42: TDBEdit;
|
|
DBEdit43: TDBEdit;
|
|
DBEdit44: TDBEdit;
|
|
wwDBDateTimePicker1: TwwDBDateTimePicker;
|
|
wwDBDateTimePicker2: TwwDBDateTimePicker;
|
|
wwDBDateTimePicker3: TwwDBDateTimePicker;
|
|
wwDBDateTimePicker4: TwwDBDateTimePicker;
|
|
DBMemo2: TDBMemo;
|
|
bsBusinessSkinForm1: TbsBusinessSkinForm;
|
|
DBEdit46: TDBEdit;
|
|
procedure FormShow(Sender: TObject);
|
|
private
|
|
{ Private declarations }
|
|
public
|
|
{ Public declarations }
|
|
end;
|
|
|
|
var
|
|
frm_crm_client_view: Tfrm_crm_client_view;
|
|
|
|
implementation
|
|
|
|
{$R *.dfm}
|
|
|
|
procedure Tfrm_crm_client_view.FormShow(Sender: TObject);
|
|
begin
|
|
t_crm_client_linkman.open;
|
|
end;
|
|
|
|
end.
|