Intel® Fortran Libraries Reference
Intel® Fortran Libraries Reference Intel® Fortran Libraries Reference
2 Intel Fortran Libraries ReferenceSETCOLORRGB sets the current graphics color. SETFILLMASK sets the current fill mask. Bydefault, filled graphic shapes are filled solid with the current color.If you fill the rectangle using FLOODFILLRGB, the rectangle must be bordered by a solid linestyle. Line style is solid by default and can be changed with SETLINESTYLE.NOTE. The RECTANGLE routine described here is a QuickWin routine. Ifyou are trying to use the Microsoft* Platform SDK version of the Rectangleroutine by including the IFWIN module, you need to specify the routine nameas MSFWIN$Rectangle. For more information, see "Special NamingConvention for Certain QuickWin and Win32 Graphics Routines" in youruser’s guide.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “SETFILLMASK”, “GRSTATUS”, “LINETO, LINETO_W”, “POLYGON,POLYGON_W”, “FLOODFILLRGB, FLOODFILLRGB_W”, “SETLINESTYLE”,“SETCOLOR”, “SETWRITEMODE”ExampleThis program draws the rectangle shown below.! Build as a QuickWin or Standard Graphics App.USE IFQWININTEGER(2) dummy, x1, y1, x2, y2x1 = 80; y1 = 50x2 = 240; y2 = 150dummy = RECTANGLE( $GBORDER, x1, y1, x2, y2 )END(x1,y1)(x2,y2)2-370
Descriptions of the Library Routines 2REGISTERMOUSEEVENTQuickWin Function: Registers the application-supplied callback routine to be called when aspecified mouse event occurs in a specified window. This function is only available on Windows*systems.Module: USE IFQWINSyntaxresult = REGISTERMOUSEEVENT (unit, mouseevents, callbackroutine)unit(Input) INTEGER(4). Unit number of the window whose callback routine on mouse events is to beregistered.mouseevents(Input) INTEGER(4). One or more mouse events to be handled by the callback routine to beregistered. Symbolic constants (defined in IFQWIN.F90) for the possible mouse events are:• MOUSE$LBUTTONDOWN – Left mouse button down• MOUSE$LBUTTONUP – Left mouse button up• MOUSE$LBUTTONDBLCLK – Left mouse button double-click• MOUSE$RBUTTONDOWN – Right mouse button down• MOUSE$RBUTTONUP – Right mouse button up• MOUSE$RBUTTONDBLCLK – Right mouse button double-click• MOUSE$MOVE – Mouse movedcallbackroutine(Input) Routine to be called on the specified mouse event in the specified window. It must bedeclared EXTERNAL. For a prototype mouse callback routine, see "Using QuickWin" in youruser’s guide.Results:The result type is INTEGER(4). The result is zero or a positive integer if successful; otherwise, anegative integer that can be one of the following:• MOUSE$BADUNIT – The unit specified is not open, or is not associated with a QuickWinwindow.• MOUSE$BADEVENT – The event specified is not supported.For every BUTTONDOWN or BUTTONDBLCLK event there is an associated BUTTONUPevent. When the user double clicks, four events happen: BUTTONDOWN and BUTTONUP forthe first click, and BUTTONDBLCLK and BUTTONUP for the second click. The difference2-371
- Page 372 and 373: 2 Intel Fortran Libraries Reference
- Page 374 and 375: 2 Intel Fortran Libraries Reference
- Page 376 and 377: 2 Intel Fortran Libraries Reference
- Page 378 and 379: 2 Intel Fortran Libraries Reference
- Page 380 and 381: 2 Intel Fortran Libraries Reference
- Page 382 and 383: 2 Intel Fortran Libraries Reference
- Page 384 and 385: 2 Intel Fortran Libraries Reference
- Page 386 and 387: 2 Intel Fortran Libraries Reference
- Page 388 and 389: 2 Intel Fortran Libraries Reference
- Page 390 and 391: 2 Intel Fortran Libraries Reference
- Page 392 and 393: 2 Intel Fortran Libraries Reference
- Page 394 and 395: 2 Intel Fortran Libraries Reference
- Page 396 and 397: 2 Intel Fortran Libraries Reference
- Page 398 and 399: 2 Intel Fortran Libraries Reference
- Page 400 and 401: 2 Intel Fortran Libraries Reference
- Page 402 and 403: 2 Intel Fortran Libraries Reference
- Page 404 and 405: 2 Intel Fortran Libraries Reference
- Page 406 and 407: 2 Intel Fortran Libraries Reference
- Page 408 and 409: 2 Intel Fortran Libraries Reference
- Page 410 and 411: 2 Intel Fortran Libraries Reference
- Page 412 and 413: 2 Intel Fortran Libraries Reference
- Page 414 and 415: 2 Intel Fortran Libraries Reference
- Page 416 and 417: 2 Intel Fortran Libraries Reference
- Page 418 and 419: 2 Intel Fortran Libraries Reference
- Page 420 and 421: 2 Intel Fortran Libraries Reference
- Page 424 and 425: 2 Intel Fortran Libraries Reference
- Page 426 and 427: 2 Intel Fortran Libraries Reference
- Page 428 and 429: 2 Intel Fortran Libraries Reference
- Page 430 and 431: 2 Intel Fortran Libraries Reference
- Page 432 and 433: 2 Intel Fortran Libraries Reference
- Page 434 and 435: 2 Intel Fortran Libraries Reference
- Page 436 and 437: 2 Intel Fortran Libraries Reference
- Page 438 and 439: 2 Intel Fortran Libraries Reference
- Page 440 and 441: 2 Intel Fortran Libraries Reference
- Page 442 and 443: 2 Intel Fortran Libraries Reference
- Page 444 and 445: 2 Intel Fortran Libraries Reference
- Page 446 and 447: 2 Intel Fortran Libraries Reference
- Page 448 and 449: 2 Intel Fortran Libraries Reference
- Page 450 and 451: 2 Intel Fortran Libraries Reference
- Page 452 and 453: 2 Intel Fortran Libraries Reference
- Page 454 and 455: 2 Intel Fortran Libraries Reference
- Page 456 and 457: 2 Intel Fortran Libraries Reference
- Page 458 and 459: 2 Intel Fortran Libraries Reference
- Page 460 and 461: 2 Intel Fortran Libraries Reference
- Page 462 and 463: 2 Intel Fortran Libraries Reference
- Page 464 and 465: 2 Intel Fortran Libraries Reference
- Page 466 and 467: 2 Intel Fortran Libraries Reference
- Page 468 and 469: 2 Intel Fortran Libraries Reference
- Page 470 and 471: 2 Intel Fortran Libraries Reference
2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>SETCOLORRGB sets the current graphics color. SETFILLMASK sets the current fill mask. Bydefault, filled graphic shapes are filled solid with the current color.If you fill the rectangle using FLOODFILLRGB, the rectangle must be bordered by a solid linestyle. Line style is solid by default and can be changed with SETLINESTYLE.NOTE. The RECTANGLE routine described here is a QuickWin routine. Ifyou are trying to use the Microsoft* Platform SDK version of the Rectangleroutine by including the IFWIN module, you need to specify the routine nameas MSFWIN$Rectangle. For more information, see "Special NamingConvention for Certain QuickWin and Win32 Graphics Routines" in youruser’s guide.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “SETFILLMASK”, “GRSTATUS”, “LINETO, LINETO_W”, “POLYGON,POLYGON_W”, “FLOODFILLRGB, FLOODFILLRGB_W”, “SETLINESTYLE”,“SETCOLOR”, “SETWRITEMODE”ExampleThis program draws the rectangle shown below.! Build as a QuickWin or Standard Graphics App.USE IFQWININTEGER(2) dummy, x1, y1, x2, y2x1 = 80; y1 = 50x2 = 240; y2 = 150dummy = RECTANGLE( $GBORDER, x1, y1, x2, y2 )END(x1,y1)(x2,y2)2-370