Вниз
Скачать: 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
3-96601
Filat
2003-01-13 11:56
2003.01.30
Работа проги с CD с базами и BDE?


1-96770
tulen
2003-01-22 18:47
2003.01.30
Выпадающее меню.


3-96600
Whippi
2003-01-13 15:56
2003.01.30
Что за фигня: Обнаружены символы за пределами инструкций SQL


3-96581
Чайник
2003-01-13 11:28
2003.01.30
LookupComboBox


1-96835
Info
2003-01-21 00:51
2003.01.30
Текст из WebBrowser в Memo




   Наверх