InnoSetup, RTFText에 사용자 지정 텍스트를로드하는 방법

Question

InfoBefore 텍스트 파일의 텍스트를 변수에 저장 한 다음 사용자 지정 글꼴 색과 배경색을 사용하여 RTFEditor에로드하려고합니다.

내가 말하는 변수에서 텍스트를로드 할 때 "쓰기 전용 속성"

내가 (텍스트를로드 var에 텍스트를 저장 함께이 두 가지 작업을 수행하는 방법에 대한 명시적인 예를 필요 RTF에서 사용자 정의 색상과 배경색으로) 나는 Pascal을 모르기 때문에 너무 복잡하게 만들지 않습니다.

이

코드입니다 :

대신 다음, 단순히 포맷이 필요한 변경하기, 워드 패드에 .txt 인 파일을로드, 사후 수정 .RTF 형식으로 저장하려고 노력

const 
FontColor: AnsiString = 'cf0'; 
BackColor: AnsiString = 'cf1' 

var 
    OldText: AnsiString; 

procedure InitializeWizard(); 
begin 

// I try to store the text in a variable 
Oldtext := WizardForm.InfoBeforeMemo.RTFText; 

// I try to load from the variable, with a new font color for ALL the text, and a new BackColor. 
WizardForm.InfoBeforeMemo.RTFText := Oldtext + FontColor 

end; 

Answer 1

. 그런 다음 코드를 사용하지 않고이 파일을 직접 InfoBeforeFile으로 사용할 수 있습니다.

편집 : 전체 메모의 배경색을 변경하려면 한 줄의 코드가 필요합니다. 예 :

[Code] 
procedure InitializeWizard(); 
begin 
    WizardForm.InfoBeforeMemo.Color := clBlack; 
end;