Da habe ich aber ewig gebraucht, um zu verstehen, was diese vier Zeilen machen.
Delphi-Quellcode:
Dec(Rect.Left, -2);
Inc(Rect.Right, -2);
Dec(Rect.Top, -2);
Inc(Rect.Bottom, -2);
Ich glaube, das geht auch:
Delphi-Quellcode:
//
InflateRect(Rect,-2,-2);
Und warum arbeitest Du nicht mit
lGrid.Canvas.TextHeight
und
Math.Max
?
Und wieso verzichtest Du auf den Resourcenschutzblock, um die Verwendung der Bitmap?
Fragen über Fragen