配置:PIII500,256M,Windows2000
VC 6.0, Delphi 6.0结果可能比较片面,但也反映出了一些事实。比较一:VC(结果:10975)
void CTestspeedDlg::OnButton1()
{
int i,j,k;
CString s;
j=GetTickCount();
k=0;
for (i=0;i<1000000000;i++)
k++;
s.Format("%d",GetTickCount()-j);
SetWindowText(s);
}Delphi(结果:4066)
procedure TForm1.Button1Click(Sender: TObject);
var
i,j,k:Integer;
begin
j := GetTickCount;
k := 0;
for i:=0 to 999999999 do
k := k+1;
Caption := IntToStr(GetTickCount-j);
end;结论:速度Delphi是VC的2.7倍比较二:
VC(结果:29913)
void CTestspeedDlg::OnButton1()
{
int a[100][100];
int i,j,k,m;
CString s;
m=GetTickCount();
for (i=0;i<100;i++)
for (j=0;j<100;j++)
a[i][j]=0;
for (k=0;k<100000;k++)
for (i=0;i<100;i++)
for (j=0;j<100;j++)
a[i][j]++;
s.Format("%d",GetTickCount()-m);
SetWindowText(s);
}Delphi(结果:14831)
procedure TForm1.Button1Click(Sender: TObject);
var
a:array[0..99,0..99] of integer;
i,j,k,m:Integer;
begin
m := GetTickCount;
for i:=0 to 99 do
for j:=0 to 99 do
a[i][j]:=0;
for k:=0 to 99999 do
for i:=0 to 99 do
for j:=0 to 99 do
a[i][j]:=a[i][j]+1;
Caption:=IntToStr(GetTickCount-m);
end;结论:速度Delphi是VC的2.0倍
VC 6.0, Delphi 6.0结果可能比较片面,但也反映出了一些事实。比较一:VC(结果:10975)
void CTestspeedDlg::OnButton1()
{
int i,j,k;
CString s;
j=GetTickCount();
k=0;
for (i=0;i<1000000000;i++)
k++;
s.Format("%d",GetTickCount()-j);
SetWindowText(s);
}Delphi(结果:4066)
procedure TForm1.Button1Click(Sender: TObject);
var
i,j,k:Integer;
begin
j := GetTickCount;
k := 0;
for i:=0 to 999999999 do
k := k+1;
Caption := IntToStr(GetTickCount-j);
end;结论:速度Delphi是VC的2.7倍比较二:
VC(结果:29913)
void CTestspeedDlg::OnButton1()
{
int a[100][100];
int i,j,k,m;
CString s;
m=GetTickCount();
for (i=0;i<100;i++)
for (j=0;j<100;j++)
a[i][j]=0;
for (k=0;k<100000;k++)
for (i=0;i<100;i++)
for (j=0;j<100;j++)
a[i][j]++;
s.Format("%d",GetTickCount()-m);
SetWindowText(s);
}Delphi(结果:14831)
procedure TForm1.Button1Click(Sender: TObject);
var
a:array[0..99,0..99] of integer;
i,j,k,m:Integer;
begin
m := GetTickCount;
for i:=0 to 99 do
for j:=0 to 99 do
a[i][j]:=0;
for k:=0 to 99999 do
for i:=0 to 99 do
for j:=0 to 99 do
a[i][j]:=a[i][j]+1;
Caption:=IntToStr(GetTickCount-m);
end;结论:速度Delphi是VC的2.0倍
解决方案 »
- 请问下32位图的AlphaBlend的显示问题?
- 求两本书MFC书的IBSN号
- 重回CSDN,放200分。
- ClassWizard里可以将某种控件映射为一个变量究竟是如何实现的?
- InstallShield For VC++两问
- 初学者告急:显示巨量的数据,采用LVS_OWNERDRAWFIXED风格ListView控件是否可以?还是要用LVS_OWNERDATA?
- 请教高手
- 如何在Windows下使用TC++或C语言来进行网络编程
- 怎么反编译DLL 文件,看它的实现过程和调用函数
- 求教:怎样获取操作系统的临时文件夹?
- 急用!!!关于cj60lib的刷新问题?请各位大哥指教!不胜感激!
- 简单问题::怎么样得到桌面的句柄?
这种同门兄弟都不能向下兼容,先解决了家事在来比较。
要比速度的话,干嘛不用ASM来写软件呢?
要比速度的话,干嘛不用ASM来写软件呢?
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。0D
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。
0A
★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]
2者汇编出来的指令可能不一样。
2者汇编出来的指令可能不一样
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]
测试一
Debug 1812
Release 0测试二
Debug 20950
Release 1823这测试与机器速度有关,但足以说明Release比Debug快十倍以上,那么,大家说,是VC快还是Delphi?
VC 450ms (Rlease)BCB 240 ms (Release) 一直不知什么原因!
你试试用静态库。
偶觉得可以看看他们分别生成的汇编码,再来分析一个为什么。另外,虽然我现在手头上没有vc/delphi,但我觉得瓶颈可能在这个地方:
s.Format("%d",GetTickCount()-j);
和
IntToStr(GetTickCount-j);delphi我不是很清楚,不过看这个函数名,好像是很单纯的把一个int变成字符串。当然效率高。
而csting的format函数,得支持各种格式到字符串的转换,而且,还需要仔细的解析他的第一个参数,很麻烦很麻烦的(对了,这个函数好像是属于那种根据第一个参数的信息来自己清除堆栈的),那么效率要是高就有鬼了。
所以,如果把上面的两行代码去掉,或者vc的换成itoa函数,那么我想vc不会比delphi慢的^_^请楼主验证一下:))))))))
所以Format不可能是瓶颈。
VC++怎么说都比Delphi快,也许刚从事编程的人很关注代码的速度,编多了,别说去管速度,就是一点点优化也懒得去搞。
编程这行当,需要你通多种语言,灵活运用,要写界面,Delphi肯定要快,如果要写底层,高效率,实时程序,你恐怕不得不选VC。
简单一些,就是价值取向不同。