You are viewing an old version of this page. View the current version.

Compare with Current View Page History

Version 1 Next »

[ |../../index.htm#lansa/srvgudba_0650.htm]
You are here:

6.81.1 VB Example

' get Version
dim l as long, dVer as double
' get version
l = LceVersion(False, 0)
' extract major / minor version and set in m.nn format 
dVer = l \ &H10000 + ((l Mod &H10000) \ 100) / 100 
lbLansaVer.caption = str(dVer)
 
[ |../../index.htm#lansa/srvgudba_0650.htm]

  • No labels