?? uvadgdoctorcatalog.pas
字號:
unit UVADGDoctorCatalog;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, UAdapterDataGridView, cxStyles, cxCustomData, cxGraphics,
cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
dxPSFillPatterns, dxPSEdgePatterns, dxPSCore, RzCommon, cxGridLevel,
cxClasses, cxControls, cxGridCustomView, cxGridCustomTableView,
cxGridTableView, cxGridDBTableView, cxGrid, jpeg, RzBckgnd, ExtCtrls,
RzPanel;
type
TVADGDoctorCatalog = class(TAdapterDataGridView)
GridDBTableViewDOCTORCATALOGID: TcxGridDBColumn;
GridDBTableViewCAPTION: TcxGridDBColumn;
private
{ Private declarations }
public
function GetCaption: string; override;
end;
implementation
uses UMADDoctorCatalog;
{$R *.dfm}
{ TVADGDoctorCatalog }
function TVADGDoctorCatalog.GetCaption: string;
begin
Result := '醫生職稱'
end;
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -