1,定义一个TBaseForm,在TBaseForm中定义抽像函数 procedure TBaseForm.dj();abstract;
2,TFormDz17继承于TBaseForm,再继承dj函数
3,function dj_read(form1:TBaseForm; ):string;
begin
form1.dj();//根据传入的form,调用相应的函数
end;
2,TFormDz17继承于TBaseForm,再继承dj函数
3,function dj_read(form1:TBaseForm; ):string;
begin
form1.dj();//根据传入的form,调用相应的函数
end;
解决方案 »
- sql求和语句出的小问题,急急!!!!
- 使用TIdTCPClient的readln时候,如何获取异常 在线等
- 我想将Image的图片加入到数据库指定的字段里面怎么加???
- 关于私活报价咨询,看有哪位做过健身房管理系统的给估个价
- 急急急,该怎样用程序做数据备份啊??在线等待,100分重谢!
- 加上版本信息就会被杀毒软件报病毒
- 怎么让文本框中的文字居右对齐?
- 如何在线程中调用主进程的mts(com+)资源,delphi5问题
- 如何解决显示图象问题?谢谢了
- 请问用多线程会至使程序出错吗
- 求教:adoquery多表查询,单表更新
- 散分,不记得多久没来过了,发布一个自己写的软件,H264/AAC录制视音频,保存FLV,支持RTMP直播,delphi写的主程序,这么多年了还是喜欢delphi
直接调用即可