?? ser600_01.pas.svn-base
字號:
unit Ser600_01;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Bas200_10, dxExEdtr, ActnList, DB, ADODB, Menus, dxCntner, dxTL,
dxDBCtrl, dxDBGrid, ExtCtrls, ComCtrls, ToolWin;
type
TSer600_01Form = class(TBas200_10Form)
private
{ Private declarations }
public
procedure SetInterface; override;
procedure InsertEvent; override;
procedure UpdateEvent; override;
procedure DeleteEvent; override;
procedure BrowseEvent; override;
procedure ReportGetValue(const ParName: String; var ParValue: Variant); override;
{ Public declarations }
end;
var
Ser600_01Form: TSer600_01Form;
implementation
{$R *.dfm}
{ TSer600_01Form }
procedure TSer600_01Form.BrowseEvent;
begin
inherited;
end;
procedure TSer600_01Form.DeleteEvent;
begin
inherited;
end;
procedure TSer600_01Form.InsertEvent;
begin
inherited;
end;
procedure TSer600_01Form.ReportGetValue(const ParName: String;
var ParValue: Variant);
begin
inherited;
end;
procedure TSer600_01Form.SetInterface;
begin
inherited;
end;
procedure TSer600_01Form.UpdateEvent;
begin
inherited;
end;
initialization
RegisterClass(TSer600_01Form);
finalization
UnRegisterClass(TSer600_01Form);
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -