ΠΠΏΠΈΡΠ°Π½ΠΈΠ΅ ΡΡΠ½ΠΊΡΠΈΠΉ.
Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ Π΄ΠΈΠ½Π°ΠΌΠΈΡΠ΅ΡΠΊΠΈΡ
Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊ
Wnd: ΠΠΊΠ½ΠΎ, ΠΊΠΎΡΠΎpΠΎΠ΅ Π±ΡΠ΄Π΅Ρ ΠΏpΠΈΠ½ΠΈΠΌΠ°ΡΡ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠ΅, ΠΈΠ»ΠΈ $FFFF Π΄Π»Ρ Π²ΡΠ΅Ρ ΠΏΠ΅pΠ΅ΠΊpΡΠ²Π°Π΅ΠΌΡΡ ΠΈΠ»ΠΈ Π²ΡΠΏΠ»ΡΠ²Π°ΡΡΠΈΡ ΠΎΠΊΠΎΠ½. Caption: ΠΠ°Π³ΠΎΠ»ΠΎΠ²ΠΎΠΊ Π±Π»ΠΎΠΊΠ° Π΄ΠΈΠ°Π»ΠΎΠ³Π° (Π·Π°ΠΊΠ°Π½ΡΠΈΠ²Π°ΡΡΠΈΠΉΡΡ ΠΏΡΡΡΡΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ) ΠΈΠ»ΠΈ nil Π΄Π»Ρ «Error» («ΠΡΠΈΠ±ΠΊΠ°»). Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ — ΠΈΠ΄Π΅Π½ΡΠΈΡΠΈΠΊΠ°ΡΠΎp ΠΏΠΈΠΊΡΠΎΠ³pΠ°ΠΌΠΌΡ; 0 — Π² ΠΏpΠΎΡΠΈΠ²Π½ΠΎΠΌ ΡΠ»ΡΡΠ°Π΅. Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ — ΡΠΎΡΠΊΠ° Π²Ρ ΠΎΠ΄Π° Π² ΡΡΠ½ΠΊΡΠΈΡ; 0 — Π² ΠΏpΠΎΡΠΈΠ²Π½ΠΎΠΌ ΡΠ»ΡΡΠ°Π΅. Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ… Π§ΠΈΡΠ°ΡΡ Π΅ΡΡ >
ΠΠΏΠΈΡΠ°Π½ΠΈΠ΅ ΡΡΠ½ΠΊΡΠΈΠΉ. Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ Π΄ΠΈΠ½Π°ΠΌΠΈΡΠ΅ΡΠΊΠΈΡ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊ (ΡΠ΅ΡΠ΅ΡΠ°Ρ, ΠΊΡΡΡΠΎΠ²Π°Ρ, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½ΡΡΠΎΠ»ΡΠ½Π°Ρ)
Π€ΡΠ½ΠΊΡΠΈΡ LoadIcon.
function LoadIcon (Instance: THandle; IconName: PChar): HIcon;
ΠΠ°Π³pΡΠΆΠ°Π΅Ρ ΠΏΠΎΠΈΠΌΠ΅Π½ΠΎΠ²Π°Π½Π½ΡΠΉ pΠ΅ΡΡpΡ ΠΏΠΈΠΊΡΠΎΠ³pΠ°ΠΌΠΌΡ.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
Instance: ΠΠΊΠ·Π΅ΠΌΠΏΠ»Ρp ΠΌΠΎΠ΄ΡΠ»Ρ, ΠΈΡΠΏΠΎΠ»Π½ΠΈΠΌΡΠΉ ΡΠ°ΠΉΠ» ΠΊΠΎΡΠΎpΠΎΠ³ΠΎ ΡΠΎΠ΄Π΅pΠΆΠΈΡ ΠΏΠΈΠΊΡΠΎΠ³pΠ°ΠΌΠΌΡ ΠΈΠ»ΠΈ 0 Π΄Π»Ρ ΠΏpΠ΅Π΄ΠΎΠΏpΠ΅Π΄Π΅Π»Π΅Π½Π½ΠΎΠΉ ΠΏΠΈΠΊΡΠΎΠ³pΠ°ΠΌΠΌΡ.
IconName: Π‘ΡpΠΎΠΊΠ° ΠΈΠ»ΠΈ ΠΈΠΌΡ ΡΠ΅Π»ΠΎΡΠΈΡΠ»Π΅Π½Π½ΠΎΠ³ΠΎ ΠΈΠ΄Π΅Π½ΡΠΈΡΠΈΠΊΠ°ΡΠΎpΠ° ΠΈΠ»ΠΈ ΠΏpΠ΅Π΄ΠΎΠΏpΠ΅Π΄Π΅Π»Π΅Π½Π½Π°Ρ ΠΏΠΈΠΊΡΠΎΠ³pΠ°ΠΌΠΌΠ°, ΠΎΠΏpΠ΅Π΄Π΅Π»Π΅Π½Π½Π°Ρ ΠΎΠ΄Π½ΠΎΠΉ ΠΈΠ· ΠΊΠΎΠ½ΡΡΠ°Π½Ρ idi. ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ — ΠΈΠ΄Π΅Π½ΡΠΈΡΠΈΠΊΠ°ΡΠΎp ΠΏΠΈΠΊΡΠΎΠ³pΠ°ΠΌΠΌΡ; 0 — Π² ΠΏpΠΎΡΠΈΠ²Π½ΠΎΠΌ ΡΠ»ΡΡΠ°Π΅.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ user32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ LoadLibrary.
function LoadLibrary (LibFileName: PChar): THandle;
ΠΠ°Π³pΡΠΆΠ°Π΅Ρ ΠΏΠΎΠΈΠΌΠ΅Π½ΠΎΠ²Π°Π½Π½ΡΠΉ ΠΌΠΎΠ΄ΡΠ»Ρ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠΈ.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
LibFileName: ΠΠΌΡ ΡΠ°ΠΉΠ»Π° Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠΈ (Π·Π°ΠΊΠ°Π½ΡΠΈΠ²Π°ΡΡΠ΅Π΅ΡΡ ΠΏΡΡΡΡΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ).
ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ — ΠΈΠ΄Π΅Π½ΡΠΈΡΠΈΠΊΠ°ΡΠΎp ΡΠΊΠ·Π΅ΠΌΠΏΠ»ΡpΠ° ΠΌΠΎΠ΄ΡΠ»Ρ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠΈ (Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅, Π±ΠΎΠ»ΡΡΠ΅ 32); Π΅ΡΠ»ΠΈ Π½Π΅Ρ, ΡΠΎ Π΅Π³ΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΌΠ΅Π½ΡΡΠ΅ 32 ΠΈ ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΎΠ΄Π½ΠΈΠΌ ΠΈΠ· ΡΠ»Π΅Π΄ΡΡΡΠΈΡ : (0) Π½Π΅Ρ ΠΏΠ°ΠΌΡΡΠΈ;
(5) ΠΏΠΎΠΏΡΡΠΊΠ° ΡΠ²ΡΠ·Π°ΡΡ Π·Π°Π΄Π°ΡΡ; (11) Π½Π΅Π²Π΅pΠ½ΡΠΉ ΡΠ°ΠΉΠ» EXE; (12) ΠΏpΠΈΠΊΠ»Π°Π΄Π½Π°Ρ Π·Π°Π΄Π°ΡΠ° ΠΈΠ· OS/2; (13) ΠΏpΠΈΠΊΠ»Π°Π΄Π½Π°Ρ Π·Π°Π΄Π°ΡΠ° ΠΈΠ· DOS 4.0; (14) Π½Π΅Π²Π΅pΠ½ΡΠΉ ΡΠΈΠΏ EXE; (15) Π½Π΅Π·Π°ΡΠΈΡΠ΅Π½Π½ΡΠΉ pΠ΅ΠΆΠΈΠΌ.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ kernel32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ PostMessage.
function PostMessage (Wnd: HWnd; Msg, wParam: Word; lParam: Longint): Bool;
ΠΠ°ΠΏpΠ°Π²Π»ΡΠ΅Ρ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠ΅ ΠΎΠΊΠ½Ρ ΠΏpΠΈΠΊΠ»Π°Π΄Π½ΠΎΠΉ Π·Π°Π΄Π°ΡΠΈ.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
Wnd: ΠΠΊΠ½ΠΎ, ΠΊΠΎΡΠΎpΠΎΠ΅ Π±ΡΠ΄Π΅Ρ ΠΏpΠΈΠ½ΠΈΠΌΠ°ΡΡ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠ΅, ΠΈΠ»ΠΈ $FFFF Π΄Π»Ρ Π²ΡΠ΅Ρ ΠΏΠ΅pΠ΅ΠΊpΡΠ²Π°Π΅ΠΌΡΡ ΠΈΠ»ΠΈ Π²ΡΠΏΠ»ΡΠ²Π°ΡΡΠΈΡ ΠΎΠΊΠΎΠ½.
Msg: Π’ΠΈΠΏ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΡ.
wParam: ΠΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»ΡΠ½Π°Ρ ΠΈΠ½ΡΠΎpΠΌΠ°ΡΠΈΡ ΠΎ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠΈ.
lParam: ΠΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»ΡΠ½Π°Ρ ΠΈΠ½ΡΠΎpΠΌΠ°ΡΠΈΡ ΠΎ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠΈ.
ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
ΠΠ΅ Π½ΡΠ»Ρ Π² ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ; 0 — Π΅ΡΠ»ΠΈ Π½Π΅Ρ.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ user32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ GetModuleHandle.
function GetModuleHandle (ModuleName: PChar): THandle;
Π‘ΡΠΈΡΡΠ²Π°Π΅Ρ ΠΎΠΏΠΈΡΠ°ΡΠ΅Π»Ρ ΠΌΠΎΠ΄ΡΠ»Ρ.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
ModuleName: ΠΠΌΡ ΠΌΠΎΠ΄ΡΠ»Ρ (Π·Π°ΠΊΠ°Π½ΡΠΈΠ²Π°ΡΡΠ΅Π΅ΡΡ ΠΏΡΡΡΡΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ).
ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ — ΠΈΠ΄Π΅Π½ΡΠΈΡΠΈΠΊΠ°ΡΠΎp ΠΌΠΎΠ΄ΡΠ»Ρ; 0 — Π² ΠΏpΠΎΡΠΈΠ²Π½ΠΎΠΌ ΡΠ»ΡΡΠ°Π΅.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ kernel32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ DialogBoxParam.
function DialogBoxParam (Instance, THandle; TemplateName: PChar; Parent: HWnd; DialogFunc: TFarProc; InitParam: Longint): Integer;
Π‘ΠΎΠ·Π΄Π°Π΅Ρ Π±Π»ΠΎΠΊ ΠΌΠΎΠ΄Π°Π»ΡΠ½ΠΎΠ³ΠΎ Π΄ΠΈΠ°Π»ΠΎΠ³Π°, ΠΎΠΏpΠ΅Π΄Π΅Π»Π΅Π½Π½ΠΎΠ³ΠΎ TemplateName, ΠΈ ΠΏΠ΅pΠ΅Π΄ ΡΠ΅ΠΌ, ΠΊΠ°ΠΊ ΠΎΡΠΎΠ±pΠ°ΠΆΠ°ΡΡ Π΄ΠΈΠ°Π»ΠΎΠ³, ΠΏΠΎΡΡΠ»Π°Π΅Ρ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠ΅ wm_InitDialog. Π’Π°ΠΊΠΆΠ΅ ΠΏΠΎΠ·Π²ΠΎΠ»ΡΠ΅Ρ ΠΏΠ΅pΠ΅Π΄Π°Π²Π°ΡΡ ΡΡΠ½ΠΊΡΠΈΠΈ ΠΎΠ±pΠ°ΡΠ½ΠΎΠ³ΠΎ Π²ΡΠ·ΠΎΠ²Π° Π½Π°ΡΠ°Π»ΡΠ½ΠΎΠ³ΠΎ ΠΏΠ°pΠ°ΠΌΠ΅ΡpΠ°.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
Instance: ΠΠΊΠ·Π΅ΠΌΠΏΠ»Ρp ΠΌΠΎΠ΄ΡΠ»Ρ, ΠΈΡΠΏΠΎΠ»Π½ΠΈΠΌΡΠΉ ΡΠ°ΠΉΠ» ΠΊΠΎΡΠΎpΠΎΠ³ΠΎ ΡΠΎΠ΄Π΅pΠΆΠΈΡ ΡΠ°Π±Π»ΠΎΠ½ Π±Π»ΠΎΠΊΠ° Π΄ΠΈΠ°Π»ΠΎΠ³Π°.
TemplateName: ΠΠΌΡ ΡΠ°Π±Π»ΠΎΠ½Π° Π±Π»ΠΎΠΊΠ° Π΄ΠΈΠ°Π»ΠΎΠ³Π° (Π·Π°ΠΊΠ°Π½ΡΠΈΠ²Π°ΡΡΠ΅Π΅ΡΡ ΠΏΡΡΡΡΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ).
Parent: ΠΠΊΠ½ΠΎ Π²Π»Π°Π΄Π΅Π»ΡΡΠ°.
DialogFunc: ΠΠ΄pΠ΅Ρ ΡΠΊΠ·Π΅ΠΌΠΏΠ»ΡpΠ° ΠΏpΠΎΡΠ΅Π΄ΡpΡ ΡΡΠ½ΠΊΡΠΈΠΈ Π΄ΠΈΠ°Π»ΠΎΠ³Π°.
InitParam: ΠΠ΅pΠ΅Π΄Π°Π΅ΡΡΡ Π² ΠΏΠ°pΠ°ΠΌΠ΅ΡpΠ΅ lParam ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΡ wm_InitDialog.
ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
ΠΠ°pΠ°ΠΌΠ΅Ρp nResult ΡΡΠ½ΠΊΡΠΈΠΈ EndDialog; -1 — Π΅ΡΠ»ΠΈ Π΄ΠΈΠ°Π»ΠΎΠ³ Π½Π΅ ΠΌΠΎΠΆΠ΅Ρ Π±ΡΡΡ ΡΠΎΠ·Π΄Π°Π½.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ user32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ ExitProcess.
function ExitProcess (uExitCode);
ΠΠ°ΠΊΠΎΠ½ΡΠΈΡΡ Π΄Π°Π½Π½ΡΠΉ ΠΏΡΠΎΡΠ΅ΡΡ ΡΠΎ Π²ΡΠ΅ΠΌΠΈ ΠΏΠΎΠ΄Π·Π°Π΄Π°ΡΠ°ΠΌΠΈ (ΠΏΠΎΡΠΎΠΊΠ°ΠΌΠΈ).
ΠΠ°ΡΠ°ΠΌΠ΅ΡΡΡ:
uExitCode ΠΠΏΡΠ΅Π΄Π΅Π»ΡΠ΅Ρ ΠΊΠΎΠ΄ Π²ΡΡ ΠΎΠ΄Π° Π΄Π»Ρ ΠΏΡΠΎΡΠ΅ΡΡΠ°, ΠΈ Π΄Π»Ρ Π²ΡΠ΅Ρ ΠΏΠΎΡΠΎΠΊΠΎΠ², ΠΊΠΎΡΠΎΡΡΠ΅ Π·Π°Π²Π΅ΡΡΠ°ΡΡ ΡΠ°Π±ΠΎΡΡ Π² ΡΠ΅Π·ΡΠ»ΡΡΠ°ΡΠ΅ Π²ΡΠ·ΠΎΠ²Π° ΡΡΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ.
ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
Π£ ΡΡΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ Π½Π΅Ρ Π²ΠΎΠ·Π²ΡΠ°ΡΠ°Π΅ΠΌΠΎΠ³ΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΡ Π€ΡΠ½ΠΊΡΠΈΡ FreeLibrary.
function FreeLibrary (LibModule: THandle);
ΠΠ΅Π»Π°Π΅Ρ Π½Π΅Π΄Π΅ΠΉΡΡΠ²ΠΈΡΠ΅Π»ΡΠ½ΡΠΌ LibModule ΠΈ ΠΎΡΠ²ΠΎΠ±ΠΎΠΆΠ΄Π°Π΅Ρ ΡΠ²ΡΠ·Π°Π½Π½ΡΡ Ρ Π½ΠΈΠΌ ΠΏΠ°ΠΌΡΡΡ, Π΅ΡΠ»ΠΈ ΠΌΠΎΠ΄ΡΠ»Ρ Π±ΠΎΠ»ΡΡΠ΅ Π½Π΅ Π°Π΄pΠ΅ΡΡΠ΅ΡΡΡ.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
LibModule: ΠΠ°Π³pΡΠΆΠ΅Π½Π½ΡΠΉ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΡΠ½ΡΠΉ ΠΌΠΎΠ΄ΡΠ»Ρ.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ kernel32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ EndDialog.
function EndDialog (Dlg: Hwnd; Result: Integer);
Π’Π΅pΠΌΠΈΠ½ΠΈpΡΠ΅Ρ ΠΌΠΎΠ΄Π°Π»ΡΠ½ΡΠΉ Π±Π»ΠΎΠΊ Π΄ΠΈΠ°Π»ΠΎΠ³Π°. ΠΠ½Π°ΡΠ΅Π½ΠΈΠ΅, ΡΠΊΠ°Π·Π°Π½Π½ΠΎΠ΅ ΠΏΠ°pΠ°ΠΌΠ΅ΡpΠΎΠΌ Result, Π²ΠΎΠ·Π²pΠ°ΡΠ°Π΅ΡΡΡ Π² ΡΠΎΠ·Π΄Π°ΡΡΡΡ ΡΡΠ½ΠΊΡΠΈΡ DialogBox.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
Dlg: Π£Π½ΠΈΡΡΠΎΠΆΠ°Π΅ΠΌΡΠΉ Π΄ΠΈΠ°Π»ΠΎΠ³.
Result: ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ user32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ GetProcAddress.
function GetProcAddress (Module: THandle; ProcName: PChar): TFarProc;
Π‘ΡΠΈΡΡΠ²Π°Π΅Ρ Π°Π΄pΠ΅Ρ ΡΠΊΡΠΏΠΎpΡΠΈpΠΎΠ²Π°Π½Π½ΠΎΠΉ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΡΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
Module: ΠΠΈΠ±Π»ΠΈΠΎΡΠ΅ΡΠ½ΡΠΉ ΠΌΠΎΠ΄ΡΠ»Ρ.
ProcName: ΠΠΌΡ ΡΡΠ½ΠΊΡΠΈΠΈ (Π·Π°ΠΊΠ°Π½ΡΠΈΠ²Π°ΡΡΠ΅Π΅ΡΡ ΠΏΡΡΡΡΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ) ΠΈΠ»ΠΈ ΠΏpΠΎΠΈΠ·Π²ΠΎΠ»ΡΠ½ΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅.
ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ — ΡΠΎΡΠΊΠ° Π²Ρ ΠΎΠ΄Π° Π² ΡΡΠ½ΠΊΡΠΈΡ; 0 — Π² ΠΏpΠΎΡΠΈΠ²Π½ΠΎΠΌ ΡΠ»ΡΡΠ°Π΅.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ kernel32.dll.
Π€ΡΠ½ΠΊΡΠΈΡ MessageBox.
function MessageBox (Parent: HWnd; Txt, Caption: PChar; TextType: Word): Integer;
Π‘ΠΎΠ·Π΄Π°Π΅Ρ ΠΈ ΠΎΡΠΎΠ±pΠ°ΠΆΠ°Π΅Ρ Π±Π»ΠΎΠΊ Π΄ΠΈΠ°Π»ΠΎΠ³Π°, ΡΠΎΠ΄Π΅pΠΆΠ°ΡΠΈΠΉ ΡΠΊΠ°Π·Π°Π½Π½ΠΎΠ΅ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠ΅ ΠΈ Π·Π°Π³ΠΎΠ»ΠΎΠ²ΠΎΠΊ, Π° ΡΠ°ΠΊΠΆΠ΅ ΠΏpΠ΅Π΄ΠΎΠΏpΠ΅Π΄Π΅Π»Π΅Π½Π½ΡΠ΅ ΠΏΠΈΠΊΡΠΎΠ³pΠ°ΠΌΠΌΡ ΠΈ ΡΠ΅ΠΊΡΡΠΎΠ²ΡΠ΅ ΠΊΠ½ΠΎΠΏΠΊΠΈ, Π² ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΠΈΠΈ Ρ ΠΏΠ°pΠ°ΠΌΠ΅ΡpΠΎΠΌ TexType.
ΠΠ°pΠ°ΠΌΠ΅ΡpΡ:
Parent: ΠΠΊΠ½ΠΎ, Π²Π»Π°Π΄Π΅ΡΡΠ΅Π΅ Π±Π»ΠΎΠΊΠΎΠΌ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠΉ.
Txt: ΠΡΠΎΠ±pΠ°ΠΆΠ°Π΅ΠΌΠΎΠ΅ ΡΠΎΠΎΠ±ΡΠ΅Π½ΠΈΠ΅ (Π·Π°ΠΊΠ°Π½ΡΠΈΠ²Π°ΡΡΠ΅Π΅ΡΡ ΠΏΡΡΡΡΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ).
Caption: ΠΠ°Π³ΠΎΠ»ΠΎΠ²ΠΎΠΊ Π±Π»ΠΎΠΊΠ° Π΄ΠΈΠ°Π»ΠΎΠ³Π° (Π·Π°ΠΊΠ°Π½ΡΠΈΠ²Π°ΡΡΠΈΠΉΡΡ ΠΏΡΡΡΡΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ) ΠΈΠ»ΠΈ nil Π΄Π»Ρ «Error» («ΠΡΠΈΠ±ΠΊΠ°»).
TextType: ΠΠ΄Π½Π° ΠΈΠ»ΠΈ ΠΊΠΎΠΌΠ±ΠΈΠ½Π°ΡΠΈΡ ΠΊΠΎΠ½ΡΡΠ°Π½Ρ mb.
ΠΠΎΠ·Π²pΠ°ΡΠ°Π΅ΠΌΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅:
Π ΡΠ»ΡΡΠ°Π΅ ΡΡΠΏΠ΅ΡΠ½ΠΎΠ³ΠΎ Π·Π°Π²Π΅pΡΠ΅Π½ΠΈΡ ΠΎΠ΄Π½Π° ΠΈΠ· ΡΠ»Π΅Π΄ΡΡΡΠΈΡ ΠΊΠΎΠ½ΡΡΠ°Π½Ρ: id_Abort, id_Cancel, id_Ignore, id_No, id_OK, id_Retry ΠΈΠ»ΠΈ id_Yes.
ΡΡΠ½ΠΊΡΠΈΡ Π½Π°Ρ ΠΎΠ΄ΠΈΡΡΡ Π² ΡΠ°ΠΉΠ»Π΅ user32.dll.