Значения констант?

← →
Alex Shulg (2003-06-18 14:08) [0]

Мастера, срочно помогите:
Мне надо выяснить числовые значения следующих констант:

FORMAT_MESSAGE_ALLOCATE_BUFFER
FORMAT_MESSAGE_FROM_SYSTEM
LANG_NEUTRAL
SUBLANG_DEFAULT

К сожалению, Delphi сейчас не могу установить, а тупой VB эти константы не понимает.
Зарание благодарю.

← →
Poirot (2003-06-18 14:19) [1]

в нете поищи!

← →
Palladin (2003-06-18 14:20) [2]

а самому посмотреть в ломы?

← →
Alex Shulg (2003-06-18 14:24) [3]

А где посмотреть? В MSDN значения не написаны.
А в инете нет времени столько ковыряться, чтобы искать.

← →
icWasya (2003-06-18 14:25) [4]

{$EXTERNALSYM FormatMessage}

const
FORMAT_MESSAGE_ALLOCATE_BUFFER = $100;
{$EXTERNALSYM FORMAT_MESSAGE_ALLOCATE_BUFFER}
FORMAT_MESSAGE_IGNORE_INSERTS = $200;
{$EXTERNALSYM FORMAT_MESSAGE_IGNORE_INSERTS}
FORMAT_MESSAGE_FROM_STRING = $400;
{$EXTERNALSYM FORMAT_MESSAGE_FROM_STRING}
FORMAT_MESSAGE_FROM_HMODULE = $800;
{$EXTERNALSYM FORMAT_MESSAGE_FROM_HMODULE}
FORMAT_MESSAGE_FROM_SYSTEM = $1000;
{$EXTERNALSYM FORMAT_MESSAGE_FROM_SYSTEM}
FORMAT_MESSAGE_ARGUMENT_ARRAY = $2000;
{$EXTERNALSYM FORMAT_MESSAGE_ARGUMENT_ARRAY}
FORMAT_MESSAGE_MAX_WIDTH_MASK = 255;
{$EXTERNALSYM FORMAT_MESSAGE_MAX_WIDTH_MASK}

← →
icWasya (2003-06-18 14:25) [5]

(*
* Language IDs.
*
* The following two combinations of primary language ID and
* sublanguage ID have special semantics:
*
* Primary Language ID Sublanguage ID Result
* ------------------- --------------- ------------------------
* LANG_NEUTRAL SUBLANG_NEUTRAL Language neutral
* LANG_NEUTRAL SUBLANG_DEFAULT User default language
* LANG_NEUTRAL SUBLANG_SYS_DEFAULT System default language
*)

const
{ Primary language IDs. }

LANG_NEUTRAL = $00;
{$EXTERNALSYM LANG_NEUTRAL}

LANG_AFRIKAANS = $36;
{$EXTERNALSYM LANG_AFRIKAANS}
LANG_ALBANIAN = $1c;
{$EXTERNALSYM LANG_ALBANIAN}
LANG_ARABIC = $01;
{$EXTERNALSYM LANG_ARABIC}
LANG_BASQUE = $2d;
{$EXTERNALSYM LANG_BASQUE}
LANG_BELARUSIAN = $23;
{$EXTERNALSYM LANG_BELARUSIAN}
LANG_BULGARIAN = $02;
{$EXTERNALSYM LANG_BULGARIAN}
LANG_CATALAN = $03;
{$EXTERNALSYM LANG_CATALAN}
LANG_CHINESE = $04;
{$EXTERNALSYM LANG_CHINESE}
LANG_CROATIAN = $1a;
{$EXTERNALSYM LANG_CROATIAN}
LANG_CZECH = $05;
{$EXTERNALSYM LANG_CZECH}
LANG_DANISH = $06;
{$EXTERNALSYM LANG_DANISH}
LANG_DUTCH = $13;
{$EXTERNALSYM LANG_DUTCH}
LANG_ENGLISH = $09;
{$EXTERNALSYM LANG_ENGLISH}
LANG_ESTONIAN = $25;
{$EXTERNALSYM LANG_ESTONIAN}
LANG_FAEROESE = $38;
{$EXTERNALSYM LANG_FAEROESE}
LANG_FARSI = $29;
{$EXTERNALSYM LANG_FARSI}
LANG_FINNISH = $0b;
{$EXTERNALSYM LANG_FINNISH}
LANG_FRENCH = $0c;
{$EXTERNALSYM LANG_FRENCH}
LANG_GERMAN = $07;
{$EXTERNALSYM LANG_GERMAN}
LANG_GREEK = $08;
{$EXTERNALSYM LANG_GREEK}
LANG_HEBREW = $0d;
{$EXTERNALSYM LANG_HEBREW}
LANG_HUNGARIAN = $0e;
{$EXTERNALSYM LANG_HUNGARIAN}
LANG_ICELANDIC = $0f;
{$EXTERNALSYM LANG_ICELANDIC}
LANG_INDONESIAN = $21;
{$EXTERNALSYM LANG_INDONESIAN}
LANG_ITALIAN = $10;
{$EXTERNALSYM LANG_ITALIAN}
LANG_JAPANESE = $11;
{$EXTERNALSYM LANG_JAPANESE}
LANG_KOREAN = $12;
{$EXTERNALSYM LANG_KOREAN}
LANG_LATVIAN = $26;
{$EXTERNALSYM LANG_LATVIAN}
LANG_LITHUANIAN = $27;
{$EXTERNALSYM LANG_LITHUANIAN}
LANG_NORWEGIAN = $14;
{$EXTERNALSYM LANG_NORWEGIAN}
LANG_POLISH = $15;
{$EXTERNALSYM LANG_POLISH}
LANG_PORTUGUESE = $16;
{$EXTERNALSYM LANG_PORTUGUESE}
LANG_ROMANIAN = $18;
{$EXTERNALSYM LANG_ROMANIAN}
LANG_RUSSIAN = $19;
{$EXTERNALSYM LANG_RUSSIAN}
LANG_SERBIAN = $1a;
{$EXTERNALSYM LANG_SERBIAN}
LANG_SLOVAK = $1b;
{$EXTERNALSYM LANG_SLOVAK}
LANG_SLOVENIAN = $24;
{$EXTERNALSYM LANG_SLOVENIAN}
LANG_SPANISH = $0a;
{$EXTERNALSYM LANG_SPANISH}
LANG_SWEDISH = $1d;
{$EXTERNALSYM LANG_SWEDISH}
LANG_THAI = $1e;
{$EXTERNALSYM LANG_THAI}
LANG_TURKISH = $1f;
{$EXTERNALSYM LANG_TURKISH}
LANG_UKRAINIAN = $22;
{$EXTERNALSYM LANG_UKRAINIAN}
LANG_VIETNAMESE = $2a;
{$EXTERNALSYM LANG_VIETNAMESE}

← →
icWasya (2003-06-18 14:27) [6]

{ Sublanguage IDs. }

{ The name immediately following SUBLANG_ dictates which primary
language ID that sublanguage ID can be combined with to form a
valid language ID. }

SUBLANG_NEUTRAL = $00; { language neutral }
{$EXTERNALSYM SUBLANG_NEUTRAL}
SUBLANG_DEFAULT = $01; { user default }
{$EXTERNALSYM SUBLANG_DEFAULT}
SUBLANG_SYS_DEFAULT = $02; { system default }
{$EXTERNALSYM SUBLANG_SYS_DEFAULT}

← →
Alex Shulg (2003-06-18 14:32) [7]

Всем спасибо!

← →
ggsoft (2003-06-18 16:51) [8]

VB как и дядя Билли не такой уж тупой...

С VB поставляется утилитка "API Text Viewer"
"%InstallDir%\Common\Tools\Winapi\APILOAD.EXE" -
как раз для таких случаев.

Значения констант? Найти похожие ветки