[Oorexx-svn] SF.net SVN: oorexx:[5761] main/trunk/extensions/platform/windows/oodialog

[<mie...@us...>]

Revision: 5761
          http://oorexx.svn.sourceforge.net/oorexx/?rev=5761&view=rev
Author:   miesfeld
Date:     2010-03-30 13:49:45 +0000 (Tue, 30 Mar 2010)

Log Message:
-----------
Fix bug in Edit::getFirstVisibleLine

Modified Paths:
--------------
    main/trunk/extensions/platform/windows/oodialog/DialogControls.cls
    main/trunk/extensions/platform/windows/oodialog/PlainBaseDialog.cls

Modified: main/trunk/extensions/platform/windows/oodialog/DialogControls.cls
===================================================================
--- main/trunk/extensions/platform/windows/oodialog/DialogControls.cls	2010-03-30 00:44:27 UTC (rev 5760)
+++ main/trunk/extensions/platform/windows/oodialog/DialogControls.cls	2010-03-30 13:49:45 UTC (rev 5761)
@@ -254,7 +254,7 @@
     else return ""
 
 ::method firstVisibleLine
-    return self~sendWinIntMsg(EM_GETFIRSTVISIBLELINE, 0, 0) + 1
+    return self~sendWinIntMsg(self~EM_GETFIRSTVISIBLELINE, 0, 0) + 1
 
 ::method setReadOnly
     use strict arg bool = .true

Modified: main/trunk/extensions/platform/windows/oodialog/PlainBaseDialog.cls
===================================================================
--- main/trunk/extensions/platform/windows/oodialog/PlainBaseDialog.cls	2010-03-30 00:44:27 UTC (rev 5760)
+++ main/trunk/extensions/platform/windows/oodialog/PlainBaseDialog.cls	2010-03-30 13:49:45 UTC (rev 5761)
@@ -102,6 +102,7 @@
 ::method redrawClient unguarded external "LIBRARY oodialog wb_redrawClient"
 ::method redraw unguarded external "LIBRARY oodialog wb_redraw"
 
+-- Not intending to document getWindowLong, at this point
 ::method getWindowLong private unguarded external "LIBRARY oodialog wb_getWindowLong_pvt"
 ::method getID unguarded
   return self~getWindowLong(-12)
@@ -112,11 +113,11 @@
 ::method getExStyleRaw unguarded
   return self~getWindowLong(-20)
 
+::method setText unguarded external "LIBRARY oodialog wb_setText"
+::method getText unguarded external "LIBRARY oodialog wb_getText"
 ::method "title=" unguarded external "LIBRARY oodialog wb_setText"
 ::method setTitle unguarded external "LIBRARY oodialog wb_setText"
 ::method title unguarded external "LIBRARY oodialog wb_getText"
-::method setText unguarded external "LIBRARY oodialog wb_setText"
-::method getText unguarded external "LIBRARY oodialog wb_getText"
 ::method getTextSizePx unguarded external "LIBRARY oodialog wb_getTextSizePx"
 ::method getTextSizeScreen unguarded external "LIBRARY oodialog wb_getTextSizeScreen"
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.