Delphi - Error en codigo delphi

   
Vista:

Error en codigo delphi

Publicado por HQ (1 intervención) el 28/09/2011 07:23:56
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!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Error en codigo delphi

Publicado por E.T. (1105 intervenciones) el 29/09/2011 04:36:33
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;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar