Edit inhabilitado y luego habilitado

[tazzmk]

imagen 01 (http://s1.subirimagenes.com/imagenes/previo/thump_146652001.gif)

imagen 02
(http://s1.subirimagenes.com/imagenes/previo/thump_146652602.gif)
hola como podran ver funciona la operacion de numeros y todo eso

la idea es que el usuario solo pueda ingresar en los tres primeros edit, y los demas dejarlo no disponibles, solo para mostrar el resultado final

como se le podra agregar un efecto de Edit bloqueado, es decir el usuario no puede ingresar datos, pero cuando se calcule el resultado debe de mostrar abilitado mas el resultado final, en la imagen 02 se aprecia


procedure TForm1.Button1Click(Sender: TObject);
var
n1,n2,n3,suma,resultado:word;
begin
n1:=strtoint(Edit1.text);
n2:=strtoint(Edit2.text);
n3:=strtoint(Edit3.text);
suma:=n1*2+n2*4+n3*6;
resultado:=suma;
Edit4.text:=inttostr(resultado);
Edit5.text:= Edit1.text + ' ' + Edit2.text+ ' ' + Edit3.text + '=' + Edit4.text;
end;

[dec]

Hola,

Puedes deshabilitar y habilitar un "Edit" mediante su propiedad "Enabled". Sin embargo, esta propiedad hará que la apariencia del "Edit" indique, de alguna manera (sombreando el componente) que está deshabilitado. Y cuentas también con la propiedad "ReadOnly". Esta propiedad no permite ingresar nada en el "Edit", pero, su apariencia, en lo demás, no difiere de otro "Edit" cualquiera.

[Caral]

Hola
No se exactamente lo que necesitas, pero lo que entiendo es que en el edit que muestra el resultado no pueda escribir, si es asi:

Edit5.ReadOnly:= True;
Con esto no se podra escribir en el.
Saludos

[tazzmk]

Gracias es justo lo que buscaba !! saludos