真是初生牛犊不怕虎,本来只是想给自己一点压力,好好学学Delphi的,才挑了这么个题目(实现gif动画的ActiveX控件),没想到半个月下来,弄的我胶头烂额,还是一头雾水,更可气的是还被人泼了一头冷水,“这都是老鸟级的高手做的,象你这种连菜鸟都不算的还来做控件?”
就快要交了,那位高手能指导我一下,我急呀,连晚上做梦都梦见在做。
说正题
1.我需要用到image 和 timer 控件,那么我是选Active Form还是选ActiveX control,如果是后者,我该继承哪个类?
2.我创建了属性页,该如何与组件联系起来?
照着一本书做了一个简单的Button,在联系组件时,出错如下
procedure TPropertypage1.UpdatePropertyPage;
begin
//修改属性页的标题和显示位置
oleobject.caption:=txtcaption.Text; <---oleobject.后无法出现联想
oleobject.Top:=StrTOInt(txtTop.Text);
end;
procedure TPropertypage1.UpdateObject;
begin
//修改两个文本框中显示的字符串
txtcaption.Text:=oleobject.caption;
txtTop.Text:=IntTOStr(oleobject.Top);
end;
也可QQ联系56313419 (注明Delphi)
问题解决一定倾囊送分!
就快要交了,那位高手能指导我一下,我急呀,连晚上做梦都梦见在做。
说正题
1.我需要用到image 和 timer 控件,那么我是选Active Form还是选ActiveX control,如果是后者,我该继承哪个类?
2.我创建了属性页,该如何与组件联系起来?
照着一本书做了一个简单的Button,在联系组件时,出错如下
procedure TPropertypage1.UpdatePropertyPage;
begin
//修改属性页的标题和显示位置
oleobject.caption:=txtcaption.Text; <---oleobject.后无法出现联想
oleobject.Top:=StrTOInt(txtTop.Text);
end;
procedure TPropertypage1.UpdateObject;
begin
//修改两个文本框中显示的字符串
txtcaption.Text:=oleobject.caption;
txtTop.Text:=IntTOStr(oleobject.Top);
end;
也可QQ联系56313419 (注明Delphi)
问题解决一定倾囊送分!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货