一个关于组件注册的问题

Question

和安装别的package的包一样就可以了。

Answer 1

在你的程序里应该有注册到哪个组件里区的吧，例如：过程
procedure Register;
begin
  RegisterComponents(‘组件明', [sample]);
end;
然后component->installcomponent！ 到你指定的地方去了

Answer 2

可能是我没讲明白，此组件时小弟手工编写的（没有用组件的生成器
生成）所以没有
 procedure Register;implementationprocedure Register;
begin
  RegisterComponents('Samples', [TEditLine]);
end;
之类的语句，但问题是我手工加上也无法注册，（注：此组件是一个窗体组件，即：组件的类只是为了将窗体包装成可重用的组件）；

Answer 3

右键点击窗体的空白处， 选择菜单Add to Repository...
然后就可以了。
要使用时，主菜单-〉File->New...->Forms里面可以看到。

Answer 4

谢谢上面的，我的意思是做一个象OpenDialog那样的对话框组件，可其他的都成功了，就是组件注册不上。

Answer 5

用我的办法就可以了。
Try!

Answer 6

"但我在组件面板上怎么也找不到它。 "
那你注册的句子怎么写的？？？
比如：RegisterComponent (...)

Answer 7

RegisterComponents('Samples', [Tlog]);

Answer 8

那么应当在 Samples 页上呀。
这样解决问题太麻烦了！
如果可以的话，把你的东西发给我一份
帮你看看。
[email protected]

Answer 9

好了。把下面的单元保存起来，加到组件包里。
再把Login.pas里没用的Register删除。
可能是Delphi不认那个Register.
unit LoginReg;interfaceuses
  Windows, Messages, SysUtils, Classes,
  Graphics, Controls, Forms, Dialogs, Login;procedure Register;implementationprocedure Register;
begin
  RegisterComponents('Standard', [TLoginCtrl]);
end;end.
 

Answer 10

一点建议：
1.虽然Pascal语言不区分大小写，但还是建议程序员自己来保证大小写的一致。
  Exp: operaterid      => OperatorId;
       departmentname  => DepartmentName;
这样显然更为清楚。
2.私有属性的命名最好带有类型;
  Exp:
     fbranchid:integer;   => FiBranchId: Integer;          //所在科室ID
     fdoctorname:string;  => FsDoctorName: String;         //医生姓名
     fsex:integer;        => FiSex: Integer;               //医生性别一点意见，欢迎批评指正。

Answer 11

比如医生性别,可一定义一个枚举类型
Type
  TGender = ( gMale, gFeMale );FGender: TGender; //医生性别
用枚举的好处是不需要去记0是什么，1又是什么。啊，可能我有些吹毛求疵了。

Answer 12

谢谢Musicwind，我今后会注意的……

Answer 13

to fuchao(冠宇)　:
   老兄我给你发的Mail有没有收到，问题解决了没有？？？