Help

[Andrey167]

Hello!
I apologize in advance for my English!
I need your help.
I would like to create a form with information as to repack Black Box
but I can not impose on the form of pictures and text to create one change depending on the language setting.
Here is my code

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

[Files]
Source: "ReadMeRu.rtf"; DestDir: "{tmp}"; Flags: ignoreversion

[code]
var
InfoForm: TSetupForm;
Info, Ok: TButton;
InfoBefore: TRichEditViewer;
ReadmeRu,ReadmeEn: AnsiString;

procedure Okclick(Sender: TObject);
begin
InfoForm.Close;
WizardForm.Enabled:=True;
end;

procedure FormClose(Sender: TObject; var Action: TCloseAction);
begin
WizardForm.Enabled:=true;
end;

procedure InfoClick(Sender: TObject);
begin
InfoForm:= CreateCustomForm();
with InfoForm do begin
ClientWidth := ScaleX(350);
ClientHeight := ScaleY(250);
CenterInsideControl(WizardForm, False);
Caption:='';
onClose:=@FormClose;
Ok:=tbutton.create(InfoForm)
with Ok do begin
SetBounds(ScaleX(290),ScaleY(210),ScaleX(50),Scale Y(30));
parent:=InfoForm;
Caption:='OK';
onclick:=@OKclick;
end;
InfoBefore:= TRichEditViewer.Create(InfoForm);
with InfoBefore do begin
SetBounds(ScaleX(10),ScaleY(10),ScaleX(330),ScaleY (180));
Parent:= InfoForm;
// ParentColor := True;
// Color:= WizardForm.Color;
// BorderStyle:= bsNone;
ScrollBars:= ssVertical;
ReadOnly:= true;
RTFText:= ReadmeRu
end;
InfoForm.Show;
WizardForm.Enabled:=false;
end;
end;

procedure InitializeWizard;
begin
ExtractTemporaryFile('ReadMeRu.rtf');
LoadStringFromFile(ExpandConstant('{tmp}')+'\ReadM eRu.rtf', ReadmeRu);
Info:=tbutton.create(WizardForm);
with Info do begin
Parent:=WizardForm;
SetBounds(ScaleX(20),ScaleY(325),ScaleX(45),ScaleY (30));
Caption:='x';
OnClick:=@InfoClick;
end;
end;

[Dante1995]

I do not see images

[Andrey167]

Originally Posted by Dante1995

I do not see images

[Dante1995]

is a simple text .RTF, all you need to view a file ReadMe.rtf

[Andrey167]

Originally Posted by Dante1995

is a simple text .RTF, all you need to view a file ReadMe.rtf

yes I know but I do not know how to make 2 Dunn lingual text

[Razor12911]

Ok, I don't think there is something wrong with your English but now that you mentioned that your English might not seem good it tricked my brain into opening suggestions on what you are trying to ask even though that is not necessary. So anyways. If you want something multi language, it can be done in two ways. It either from the language select dialog or from inside the application itself. Just pick one option.
Just take note, language select dialog is simple and from the application is hard.

[Andrey167]

Originally Posted by Razor12911

Ok, I don't think there is something wrong with your English but now that you mentioned that your English might not seem good it tricked my brain into opening suggestions on what you are trying to ask even though that is not necessary. So anyways. If you want something multi language, it can be done in two ways. It either from the language select dialog or from inside the application itself. Just pick one option.
Just take note, language select dialog is simple and from the application is hard.

I would like at least one example for 2 languages
Sorry for my english

[Dante1995]

perhaps better to duplicate a lot of math

[Andrey167]

Originally Posted by Dante1995

perhaps better to duplicate a lot of math

A great example can throw?