External windows in windows ( warning, rated PG: contains explict win32 code)

Stefan Matthias Aust sma at 3plus4.de
Wed Jun 14 19:01:10 UTC 2000


Some anonymous australien factory wrote:

>   Using the lovely new FFI in Squeak 2.8a it's possible to open an 
> external window to the main squeak window, ie. as in.. [...]

I'm not really sure what your problem is.  If I define

messageBox: hdl prompt: prompt caption: caption style: style
   <apicall: long 'MessageBoxA' (nil char* char* ulong) module: 'user32'>

and then call

FFITest new messageBox: nil prompt: 'Hallo' caption: 'Test' style: 0

it works as expected.  Squeak will pause as long as the message is shown 
(which is for what a modal message box is for) and as I used "nil" as 
window handle, the message box isn't related to the Squeak screen.  This 
can be fixed using

messageBox: hdl prompt: prompt caption: caption style: style
   <apicall: long 'MessageBoxA' (Win32Window char* char* ulong) module: 
'user32'>

and calling

FFITest new
   messageBox: Win32Window getFocus
   prompt: 'Hallo' caption: 'Test' style: 0

bye
--
Stefan Matthias Aust  //  Bevor wir fallen, fallen wir lieber auf





More information about the Squeak-dev mailing list