Java7 Java6 Version Kontrolde Takıldım

[MostWanted]

Sana attıklarım 64 bit sistemde de 32 bit sistemde de 32 bit java sürümlerini bulur.Senin yaptığın ise 32 bit sistemde 32 bit javay bakar 64 bit sistem de 64 bit javaya bakar.Eğer 64 bit sistemde de 64 bitlik java kuruluysa aradaki farkı anlamaman normaldir.Ama emin ol işine yarayan o.Ayrıca o kodlar zaten otomatik olarak wow6432 ye gidiyor veya gitmiyor ona göre ayarlı.

Edited June 18, 2012 by MostWanted

[pairs]

Mostwanted haklı bence en iyi yol regeditten çekmek.Daha hızlı ve kararlı olur.

Edited June 19, 2012 by pairs

[radyofon]

[quote name='MostWanted' date='19 June 2012 - 00:09 ' timestamp='1340053767' post='1213365']
Sana attıklarım 64 bit sistemde de 32 bit sistemde de 32 bit java sürümlerini bulur.Senin yaptığın ise 32 bit sistemde 32 bit javay bakar 64 bit sistem de 64 bit javaya bakar.Eğer 64 bit sistemde de 64 bitlik java kuruluysa aradaki farkı anlamaman normaldir.Ama emin ol işine yarayan o.Ayrıca o kodlar zaten otomatik olarak wow6432 ye gidiyor veya gitmiyor ona göre ayarlı.
[/quote]

MostWanted' a teşekkür ederim fakat bu kodlar eksik. Ben de 64bit OS ve 32bit java 6u25 var. Program maalesef kayıtları göstermiyor. Çünkü OS 64bit ve uygulama 32bit ise java Wow6432 altına kuruluyor. Bu durumda benim kullandıklarım işe yarıyor. Dediğim gibi galiba ikisini birleştirmek daha da doğru olabilir.

[MostWanted]

[code]if (System.Is64BitOS()) then
sVersions = Wow64.RegistryDoesKeyExist(HKEY_LOCAL_MACHINE, "SOFTWARE\\JavaSoft\\Java Runtime Environment",Wow64.KEY64)
else
sVersions = Wow64.RegistryDoesKeyExist(HKEY_LOCAL_MACHINE, "SOFTWARE\\JavaSoft\\Java Runtime Environment",Wow64.KEY32)
end

if sVersions == nil then
Dialog.Message("Hata", "Sisteminizde Java Run Environment bulunamadı.")
else
if (System.Is64BitOS()) then
sJava6= Wow64.RegistryGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\JavaSoft\\Java Runtime Environment","Java6FamilyVersion",false,Wow64.KEY64)
sJava7= Wow64.RegistryGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\JavaSoft\\Java Runtime Environment","Java7FamilyVersion",false,Wow64.KEY64)
sJava32_6= Wow64.RegistryGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\JavaSoft\\Java Runtime Environment","Java6FamilyVersion",false,Wow64.KEY32)
sJava32_7= Wow64.RegistryGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\JavaSoft\\Java Runtime Environment","Java7FamilyVersion",false,Wow64.KEY32)
else
sJava6= Wow64.RegistryGetValue(HKEY_LOCAL_MACHINE,"SOFTWARE\\JavaSoft\\Java Runtime Environment","Java6FamilyVersion",false,Wow64.KEY32)
sJava7 = Wow64.RegistryGetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\JavaSoft\\Java Runtime Environment", "Java7FamilyVersion",false,Wow64.KEY32)
end

if sJava6 == "" then
sJava6 = "Bulunamadı."
elseif sJava7 == "" then
sJava7 = "Bulunamadı."
elseif sJava32_6 == "" then
sJava32_6 = "Bulunamadı."
elseif sJava32_7 == "" then
sJava32_7 = "Bulunamadı."
end
if (System.Is64BitOS()) then
Dialog.Message("Java", "64-Bit\r\nJava6 versiyonu:"..sJava6.."\r\nJava7 versiyonu:"..sJava7.."\r\n32-Bit\r\nJava6 versiyonu:"..sJava32_6.."\r\nJava7 versiyonu:"..sJava32_7)
else
Dialog.Message("Java", "Java6 versiyonu:"..sJava6.."\r\nJava7 versiyonu:"..sJava7)
end
end[/code]

Hep bunlar anlatmak istediklerimin yanlış anlatmamdan.Bu kodları da bi daha düzelttim bu sefer sorun yoktur umarım.