Вниз
Скачать: CL | DM;

Как определить язык инфы о версии ЕХЕ???   Найти похожие ветки 

 
DredXXX ©   (2002-12-14 19:20) [0]

HELP!!!!
Кто знает помогите пожалуйста!!!
У меня следующая проблема... Я из ехе-файла выташил размер инфы о версии файла функцией GetFileVersionInfoSize, потом считал её ( GetFileVersionInfo), но а с языком никак не получается! Использую следующую ф-ию:
VerQueryValue(VIBuff,"\VarFileInfo\Translation",Trans,buffsize);
Профессионалы!!! Помогите пожалуйста!!! Обясните по подробнее как вытащить язык на котором записанна инфа.

СПАСИБО!!!


 
asmith   (2002-12-14 20:11) [1]

type
TLangCodePage = record
wLanguage : WORD;
wCodePage : WORD;
end;
var
plcp : array of TLangCodePage;
SubBlock : string;
...
VerQueryValue(VIBuff, "\VarFileInfo\Translation", pointer(plcp), buffsize);
for i := 0 to buffsize / SizeOf(pointer) do
begin
// Retrieve file description for language and code page "i".
SubBlock := Format("\StringFileInfo\\%04x%04x\FileDescription",plcp[i].wLanguage, plcp[i].wCodePage);
VerQueryValue(VIBuff, SubBlock, Buffer, dwBytes);
end;


 
DredXXX ©   (2002-12-15 18:53) [2]

Конечно спасибо asmith, но я хотел бы по-подробнее. Кто понимает эту штуку напишите пожалуйста что это за цикл и что он делает.
СПАСИБО!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-96731
France
2003-01-22 13:06
2003.01.30
ListView.Selected.Index


1-96677
Opryshok
2003-01-19 23:39
2003.01.30
Если я унаследовал одну форму от другой, то ...


6-96929
chum
2002-12-06 11:49
2003.01.30
Работать через несколько прокси серверов


3-96568
Kilo
2003-01-11 18:30
2003.01.30
Вместо ноля выводится 1,4210854715202E-14


14-96953
cc43294
2003-01-12 14:27
2003.01.30
Почта




   Наверх