Delphi - Error en codigo delphi

Hola buen dia. Mi problema es con este codigo :

begin
form1.q1.Close;
form1.q1.SQL.text:='UPDATE ZONAS SET NOMZONA=:p2 WHERE ZONA=:p1)';
form1.q1.ParamByName('p1').asSmallInt:=form3.DBedit1.text;
form1.q1.ParamByName('p2').asString:=form3.DBedit2.text;
form1.q1.execsql;
showmessage('¡modificacion realizada!');
form1.DB1.Connected:=false;
form1.T1.Active:=true;

end;

end.


//me manda el error incompatible types 'integer' and 'TMaskedText'

no se como hacerle para convertir de DBedit a Integer , agradeceria infinitamente su ayuda .saludos!

Veo un error aqui
form1.q1.SQL.text:='UPDATE ZONAS SET NOMZONA=:p2 WHERE ZONA=:p1)';
te sobra un parentesis
form1.q1.SQL.text:='UPDATE ZONAS SET NOMZONA=:p2 WHERE ZONA=:p1';

y esto lo puedes usar asi:

form1.q1.ParamByName('p1').asString:=form3.DBedit1.text;//Automaticamente el query convierte los tipos al que sea necesario
form1.q1.ParamByName('p2').asString:=form3.DBedit2.text;