社区
Delphi
帖子详情
怎样获取应用程序的版本号?
zcn
2000-09-12 04:11:00
在用delphi编程时,我在delphi的project|options菜单项中设置了应用程序的版本号.
然后,我又编了一个about界面,我想在about界面显示时用程序获取我开始设的版本号.这个用什么语句或方法实现?
...全文
178
3
打赏
收藏
怎样获取应用程序的版本号?
在用delphi编程时,我在delphi的project|options菜单项中设置了应用程序的版本号. 然后,我又编了一个about界面,我想在about界面显示时用程序获取我开始设的版本号.这个用什么语句或方法实现?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
hhzh426
2001-07-26
打赏
举报
回复
借花献佛:
function FileVersion(FileName: String):string;
var
InfoSize, unuse: DWORD;
VerBuf: Pointer;
FI: PVSFixedFileInfo;
VerSize: DWORD;
MajorMinor,ReleaseBuild :DWORD;
begin
unuse :=0;
MajorMinor := 0;//Major,Minor 如:00010001代表1.1
ReleaseBuild := 0;//Release,Build 如00121208代表12.1208 则版本为1.1.12.1208
result :='unknown';
InfoSize := GetFileVersionInfoSize(PChar(FileName), unuse);
if InfoSize <> 0 then
begin
GetMem(VerBuf, InfoSize);
try
if GetFileVersionInfo(PChar(FileName), unuse, InfoSize, VerBuf) then
if VerQueryValue(VerBuf, '\', Pointer(FI), VerSize) then
begin
MajorMinor := FI.dwFileVersionMS;
ReleaseBuild := FI.dwFileVersionLS;
end;
finally
FreeMem(VerBuf);
end;
result :=IntToStr(MajorMinor shr 16) + '.' + IntToStr(MajorMinor and $ffff) + '.' + IntToStr(ReleaseBuild shr 16) + '.' + IntToStr(ReleaseBuild and $ffff);
end;
end;
zxghl
2000-09-12
打赏
举报
回复
有API。不过我觉得麻烦。直接写上去不就得了?嘿嘿。反正那个数字是自己定的。
szdino
2000-09-12
打赏
举报
回复
我也问过这个问题...没得到回答
Android如何
获取
当前应用
版本号
?
一下代码可以
获取
当前应用的
版本号
,如果有需求的话是可以通过比较我们当前的系统
版本号
和服务器返回的系统
版本号
,从而判断是否需要进行升级,所以,这个需求还是很常见的,具体代码如下所示: /** *
获取
版本号
...
uniapp
获取
app应用
版本号
uniapp
获取
app应用
版本号
uniapp
获取
app
版本号
、h5
版本号
、微信小程序
版本号
的方法
uniapp
获取
app
版本号
、h5
版本号
、微信小程序
版本号
的方法
c#
获取
程序
版本号
c#
获取
程序
版本号
c#
获取
程序
版本号
Properties-AssemblyInfo.cs里面改 或者项目-右键-属性-
应用程序
-程序集信息 Content.Text = "程序集版本:" + System.Reflection.Assembly.GetExecutingAssembly().GetName...
如何
获取
应用程序
的
版本号
和版本名
实现
获取
应用程序
的
版本号
和坂本名,通过
获取
包管理器开始;步骤如下: 程序如下public class MainActivity extends AppCompatActivity { Context mContext; private TextView mMVersionCode;//版本code private ...
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章