Delphi-Quellcode:
var ts: TSize;
S: String;
S := 'derText';
ts := DrawTextEx(ButtonGroup1.Canvas, S);
ButtonGroup1.Canvas.TextOut(X - ts.cx div 2, Y - ts.cy div 2, S);
hierbei wären X und Y die Position, an welcher der Text zentriert gezeichnet werden soll