Just add:
Code:
[CustomMessages]
Icons=Icons:
[#Code]
function UpdateReadyMemo(Space, NewLine, MemoUserInfoInfo, MemoDirInfo, MemoTypeInfo,
MemoComponentsInfo, MemoGroupInfo, MemoTasksInfo: String): String;
var
S1, S2: String;
begin
S1 := '';
S2 := '';
S1 := S1 + MemoDirInfo + NewLine + NewLine;
if IconCB.Checked then
S2 := #32#32#32#32#32#32+CustomMessage('Icons')+ NewLine + #32#32#32#32#32#32#32#32#32+CustomMessage('CreateDesktopIcon');
S1 := S1 + MemoTasksInfo + NewLine + S2 + NewLine;
Result := S1;
end;