[Nordek]

FX-DENIS, Поправь пожалуйста сообщение. Не корректный вывод BB-Кодов.

Если в скрипте присутствует [Code], то понадобится дополнительная обработка.
Например: [*Code], [#Code], [Co[u][/u]de], [b][Co[/b][b]de][/b] и т.д.

Примеры с использованием возможной обработки:

---

Исходный текст BB-кодов:
[code][Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[*Code]
procedure InitializeWizard();
begin
with WizardForm.WizardSmallBitmapImage do
begin
Visible := False;
end;
end;[/code]

Вывод:

Код:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[*Code]
procedure InitializeWizard();
begin
  with WizardForm.WizardSmallBitmapImage do
  begin
    Visible := False;
  end;
end;

---

Исходный текст BB-кодов:
[code][Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[#Code]
procedure InitializeWizard();
begin
with WizardForm.WizardSmallBitmapImage do
begin
Visible := False;
end;
end;[/code]

Вывод:

Код:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[#Code]
procedure InitializeWizard();
begin
  with WizardForm.WizardSmallBitmapImage do
  begin
    Visible := False;
  end;
end;

---

Исходный текст BB-кодов:
[code][Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[b][Co[/b][b]de][/b]
procedure InitializeWizard();
begin
with WizardForm.WizardSmallBitmapImage do
begin
Visible := False;
end;
end;[/code]

Вывод:

Код:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[Code]
procedure InitializeWizard();
begin
  with WizardForm.WizardSmallBitmapImage do
  begin
    Visible := False;
  end;
end;

---

Исходный текст BB-кодов:
[code][Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[Co[u][/u]de]
procedure InitializeWizard();
begin
with WizardForm.WizardSmallBitmapImage do
begin
Visible := False;
end;
end;[/code]

Вывод:

Код:

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program

[Code]
procedure InitializeWizard();
begin
  with WizardForm.WizardSmallBitmapImage do
  begin
    Visible := False;
  end;
end;

---

Кроме всего прочего, есть ещё в самой Inno Setup Compiler возможность копирования текста с BB-кодами.
В Inno Setup Compiler есть пункт "Копировать как UBB код", который позволяет скопировать сразу с BB-кодами.
Правда в некоторых случаях копируется не корректно.