如下定义是什么意思?3Q
type
IMemTableDataFieldValueListEh = interface
['{28F8194C-5FF3-42C4-87A6-8B3E06210FA6}']
function GetValues: TStrings;
end;
问题点数：20、回复次数：4Top
1 楼nyf1220（我是党员----不过听说最近风声紧，打算换名字）回复于 2004-12-01 22:55:37 得分 20
IMemTableDataFieldValueListEh = interface //定义一个IMemTableDataFieldValueListEh接口
['{28F8194C-5FF3-42C4-87A6-8B3E06210FA6}'] //GUID，系统自动生成
function GetValues: TStrings;//定义一个FUNCTION，需要实现他的类来完成实现
end;
Top
2 楼liuzq（）回复于 2004-12-01 23:06:21 得分 0
nyf1220(我是党员--不过听说最近风声紧，打算换名字):
不是太明白呵，能再详点吗？3QTop
3 楼liuzq（）回复于 2004-12-01 23:23:51 得分 0
IMemTableDataFieldValueListEh接口
['{28F8194C-5FF3-42C4-87A6-8B3E06210FA6}'] ,这里的数字是不是不能重复，就是我安装了EHLIB,它里面这样定义了，现我将其中的这部分和以下部分搬到我的控件中，想利用它，但控件安装运行后好象不和EHLIB的控件不一样，里面所定义的函数不执行，为什么？{28F8194C-5FF3-42C4-87A6-8B3E06210FA6}这样的串代表什么？怎样生成自已的呢？3Q
type
TPopupMonthCalendarEh = class(TMonthCalendar)
private
FBorderWidth: Integer;
procedure CMCloseUpEh(var Message: TMessage); message CM_CLOSEUPEH;
procedure CMCtl3DChanged(var Message: TMessage); message CM_CTL3DCHANGED;
procedure CMWantSpecialKey(var Message: TCMWantSpecialKey); message CM_WANTSPECIALKEY;
procedure WMGetDlgCode(var Message: TWMGetDlgCode); message WM_GETDLGCODE;
procedure WMKillFocus(var Message: TWMKillFocus); message WM_KILLFOCUS;
procedure WMNCCalcSize(var Message: TWMNCCalcSize); message WM_NCCALCSIZE;
procedure WMNCPaint(var Message: TWMNCPaint); message WM_NCPAINT;
protected
function CanAutoSize(var NewWidth, NewHeight: Integer): Boolean; override;
function DoMouseWheelDown(Shift: TShiftState; MousePos: TPoint): Boolean; override;
function DoMouseWheelUp(Shift: TShiftState; MousePos: TPoint): Boolean; override;
procedure CreateParams(var Params: TCreateParams); override;
procedure CreateWnd; override;
procedure DrawBorder; virtual;
procedure KeyDown(var Key: Word; Shift: TShiftState); override;
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer); override;
procedure PostCloseUp(Accept: Boolean);
procedure UpdateBorderWidth;
public
constructor Create(AOwner: TComponent); override;
property Color;
property Ctl3D;
end;
Top
4 楼liuzq（）回复于 2004-12-01 23:37:42 得分 0
这里的“接口”，怎样定义和使用啊？Top
相关问题
关键词
得分解答快速导航
相关链接
广告也精彩
反馈
