Вниз
Скачать: 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.015 c
1-96719
Robb
2003-01-22 11:24
2003.01.30
Как реализовать что-то типа компонента Dialogs


14-96970
GIL
2003-01-11 07:02
2003.01.30
Протокол РРР


1-96802
REA
2003-01-17 16:08
2003.01.30
Печать картинки


1-96673
Temp
2003-01-21 16:57
2003.01.30
StringGrid


1-96853
Старина Герасим
2003-01-21 10:17
2003.01.30
Подскажите, пожалуйста, как написать резидентную прогу.




   Наверх