有关INTRAWEB中窗体赋值问题。。。。。。 ( 积分: 100 )

C

chengcheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-20

• #1

在编写INTRAWEB程序时，共有二个窗体。第一个窗体有多项文本框，已经输入了数据，有一按钮为统计，点击按钮后，打开第二个窗体。第二个窗体多个文本框，统计出结果在并闭第二个窗体或隐藏第二个窗体时，把统计结果送入到第一个窗体文本框中。试用了全局变量送值没有通过，引用窗体单元也无法引用。这个问题如果不在INTRAWEB程序，而在DELPHI普通窗体中方法非常好实现，敬请帮助，给一些解决问题的方法。

 

C

chengcheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-20

• #2

在编写INTRAWEB程序时，共有二个窗体。第一个窗体有多项文本框，已经输入了数据，有一按钮为统计，点击按钮后，打开第二个窗体。第二个窗体多个文本框，统计出结果在并闭第二个窗体或隐藏第二个窗体时，把统计结果送入到第一个窗体文本框中。试用了全局变量送值没有通过，引用窗体单元也无法引用。这个问题如果不在INTRAWEB程序，而在DELPHI普通窗体中方法非常好实现，敬请帮助，给一些解决问题的方法。

 

H

hq8205

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-20

• #3

可以用主窗体的方式，把值赋到主窗体上就行了，再在另外一个窗体中就能调用了

 

C

chengcheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-20

• #4

急待解决，能否给段代码

 

C

chengcheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-21

• #5

以上说明不是十分清楚，图示如下
--------------------------------------
|
窗体1 |
|
姓名 张三 |
。。 得分 计算 |
|
---------------------------------------

---------------------------------------
窗体2 |
语文 10 。。 |
数学 20 关闭 |
英语 30 |
合计 60 |
---------------------------------------
图示中 。。 中多项录入项，在窗体1中点击 计算，打开第二窗体，在关闭第二窗体时，显示第一窗体，把合计数60送入到第一窗体 得分输入框中，并且第一窗体中原先录入的数据不能清除，保持原数据。
请高手帮忙，初学INTRAWEB编程，请高手指明一条光明道路。

 

C

chenybin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-21

• #6

http://www.delphibbs.com/delphibbs/dispq.asp?LID=2345963
标题： intraweb如何在一个TIWAppForm中显示另一个TIWAppForm（或TFrame） (100分)

 

C

chengcheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-21

• #7

我的意思是当点击计算按钮时，第一个窗体隐藏起来，显示第二个窗体，第二个窗体关闭后，把得分赋给第一个窗体，第一个窗体再显示出来，如果把第一个窗体释放后再显示，原先输入的数据就被清空。如果在普通窗体编程中可以在第二个窗体单元中引用第一个窗体单元，在关闭之前 用 窗体1.得分。TEXT：=窗体2.合计。TEXT 但是在INTRAWEB中窗体2中合计的值无法送入窗体1中，并且关闭窗体2后，显示窗体1 用SHOW无法显示，而用重新建立原先输入的已被清空。

 

C

chengcheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-22

• #8

怎么没有人回答，请高手帮忙

 

C

chenybin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-25

• #9

JS里面弹出窗口有个parent属性，看看Intraweb出来的东西有没有这个，也就是弹出窗口可以通过parent来控制父窗口，不过隐藏折中事情还是不想为妙

 

V

vazumi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-12

• #10

我來幫你
其實很簡單，你不要主動釋放IWFORM1就可以了
IntraWeb窗體創建順序是個堆棧，先入後出

IWFORM1上的按鈕事件
procedure TIWForm1.IWButton1Click(Sender: TObject);
var form2:TIWForm2;
begin
form2:=TIWForm2.Create(WebApplication);
form2.IWEdit1.Text :=IWEdit1.Text;
form2.Show;
end;
IWFORM2上的按鈕事件
procedure TIWForm2.IWButton1Click(Sender: TObject);
begin
self.Release;
end;