Question

delphi中文本框清除上次记录

有一个按钮点击的时候是调用这个文本框中的文字，执行一次后，更改文本框中的文字后，再去点击按钮，返回的是文本框原来的文字。要怎么清楚这个记忆呢？求高手指点
procedure TForm1.STARTClick(Sender: TObject);
VAR
OrderID,i,status:INTEGER;
const
bl:array[0..4] of double=(1,2,3,4,5);
begin
if lprice<>0 then begin
ctp.Buy(daima.Text,1,lprice,OrderID);
for i:=0 to 4 do begin
ctp.Buy(daima.Text,1,LPRICE-bl[i],OrderID); //大于最新价的挂卖单
ctp.Short(daima.Text,1,LPRICE+bl[i],OrderID);
end;
end;

够吗？完整的贴不上去，新手，求大侠啊！！

Answer 1

回答1：求Button的OnClick代码；
回答2：看你的代码，应该没什么问题，保险一点，就在结尾加个 daima.clear; 的代码吧；个人觉得可能是数据库事务提交的问题。

Answer 2

不清楚你需要什么功能。edit1.text :=''; 加在按钮事件里不行？

追问

edit1的默认值是000001(平安银行)，点击按钮“下单”之后买入1手平安银行的股票，我把edit1改成了600000（浦发银行），点击下单之后，买进的还是平安银行

追答

代码有问题吧，或是接口有问题。
你能贴代码？你说的默认值是指在属性框里设置的值，然后点击下单后做了什么？窗体释放？再创建窗口？

Answer 3

我估计你的是dbedit，dbedit是不可以直接用text来赋值的，要用DATASET的fieldbyname来改的