请问我用在form1的一个函数中用 ShowModal 方式打开 Form2 后,怎样 从Form2返回值给 Form1的调用函数呢?
解决方案 »
- delphi 如何把登陆界面的用户名在主界面显示出来? 急啊~~~
- 有没办法得到系统打开的新的窗口
- 如何定义公用的函数?应该定义在什么地方,其它窗体也可以调用该函数?还有全局变量
- 简单问题:如何使用sql语句?(我没分了,各位大虾帮帮忙,别介意阿)在线等待!!!
- 用Delphi编的程序,在Win2000下的界面和win98的界面居然不同?
- 关于网络的问题(菜鸟)
- 已知一个网页中的图标链接,怎样获取他的座标!
- 数组排序问题
- 能否用format函数将不足3位的数前补零?如8->008/12->012??
- "九.一八",勿忘国耻日!
- 我用tquery查询出的数据集怎么是只读的呀?
- 压缩编译好的工具在那里?
result:dword;
begin
resutl:=form2.showmodal;
if showmodal=mrok then
begin
a:=edit1.text; //form2中的edit1
free;
end;
mrNone: ;
mrOK: ;
mrCancel: ;
.....
end;—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
也可以在form1申请一个变量,中form2中引用