Вниз
Скачать: 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.012 c
3-96634
Джоник
2003-01-13 15:07
2003.01.30
Запрос-добавление к двум базам IB


3-96623
Дима2003
2003-01-14 09:59
2003.01.30
RTF -> TEXT


3-96637
Radimir
2003-01-14 12:03
2003.01.30
триггер на инсерт


1-96729
Dimitriy.sd
2003-01-22 11:48
2003.01.30
Помогите люди ошибка EInvalidOp, что делать?


1-96727
DVM
2003-01-21 23:42
2003.01.30
Кнопка с ... в Caption




   Наверх