?? pay500_04.pas.svn-base
字號:
unit Pay500_04;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Bas200_07, dxCntner, Menus, StdCtrls, Buttons, ExtCtrls,
dxExEdtr, dxEdLib, wwdbdatetimepicker, dxEditor;
type
TPay500_04Form = class(TBas200_07Form)
lblType: TLabel;
lblReason: TLabel;
lblDesc: TLabel;
lblEmpID: TLabel;
lblDate: TLabel;
lblValue: TLabel;
edtMemo: TdxEdit;
SpeedButton1: TSpeedButton;
dxEdit1: TdxEdit;
dxEdit2: TdxEdit;
dxEdit3: TdxEdit;
SpeedButton2: TSpeedButton;
dxEdit4: TdxEdit;
dxEdit5: TdxEdit;
SpeedButton3: TSpeedButton;
dxEdit6: TdxEdit;
cbDate: TdxButtonEdit;
dtpDate: TwwDBDateTimePicker;
dxEdit7: TdxEdit;
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Pay500_04Form: TPay500_04Form;
implementation
{$R *.dfm}
procedure TPay500_04Form.FormCreate(Sender: TObject);
begin
inherited;
//
end;
procedure TPay500_04Form.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
inherited;
//
end;
initialization
RegisterClass(TPay500_04Form);
finalization
UnRegisterClass(TPay500_04Form);
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -