Schu dir mal die Eigenschaft
Font im
OI an
Einzelne Worter gehen aber nicht.
Das kannste aber mit mehreren Labels machen oder mit TextOut im OnPaint des Labels.
Add:
Delphi-Quellcode:
Procedure TForm1.FormPaint(Sender: TObject);
Var X: Integer;
Begin
X := 50;
Canvas.Font.Style := [];
Canvas.TextOut(X, 20, 'Das ist ein ');
Inc(X, Canvas.TextWidth('Das ist ein '));
Canvas.Font.Style := [fsBold];
Canvas.TextOut(X, 20, 'fetter');
Inc(X, Canvas.TextWidth('fetter'));
Canvas.Font.Style := [];
Canvas.TextOut(X, 20, ' Text');
End;