[求助]几个问题集合起来了.帮忙~~``

主题：[求助]几个问题集合起来了.帮忙~~``

kingingr [专家分：1480] 发布于 2006-07-01 15:14:00

1.Form 中有个EDIT当光标(不是鼠标)离开的时候发生事件.
2.Form1 中有个EDIT 和BUTTON .输入完后EDIT后按BUTTON跳到Form2中,Form2中的EDIT会获得Form1中的EDIT中的值(请用多种方法实现,谢谢)
3.谁能写个最简单的类的例子.

拜谢.

本帖地址： http://bbs.pfan.cn/post/179038.html

回复列表（共2个回复）

沙发

wealthy [专家分：1840] 发布于 2006-07-01 16:02:00

第一个问题:当光标(不是鼠标)离开的时候发生事件
procedure TForm1.Edit1Exit(Sender: TObject);
begin
Edit2.text:=Edit1.Text;
end;
第二个问题:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.Edit1.text:=Edit1.Text;
Form2.ShowModal;
end;

板凳

kingingr [专家分：1480] 发布于 2006-07-01 16:42:00

谢谢你但是第一个例子我无法实现
第二个例子我知道
所以我在后面写到用多种方法实现

不过还是谢谢你.

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：[求助]几个问题集合起来了.帮忙~~``

回复列表（共2个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：[求助]几个问题集合起来了.帮忙~~``

回复列表 （共2个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共2个回复）