From: <mie...@us...> - 2007-06-01 02:40:28
|
Revision: 424 http://svn.sourceforge.net/oorexx/?rev=424&view=rev Author: miesfeld Date: 2007-05-31 19:40:29 -0700 (Thu, 31 May 2007) Log Message: ----------- Fix for [ 1729152 ] ooDialog executeAsync incorrect DlgData. Modified Paths: -------------- interpreter-3.x/trunk/platform/windows/oodialog/dlgext.cls interpreter-3.x/trunk/platform/windows/oodialog/plbdlg.cls Modified: interpreter-3.x/trunk/platform/windows/oodialog/dlgext.cls =================================================================== --- interpreter-3.x/trunk/platform/windows/oodialog/dlgext.cls 2007-06-01 00:13:26 UTC (rev 423) +++ interpreter-3.x/trunk/platform/windows/oodialog/dlgext.cls 2007-06-01 02:40:29 UTC (rev 424) @@ -56,6 +56,7 @@ if sleeptime~Datatype('N') = 0 then sleeptime = 10 if Arg(2,'o') = 1 then sh = "DEFAULT" if Arg(4,'o') = 1 then nomodal = 0 + DlgData. = self~DlgData if self~startit(icon, nomodal) \= 0 then do if self~UseStem = 1 then self~SetDataStem(DlgData.); else self~SetData Modified: interpreter-3.x/trunk/platform/windows/oodialog/plbdlg.cls =================================================================== --- interpreter-3.x/trunk/platform/windows/oodialog/plbdlg.cls 2007-06-01 00:13:26 UTC (rev 423) +++ interpreter-3.x/trunk/platform/windows/oodialog/plbdlg.cls 2007-06-01 02:40:29 UTC (rev 424) @@ -188,6 +188,10 @@ ::method AutoDetect attribute /* Automatic data field detection on/off */ ::method DataConnection attribute protected /* store connections between ids and class attributes */ ::method UseStem attribute protected /* flag whether to use a stem to set/get data or not */ +::method DlgData private + expose DlgData. + return DlgData. + ::method Finished attribute ::method ParentDlg attribute protected This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |