本文整理自网络,侵删。
有时我们需要在程序运行是知道当前是什么版本,当然查程序文件的属性也只可以看到,但这样太麻烦了。
可以用以下方法调用: //要在uses中添加引用单元:Version; procedure TForm1.FormSet;var pVer : tVersion;begin pVer := Tversion.Create(ParamStr(0)); x_pVerNo := pVer.FileVersion; x_pProgramName := pVer.InternalName; x_pComments := pVer.FileDescription; pVer.Free; end;
相关阅读 >>
Delphi 动态给combobox赋值,从combobox中取值
更多相关阅读请进入《Delphi》频道 >>