Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Build version
Message
De
11/03/2003 13:51:17
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
00764346
Message ID:
00764382
Vues:
26
Geoff,

Okay, just reread a couple of messages ago...

Here is some code from a simple "about" dialog...this form has an editbox on it (called edit1) that is readonly. Put this code in the init() method of the form; if you run this form from inside of the .exe you will see the name of the .exe and the version.
local laVersion, ;
		crlf
		
crlf = chr(13) + chr(10)

dimension laVersion[1]
agetfileversion(laVersion,sys(16,1))	

with this.edit1
	.value = ''
	.value = .value + "   Company: " + laVersion[2] + crlf
	.value = .value + "Executable:  " + laVersion[8] + crlf
	.value = .value + "   Version:  " + laVersion[4]
endwith
>Hi Steve
>
>This is where I started out, I thought there might be a more direct route but apparently not.
>
>Regards
>Geoff Scott
>
>>In command window:
>>
>>
>>AGetFileVersion(aVersion, "myprogram.exe")
>>? aVersion[4]
>>
>>
>>But I don't think the error you are currently getting has anything to do with the version in an .exe. What exactly is the error message and error number? And when does it occur?
>>
>>>No, not sure what happened. Was playing in the command window.
>>>
>>>How do I access my project version number from my runtime exe???
>>>
Steve Gibson
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform