怎么把edit1.text的值转换为money型？Parameters.ParamByName('prize').Value:=StrTo....(Edit1.Text);

Question

怎么把edit1.text的值转换为money型？Parameters.ParamByName('prize').Value:=StrTo....(Edit1.Text);插入数据库呢？

Answer 1

Parameters.ParamByName('Prize').AsString := Trim(Edit1.Text);//这样，数据库会给你自动转化；但是前提请保证你的Edit1里确实是Money型；

Answer 2

Parameters.ParamByName('Prize').AsString := strtofloat(Trim(Edit1.Text));//剩下的就交给DELPHI吧

Answer 3

[Error] Unitmoduledetails.pas(104): Undeclared identifier: 'AsString'???
我怎么就默认显示.AsString ?只有.Value??

Answer 4

Parameters.ParamByName('prize').asstring:=formatfloat('0.00',floattostr(Edit1.Text));没有测试仅做参考呵呵

Answer 5

Undeclared identifier: 'AsString'???

Answer 6

FieldByName('Prize').AsString := Edit1.text
这下应该可以吧

Answer 7

FieldByName('Prize').asvariant:= Edit1.text

Answer 8

Parameters.ParamByName('prize').Value:=StrToFloat(trim(Edit1.Text));

Answer 9

首先要引用单元strutils
Parameters.ParamByName('prize').Value:=StrTocurr(trim(Edit1.Text));

Answer 10

Parameters.ParamByName('prize').Value:=StrToFloat(trim(Edit1.Text));