Question

delphi 向sql表中插入数据怎么做？

procedure TForm1.Button1Click(Sender: TObject);
var
n:real;
begin
n:=strtofloat(edit1.Text);
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('insert into temp (列一) values （'''+n+'''）');
execsql;
end;
end;

[Error] Unit1.pas(44): Incompatible types: 'String' and 'Real'
temp 表里边 列一 数据类型 是float
测试的时候在edit 框里也输入的都是数字
想知道为什么错了
怎么样才能把数据插入进去？

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
    n : String;
    
begin
    n:=trim(edit1.Text);
    try    
        strtofloat(n);
    except
        showmessage('请输入正确的数值!');
        exit;
    end;
    
    with adoquery1 do
    begin
      close;
      sql.Clear;
      sql.Add('insert into temp (列一) values (' + n + ') ');
      execsql;
    end;
end;

Answer 2

sql.Add('insert into temp (列一) values （n);

试一下。
数值类型的一般不要加引号了。