F
fashow
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
var
i:float;
begin
ADOQuery1.Close;
i:=strtofloat(Edit1.Text);
ADOQuery1.SQL.Text:='insert into test values(i)';
ADOQuery1.Open;
ADOQuery1.Post;
end;
为什么说float没有定义,正确的应该怎么做?
var
i:float;
begin
ADOQuery1.Close;
i:=strtofloat(Edit1.Text);
ADOQuery1.SQL.Text:='insert into test values(i)';
ADOQuery1.Open;
ADOQuery1.Post;
end;
为什么说float没有定义,正确的应该怎么做?