1

Konu: Versiyon Numarası

Projeyi exe yaparken Build options bölümünden versiyonu yazıyorum. Daha sonra bu yazdığım versiyonu program içinden kodla nasıl ulaşabilirim.

2

Re: Versiyon Numarası

Local laVersion[1]
AGetFileVersion(laVersion, "benim_exem.exe")
?laVersion[4]


Bu kod işini görür sanırım.

3

Re: Versiyon Numarası

Evet. İstediğim buydu. Çok teşekkür ederim.

4

Re: Versiyon Numarası

Dosya isminden bağımsız çalışan bir kod için;

Visual Fox Pro
? SurumGetir()

 
Function SurumGetir
    Local Array laDosya(1)
    AGetFileVersion(m.laDosya, SYS(16,1))
    If Type("m.laDosya(4)") = "C"
        Return m.laDosya(4)
    Else
        Return "?.?.?"
    EndIf
EndFunc
/o---------------------o\
     www.haser.com
\o---------------------o/

5

Re: Versiyon Numarası

Versiyon no yanında, Derleme tarihini de aynı yöntemle elde etme şansımız var mı acaba ?

6

Re: Versiyon Numarası

Visual Fox Pro
WAIT WINDOW FDATE("your_exe.exe")

7

Re: Versiyon Numarası

Şu an çalışan .exe olarak nasıl verilebilir.
Yani sabit olarak .exe ismi vermeden, aktif çalışan .exe kütüğü diye nasıl belirtilebilir ?

8

Re: Versiyon Numarası

Visual Fox Pro
fdate(SYS(16,1)))

9

Re: Versiyon Numarası

Application.ServerName

10

Re: Versiyon Numarası

Çok teşekkürler.