Tfontdialog
 

Hola chicos
Supongo que sera la calor... pero no logro acordarme de como pues adjudicar la fuente que haya seleccionado en el cuadro de dialogo TfontDialog a un texto dando al boton aceptar...
Gracias.

El código que puedes utilizar puede se parecido a:

if Not FD.Execute then exit;
Label1.Font:=FD.Font;
// o bién
//Label1.Font.Assign(FD.Font);
// según gustos