我想实现的功能是,现有三个EDIT控键edit1、edit2、edit3edit3显示的值是edit1与edit2的积,在不需要按键情况下实现比如:在edit1和edit2分别输入1和2 光标点到edit3的时候会自动显示出他们和积
希望高手指教!最好详细一点!procedure TForm1.Edit3MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
edit3.Text :=inttostr(strToint(edit1.Text)*strToint(edit2.Text));
end;按上面这个写进去之后点击EDIT3程序就出错了
希望高手指教!最好详细一点!procedure TForm1.Edit3MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
edit3.Text :=inttostr(strToint(edit1.Text)*strToint(edit2.Text));
end;按上面这个写进去之后点击EDIT3程序就出错了
解决方案 »
- 请高手指点,这样错在那里,要怎么修改
- DELPHI求解释
- adoquery的问题
- 我用delphi5,ADO有一个BUG,请问补丁是在哪里找的,多大
- 关于Excel导入数据库问题
- ADO
- 我在我的INTERBASE数据库中的存储过程中使用了异常处理,即调用了我定义的异常,当发生异常时我想在程序中提示用户发生了什么, DELPHI程序中怎么实现?
- 关于一个简单控件的使用,给点建议好不好?
- 求delphi版的Ginadll原代码?(ttp://www.vchelp.net/article/submit/cad_key.htm)
- 求一多线程的小例子
- sql access 存贮速度慢?
- DELPHI数据类型的问题
edit3.Text :=inttostr(strTointDef(edit1.Text,-1)*strTointDef(edit2.Text),-1);
Shift: TShiftState; X, Y: Integer);
begin
edit3.Text :=inttostr(strToint(edit1.Text)*strToint(edit2.Text));
end; 按上面这个写进去之后点击EDIT3程序就出错了
应该没有错误啊
调试下