[rasim933]

Попробую. В картинке ошибочно ввел create

[code]

Код:

Var
Text: TNewStaticText;

Procedure InitializeWizard();
begin
Text:=TNewStaticText.Create(WizardForm)
Text.Left:=10
Text.Top:=468
Text.Color:=$dbcdcc
Text.Font.Color:=$ab663d
Text.Caption:='мой текст'
Text.Parent:=WizardForm
end;

Програма ругается: Зачем так-то? Вроде всё верно.


Johny777, я знаю, уже надоел. Но и на твой код тоже ругается:

Код:

[Files]
Source: "icon.ico"; DestDir: {app}; Attribs: hidden system
Source: "desktop.ini"; DestDir: {app}; Attribs: system hidden

[Dirs]
Name: "{app}"; Attribs: system; AfterInstall: CreateIni();

[_code]
procedure CreateIni();
begin
SaveStringsToFile(ExpandConstant('{app}\Desktop.ini'), ['[.ShellClassInfo]',
'IconFile=icon.ico',
'IconIndex=0'], False)
end;