skyjacker
版主
茶农
UID 2239
Digest Posts
9
Credits 617
Posts 269
点点分 617
Reading Access 100
Registered 2006-6-8
Status Offline
|
|
SkyJacker,what is your real name? Dennis Kjaer Christensen
今天给 《BasmForBeginner》的作者 Dennis Kjaer Christensen 写了一封信,寻求帮助。
很感谢,当天就得到了 Dennis Kjaer Christensen 的无私帮助。
不过令我意外的是,他不认为我的真实名字是 SkyJacker,郁闷。
我的蹩脚的 English Email 原文:
About the benchmark in BasmForBeginner
Dear, Dennis Christensen
I am SkyJacker,I need you help for the benchmark in BasmForBeginner.
First,sorry my poor English.
I am a Chinese programmer, I'm translating your BasmForBeginner-en.doc to Chinese。
I called it BasmForBeginner-cn.doc
I have finished its draft, but I need the full function about the benchmark to understand your meaning.
like these:
var
Starttime, Endtime, Runtime : TDateTime;
I, LoopResult : Integer;
RunTimeSec, NoOfLoopsPerSec, NoOfLoops, ClockCount, LoopEnd2Float, LoopEndFloat, LoopStartFloat : Double;
begin
Starttime := Time;
for I := 1 to LOOPEND2 do
begin
LoopResult := ForLoopNoLoopInverNoName(LOOPSTART, LOOPEND);
end;
Endtime := Time;
Runtime := Endtime - Starttime;
CEdit.Text := IntToStr(LoopResult);
RuntimeEdit4.Text := TimeToStr(Runtime);
RunTimeSec := RunTime*24*60*60;
LoopEnd2Float := LOOPEND2;
LoopEndFloat := LOOPEND;
LoopStartFloat := LOOPSTART;
NoOfLoops := LoopEnd2Float * (LoopEndFloat - LoopStartFloat);
NoOfLoopsPerSec := NoOfLoops / RunTimeSec;
ClockCount := CLOCK / NoOfLoopsPerSec;
ClockCountEdit4.Text := FloatToStrf(ClockCount, ffFixed, 9, 1);
end;
Can you provide the form version for me? suchs as .dfm,.pas and so on.
Thank you very much.
Best regards
SkyJacker
Msn&Email: HeMiaoYu@gmail.com
http://www.cnpack.org/index.php?lang=en
CnPack Team is made up of Chinese Programmers and Delphi / C++ Builder fans across the Internet.
It's an Open Source organizition.
Dennis Kjaer Christensen的回复(包括 benchmark source ):
Hi
What is your real name?
Have fun with the translation , it is a good idea. Have you seen that there is a russian translation too?
I have attached all the benchmark source files in a zip.
Feel free to ask any questions.
Let me know how you are progressing and what you think about the BasmForBeginners "book".
Best regards
Dennis Kjaer Christensen
[ 本帖最后由 skyjacker 于 2007-4-24 22:31 编辑 ]
|
一壶清茶煮青春.
|
|
|