Text zur Anzeige kürzen mit Punkten hinten

[JamesTKirk]

Zitat von himitsu:

Ist dir schonmal aufgefallen, daß TCanvas.TextRect für den Text einen Var-Parameter nutzt?

Tipp:

tfModifyString, tfEndEllipsis oder tfPathEllipsis und tfCalcRect > TTextFormat

Zitat aus dem TCanvas der LCL:

Delphi-Quellcode:

procedure TextRect(const ARect: TRect; X, Y: integer; const Text: string);
procedure TextRect(ARect: TRect; X, Y: integer; const Text: string;
                    const Style: TTextStyle); virtual;

Diese unterstützt das nicht.

Gruß,
Sven