amos usar um componente Edit como exemplo chamando ele de EditX:

EditX.Font.Style := EditX.Font.Style + [fsBold];//adiciona NEGRITO

EditX.Font.Style := EditX.Font.Style + [fsItalic];//adiciona ITALICO

EditX.Font.Style := EditX.Font.Style + [fsUnderline];//adiciona SUBLINHADO

EditX.Font.Style := EditX.Font.Style + [fsStrikeOut];//adiciona RISCADO

para retirar um estilo, use o '-' ao invés de '+' com mesmo código.

Created with the Personal Edition of HelpNDoc: Produce electronic books easily