[vint56]

example

;Создает страничку компонентов
#define Components

#define SelectText "Выбор языка интерфейса:"
#define RusText "Русский"
#define EngText "Английский"

;#define SelectSound "Выбор языка озвучки:"
;#define RusSound "Русский"
;#define EngSound "Английский"

#define SelectSound "Выбор таблетки:"
#define RusSound "PROPHET"
#define EngSound "FAiRLiGHT"
;CODEX
;FAiRLiGHT
;PROPHET
;SKIDROW
;3DM
;DMN32 / SKIDROW (Steam Emu)


[CustomMessages]
;rus.RusText=Русский
;rus.RusSound=Русский
;rus.EngText=Английский
;rus.EngSound=Английский
;rus.SelectText=Выбор языка интерфейса:
;rus.SelectSound=Выбор языка озвучки:

[code_]
/////////////////////ComponentsPage///////////////////////////////////
TextLabel:= TLabel.Create(WizardForm);
with TextLabel do begin
  Caption:=ExpandConstant('{#SelectText}');
end;

RUSTextLabel:= TLabel.Create(WizardForm);
with RUSTextLabel do begin
  Caption:=ExpandConstant('{#RusText}');
end;

ENGTextLabel:= TLabel.Create(WizardForm);
with ENGTextLabel do begin
 Caption:=ExpandConstant('{#EngText}');
end;

VoiceLabel:= TLabel.Create(WizardForm);
with VoiceLabel do begin
  Caption:=ExpandConstant('{#SelectSound}');
end;

RUSVoiceLabel:= TLabel.Create(WizardForm);
with RUSVoiceLabel do begin
  Caption:=ExpandConstant('{#RusSound}');
end;

ENGVoiceLabel:= TLabel.Create(WizardForm);
  with ENGVoiceLabel do begin
  Caption:=ExpandConstant('{#EngSound}');
end;