Edit inhabilitado y luego habilitado

[tazzmk]

imagen 01

imagen 02

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

Código Delphi [-]
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;