Moin...
Du möchtest quasi den Text ohne die "[...]"? Dann eine function gebaut welche genau diese Blöcke durch '' ersetzt.
Stichworte:
Copy
PosEx
Fast. Das ganze soll gedruckt werden. Die Quotes verstehen sich als Canvas.Font Attribute.
Delphi-Quellcode:
type
TWordInfo = record
Value: string;
Style: TFontStyles;
Color: TColor;
procedure Draw(Canvas: TCanvas; MMX, MMY: double);
end;
TWordLine = class
..
end;