From: George H. <geo...@us...> - 2012-08-14 14:10:11
|
Update of /cvsroot/win32forth/win32forth/src/lib In directory vz-cvs-4.sog:/tmp/cvs-serv17622 Modified Files: ListBox.f Log Message: Minor mod Index: ListBox.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/lib/ListBox.f,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** ListBox.f 14 Aug 2012 13:27:22 -0000 1.4 --- ListBox.f 14 Aug 2012 14:10:09 -0000 1.5 *************** *** 81,85 **** \ *P The return value is the address and length of the string. \ ** If \i n \d does not specify a valid index, the length is CB_ERR. ! new$ dup rot CB_GETTEXT SendMessage:Self ;M :M GetSelectedString: ( -- addr cnt ) --- 81,85 ---- \ *P The return value is the address and length of the string. \ ** If \i n \d does not specify a valid index, the length is CB_ERR. ! new$ dup rot CB_GETLBTEXT SendMessage:Self ;M :M GetSelectedString: ( -- addr cnt ) |