Please help to see this code

qwert159

0 begin
1 with DM.queXXX do
2 begin
3 Close;
4 SQL.Clear;
5 SQL.Add('insert into tabXXX');
6 SQL.Add('values ​​('+strtoint(Edit1.Text)+')');
7 ExecSQL;
8 end;
9 end;

       When compiling, it prompts an error on line 6. The error message roughly means that string and integer conflict. I'm a novice, I don't know how to solve it, please help from experts! Thank you! !

xclzc17

0 begin
1 with DM.queXXX do
2 begin
3 Close;
4 SQL.Clear;
5 SQL.Add('insert into tabXXX');
6 SQL.Add('values ​​('+Edit1.Text+')');
7 ExecSQL;
8 end;
9 end;

gpspda

with DM.queXXX do begin
  Close;
  SQL.Text :='INSERT INTO tabXXX VALUES(:V1)';
  Parameters.ParamByName('V1').Value := Edit1.text;
  ExecSQL;
end;

lhpmch

Just insert it in the form of a character string`

ngairon

Just insert it in the form of a character string

lylanli

SQL.Add('values ​​('+Edit1.Text+')');

nanjamonja

Also remember to determine whether there is a value in Edit1.text. Safety first.