Delphi 制作组件
小弟以前都是做数据库方面的程序,现在突然要做界面UI了,请教高手们用Delphi 制作自己需要的组件,应该怎么做??
有没有什么好的资料提供下也行,最好有例子的!!
补充:就是自定义控件方法,都没人知道吗?
或者有电子也更好,实在没有资料的话,提供几本书名让我参考一下也好
答案:找一本书看一下吧,你要的知识,可不是一句二句,能说清楚的。很多书上都有做控件的介绍。有时我也想做个控件,但都没有机会,就说combobox组件吧,这个组件,什么都好,但就是没有只读属性设置,于是我就想自己做一个,把只读属性加进去,后来一次偶然的机会,我发现DBcombobox组件有只读属性设置,而且其它都和combobox组件一样,这下就不需要我自己做了。
其他:简单的就这样就行了。你还可以加上3次密码错误自动关闭、验证码之类的。。
还可以加上try语句。。手打太麻翻了。。自己改吧
form上放2个edit控件,UsernameEdit,PasswordEdit;
2个button,OkButton,CancleButton,
对OkButton的Onclick事件写代码
if trim(UsernameEdit.text)<>'' then
begin
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from 用户表 where 用户名='+''''+trim(UsernameEdit.text)+'''');
adoquery1.open;
if adoquery1.recordcount = 1 then
begin
if trim(adoquery1.fieldbyname('密码').asstring) = trim(PasswordEdit.text) then
//打开form2
end;
end;
上一个:无壳Delphi软件修改不了
下一个:Delphi 中错误怎么解决 请看图片 谢谢了