Ver Mensaje Individual
  #3  
Antiguo 08-07-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
Un efecto curioso que puedes lograr es adaptar el ancho del Edit según vayas escribiendo:

Código:
procedure TForm1.Edit1Change(Sender: TObject);
begin
edit1.width:=canvas.TextWidth(Edit1.text);
end;
Un Saludo.
Responder Con Cita