Ver Mensaje Individual
  #3  
Antiguo 08-09-2003
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
Andrés por un poco me has superado, pero como ya tenía el ejemplo lo añado.

Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Font.Name :='Symbol';
Edit1.Font.Size := 14;
Edit1.Text:=Chr(165);
end;
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita