菜鸟求助,恳请不吝赐教 ( 积分: 200 )

  • 主题发起人 主题发起人 parcel
  • 开始时间 开始时间
P

parcel

Unregistered / Unconfirmed
GUEST, unregistred user!
我刚刚接触控件开发,照书上说的在代码编辑框中直接输入一控件的说明,包括敲进:
flabel:tlabel;
fedit:tedit;
但是编译的时候总出错,说明是:tlabel is not declared
是不是编写控件还少什末步骤?
另外,我先建立一个form,用鼠标点取一个label,一个edit;再建立一个PROJECT,添加一个form,把先前建立的form的代码编辑框中的代码,如:label1:tlabel考进新的form的代码编辑框中,原意是让新的form中自动生成label和edit,但是出错,提示仍然是:tlabel is not decleared, 我猜想这俩个问题是因一个原因导致的,我查了很多书,都没有得到解答,恳请朋友们助一臂之力,不胜感激
 
我刚刚接触控件开发,照书上说的在代码编辑框中直接输入一控件的说明,包括敲进:
flabel:tlabel;
fedit:tedit;
但是编译的时候总出错,说明是:tlabel is not declared
是不是编写控件还少什末步骤?
另外,我先建立一个form,用鼠标点取一个label,一个edit;再建立一个PROJECT,添加一个form,把先前建立的form的代码编辑框中的代码,如:label1:tlabel考进新的form的代码编辑框中,原意是让新的form中自动生成label和edit,但是出错,提示仍然是:tlabel is not decleared, 我猜想这俩个问题是因一个原因导致的,我查了很多书,都没有得到解答,恳请朋友们助一臂之力,不胜感激
 
兄弟你不是没有引用单元吧。
 
我是新手,你说一说按照你的方法,应该怎样?没有引用哪个单元?
 
当你看到Txxx is not declare错误时
把鼠标辞点在那个Txxx处,按F1进入帮助
这个类的单元就在帮助中,如TLabel:
Unit
StdCtrls
要注意,同一个类的单元一般有俩套,Q开头的不是对Windows环境的
如,TLabel的另外一套帮助:
Unit
QStdCtrls
这是针对linux环境的
(补充:然后,你在出错单元适当地方uses它就可以了)
 
你不是在form 里面放Label了吗,
进入代码窗口按住Ctrl 用鼠标点击Tlabel就进入相应单元了。
 
上面是回你的第一个问题,下面是第二个问题


>另外,我先建立一个form,用鼠标点取一个label,一个edit;再建立一个PROJECT,添加一个form,把先前建立的form的代码编辑框中的代码,如:label1:tlabel考进新的form的代码编辑框中,原意是让新的form中自动生成label和edit,但是出错,提示仍然是:tlabel is not decleared, 我猜想这俩个问题是因一个原因导致的,我查了很多书,都没有得到解答,恳请朋友们助一臂之力,不胜感激
============
Form中的可视化元素不能这样添加,form还有一个对应的dfm文件,你这样添加元素
dfm不会自动维护
 
我有一个关于操作Excel的问题,对于设置Excel的行高,可以采用下面语句:
ExcelApp.ActiveSheet.Rows[2].RowHeight:= 19;
ExcelApp.ActiveSheet.Rows[10].RowHeight:= 19;
能否采用范围(range)的方式,直接设置2到10行的行高为19;
谢谢!
对于是否引用单元,在uses处引用就可以了;
如:uses unit1,unit1保存的文件为form1,则在form2上就可以引用,Edit2.Text:=Form1.Edit1.text;
 
to wjava,
利用Server页的Excel对象,有代码自动完成功能,能否使用一目了然
或者,在excel的宏中调试
 
to张鸿林:
在宏中调试过,也试过好几种方式,均报错;
对于利用Server页的Excel对象,有代码自动完成功能,由于我使用的comobj,而现在我的delphi上3个Excel的控件都没有(怀了重新安装),所以现在还是不可以,我现在的Excel的行高是一行一行的命令执行,如果能一批执行,效率会提升很多,尤其是行比较多的情况下;
您能否给我测试一下?拜托
 
vba:
Rows("2:10").Select
Selection.RowHeight = 19
 
to张鸿林:
您好!
vba:Rows("2:10").Select
Selection.RowHeight = 19
的宏我是清楚的,在Delphi中却不可以这样使用,后来我在网上查询了一些资料以及试用了一些方法,发现下面的方法用Delphi(Comobj)操作Excel是有效的:
ExcelApp.ActiveSheet.Range['A2:E20'].rows.rowheight:=20;
在此非常感谢张鸿林
 
十分感谢张鸿林老师和strongburn的热心帮助,由于我的机器没有上网,现在在网吧里面无法采用朋友们的建议在计算机上加以验证,所以请朋友们耐心等待,PARCEL深表歉意。
 
接受答案了.
 
后退
顶部