Quote:
Originally Posted by hitman797
Code:
TTextAlign = (txCenter, txLeading, txTrailing);
procedure Text1HorzAlign(HAlign: TTextAlign);
procedure Text2HorzAlign(HAlign: TTextAlign);
|
Hi @hitman @Blackfire
Thank you. I tried and have to manually align the text for this. However, in Smaller Font Size (like 12-15), the two text still doesn't seem to be aligned height-wise. Any fix for it?
Code:
SectionText[1].FCreate(SectionContent[1].Handle, 500, 15, 'Developers :', INI_DEVELOPERS, -1, False);
SectionText[1].Text1Setting('{#FontName}', 12, {#FontColor}, False);
SectionText[1].Text2Setting('{#FontName}', 12, {#SelectedFontColor}, False);
SectionText[1].Text1HorzAlign(txTrailing);
SectionText[1].Text2HorzAlign(txTrailing);
SectionText[2].FCreate(SectionContent[1].Handle, 505, 35, 'Genre :', INI_GENRE, -1, False);
SectionText[2].Text1Setting('{#FontName}', 12, {#FontColor}, False);
SectionText[2].Text2Setting('{#FontName}', 12, {#SelectedFontColor}, False);
SectionText[2].Text1HorzAlign(txTrailing);
SectionText[2].Text2HorzAlign(txTrailing);
SectionText[3].FCreate(SectionContent[1].Handle, 500, 55, 'Release Date :', INI_RELEASE_DATE, -1, False);
SectionText[3].Text1Setting('{#FontName}', 12, {#FontColor}, False);
SectionText[3].Text2Setting('{#FontName}', 12, {#SelectedFontColor}, False);
SectionText[3].Text1HorzAlign(txTrailing);
SectionText[3].Text2HorzAlign(txTrailing);
Another issue: InstallFMXFont sometimes hangs the launch of Setup.exe during Runtime.