招delphi程序员，工作在广州，月薪2000---4000元人民币 （你喜欢思考问题吗，来看一看我的想法，讨论一下，反对也可以，只要有道理）；（哇，他竟然骂我

我的程序真有一个问题：一般运行肯定没问题，但在某种情况下，还是会失去作用，
你看出来了吗？
什么特殊情况？
跟数据库记录有关？还是跟你的浮点数操作有关？或者是其他？
 
******************************************************************************
* if aquCJ.Eof then
Exit ;
//如果没有数据，不能排序
******************************************************************************
应改为：
******************************************************************************
* IF aquCJ.RecordCount = 0 then
EXIT;
//如果没有数据，不能排序
******************************************************************************
我想是这样
 
是不是在广州,地址在哪里?
 
to pyzfl:我上个星期帮人写了一个小程序
办公室领用酒管理系统
其实大多数单位不需要，只用于酒类行业，下一步我想改成办公用品邻用管理系统
你瞧一下
发过来了
oicq:173656645
qq时间: 8:00-17:00
 
大哥你的程序错误在于
if aquCJ.Eof then
Exit //如果没有数据，不能排序
** aquCJ.Eof 不是表示数据集没有数据，而是表示当前记录是否是数据集的末记录
应该改为“ if aquCJ.IsEmpty then
Exit //
 
to pyzfl:我犯了一个错误，我不知你的email
 
晕......
看了好久,还算是一个好的帖,我是一直用DELPHI,主要做数据库
希望能和高手交流.
MYQQ:87466195
 
气量太小，自视过高，满纸狂言，“非常可乐”。
这种老板，打死我都不会给他干。。。
 
呵呵，我最近正计划搞一个零代码的开发平台，有兴趣可以看看这个贴：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1206721
同时当前正在找新婆家（有2-3年的ERP开发实施经验），不知道合不合格，以下是联系方式：
QQ：48999897
EMail：lizaiying12@163.com
有意的话，请与我联系！
 
　　本来还有点话想要说的，关于程序质量控制和团队合作精神及至中国人的劣根性的，
但是看大家都有点累了，我也就趁早收场了。
　　水至清则无鱼，人至察则无徒，镜至明则无圆，话至理则无......！
　　
　　如果有人想应聘的话，还是一如已往，发简历、代码、目录过来。
　　不过有一句，还是要很“刻薄与计较”地提醒诸位的：“编不出好程序，甭想在我这
里混！”
　　本人心胸开阔，如有分歧，很可能会争个半死，但决不会气死，因为和我争的，都是
朋友。否则，我是比较宽容的。
　　Email:pYZFL@163.COM
电话：020-84304309
手机：13533196715
　　
　　谢谢大家的参与，对我来说，本贴到此结束。其它人如还有兴趣，尽可讨论下去，
请恕本人不再回贴！
　　再次谢谢大家！
　　另外，如有时间，我还想另开贴子讨论一下这些问题：
　　　　如何编好程序？
　　　　如何作好程序员？
　　　　如何作出好程序？
　　看时间了。
　　如觉得本贴有价值，尽可收藏下来，今晚九点后我将给jackl发分接收答案！
 
to PYZFL:我的程序看了没有
 
pyzfl像唐僧，说话机机歪歪，罗里罗唆，不会是搞政治出身的吧？
 
真烦！定义一个动态数组，一次把数据排序写入，再一次写回不是很好吗！
一边读一边写，还带循环，有你这么写程序的人吗？我学编程还不到两个月，可我
觉得大家实在不这么样啊！还delphi高手。。。不需要我这个菜鸟把整个代码写出来吧？
type
item=reocord
a1:int;学号
a2：int;名次
end;
var item :array of items;
function sort:boolean;
//记录排序并写入数组
function update:boolean;
//数组中的数据写回数据库

 
TO: qyzfl
if aquCJ.Eof then
Exit ;

//上面这句有个明显错误,你自己已说了,我就不讲了.但是,还有一个问题,你没有判断
//你的aquCJ是打开的.如果在执行这句代码之前,aquCJ被关闭,你的程序会出错!如果你完全
//肯定aquCJ是打开的,那下面的
if aquCJ.Active then
//这句就是废话了,对吗?
aquCJ.Close;
 
to yyk518：
　　是的，一点没错。
　　谢谢你，果然没让我失望，网上确实有高手。
　　今晚九点给分！
　　本不该说话的，但你真心指出我的错误，我一定要说：
　　谢谢！
　　　　　　　PYZFL
 
TO: qyzfl
你的代码写得不错啊，命名也很规范，看得出你是一个熟手，但我认为你的注释写得过多。
这个并不好，我认为好的注释只是对程序中比较复杂的算法进行注解，这样就能起到点睛之笔，
对于象数据记录前移这样的代码没必要注释！
还有你的代码我认为有些冗长，代码重复较多，你应该进行代码重构，对于一些操作可以考虑
建立方法，这样可以降低整体方法的构成粒度，有得于代码重用！
你可以看看这本书《Refactoring》，很有用的！
 
还有这个语句：
while aquCJ.Eof = false do
感觉很别扭。真正的高手是不会这么写的，我记得有一篇文章对这些编程的技巧和习惯进行
过深入的探讨。应该为
while not aquCJ.Eof do
是不是有点吹毛求疵啦，哈哈！不过既然是进行团队开发，在这方面就应该要求严格一点，
因为代码不是写给一个人看的，必要的开发规范是必需的！
 
TO: pyzfl
呵呵,过奖,过奖!我并不是高手,只是对Delphi比较熟悉而已(只是相对于我会的
其它开发工具).其实我看了你的贴子之后非常佩服你,你说的几乎无可挑剔,编的代码
条理也很清楚,有机会一定找你合作、向你学习!希望与你交个朋友,我的QQ:57438202
 
　　谢谢两位，其实我希望的就是能有这么一种互相研讨的气氛，这样，程序才能精练、
有效、健壮。
　　其实我的DELPHI真的不怎么样，是刚从VB转过来的，IsEmpty 这个属性我好象在VB
中没有见过。循环语句是昨晚看着书写的，“not aquCJ.Eof ”记得可以用，但不太清
楚对不对，又不想再查书了，就用了“aquCJ.Eof = false ”；
“if aquCJ.Active then
//这句就是废话了,对吗?
　　aquCJ.Close;”　写完后就想到了，要改又觉得没意思，所以我也不管它，看能不
能有人找出来，实际我是想让小乙找的，可惜......。
　　说对毛病，我真的很高兴，有机会一定和两位多作交流。
　　
　　另外那位用动态数组的，不知有没有考虑过如果有50000条记录会怎么样？
 
To pyzfl:
善意地讲一句，如果想在软件方面成就事业，最好对“一个产品是什么”做下研究。
有技术不等于可以做项目管理也不等于可以做产品经理。
否则，我只能祝你运气好了。
怎么也好，在这里祝你事业顺利。
 
您必须登录或注册才可回复。

Similar threads

S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
[转]ClientDataSet加上TDataSetProvider的数据保存问题
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
[原]OrangeUI－Delphi移动开发利器
回复
0
查看
2K
DelphiTeacher的专栏
D
D
[原]OrangeUI－Delphi移动开发利器
回复
0
查看
2K
DelphiTeacher的专栏
D
D
[原]OrangeUI－Delphi移动开发利器
回复
0
查看
1K
DelphiTeacher的专栏
D
顶部