Intel® Fortran Libraries Reference
Intel® Fortran Libraries Reference Intel® Fortran Libraries Reference
2 Intel Fortran Libraries ReferenceGETFILEINFOQQ returns time and date in a packed format. You can use UNPACKTIMEQQ tounpack these values. Use PACKTIMEQQ to repack times for passing to SETFILETIMEQQ.Packed times can be compared using relational operators.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBSee Also: “PACKTIMEQQ”, “GETFILEINFOQQ”ExampleUSE IFPORTCHARACTER(80) fileTYPE (FILE$INFO) infoINTEGER(4) handle, resultINTEGER(2) iyr, imon, iday, ihr, imin, isecfile = 'd:\f90ps\bin\t???.*'handle = FILE$FIRSTresult = GETFILEINFOQQ(file, info, handle)CALL UNPACKTIMEQQ(info%lastwrite, iyr, imon,&iday, ihr, imin, isec)WRITE(*,*) iyr, imon, idayWRITE(*,*) ihr, imin, isecENDUNREGISTERMOUSEEVENTQuickWin Function: Removes the callback routine registered for a specified window by anearlier call to REGISTERMOUSEEVENT. This function is only available on Windows*systems.Module: USE IFQWINSyntaxresult = UNREGISTERMOUSEEVENT (unit, mouseevents)unit(Input) INTEGER(4) on IA-32 processors; INTEGER(8) on Intel Itanium processors. Unitnumber of the window whose callback routine on mouse events is to be unregistered.mouseevents(Input) INTEGER(4). One or more mouse events handled by the callback routine to beunregistered. Symbolic constants (defined in IFQWIN.F90) for the possible mouse events are:2-486
Descriptions of the Library Routines 2• 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 movedResults: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.Once you call UNREGISTERMOUSEEVENT, QuickWin no longer calls the callback routinespecified earlier for the window when mouse events occur. CallingUNREGISTERMOUSEEVENT when no callback routine is registered for the window has noeffect.CompatibilityQUICKWIN GRAPHICS LIBSee Also: “REGISTERMOUSEEVENT”, “WAITONMOUSEEVENT”, "Using QuickWin" inyour user’s guideWAITONMOUSEEVENTQuickWin Function: Waits for the specified mouse input from the user. This function is onlyavailable on Windows* systems.Module: USE IFQWINSyntaxresult = WAITONMOUSEEVENT (mouseevents, keystate, x, y)mouseevents(Input) INTEGER(4). One or more mouse events that must occur before the function returns.Symbolic constants for the possible mouse events are:• MOUSE$LBUTTONDOWN – Left mouse button down• MOUSE$LBUTTONUP – Left mouse button up• MOUSE$LBUTTONDBLCLK – Left mouse button double-click2-487
- Page 488 and 489: 2 Intel Fortran Libraries Reference
- Page 490 and 491: 2 Intel Fortran Libraries Reference
- Page 492 and 493: 2 Intel Fortran Libraries Reference
- Page 494 and 495: 2 Intel Fortran Libraries Reference
- Page 496 and 497: 2 Intel Fortran Libraries Reference
- Page 498 and 499: 2 Intel Fortran Libraries Reference
- Page 500 and 501: 2 Intel Fortran Libraries Reference
- Page 502 and 503: 2 Intel Fortran Libraries Reference
- Page 504 and 505: 2 Intel Fortran Libraries Reference
- Page 506 and 507: 2 Intel Fortran Libraries Reference
- Page 508 and 509: 2 Intel Fortran Libraries Reference
- Page 510 and 511: 2 Intel Fortran Libraries Reference
- Page 512 and 513: 2 Intel Fortran Libraries Reference
- Page 514 and 515: 2 Intel Fortran Libraries Reference
- Page 516 and 517: 2 Intel Fortran Libraries Reference
- Page 518 and 519: 2 Intel Fortran Libraries Reference
- Page 520 and 521: 2 Intel Fortran Libraries Reference
- Page 522 and 523: 2 Intel Fortran Libraries Reference
- Page 524 and 525: 2 Intel Fortran Libraries Reference
- Page 526 and 527: 2 Intel Fortran Libraries Reference
- Page 528 and 529: 2 Intel Fortran Libraries Reference
- Page 530 and 531: 2 Intel Fortran Libraries Reference
- Page 532 and 533: 2 Intel Fortran Libraries Reference
- Page 534 and 535: 2 Intel Fortran Libraries Reference
- Page 536 and 537: 2 Intel Fortran Libraries Reference
- Page 540 and 541: 2 Intel Fortran Libraries Reference
- Page 542 and 543: 2 Intel Fortran Libraries Reference
- Page 544 and 545: 2 Intel Fortran Libraries Reference
- Page 546 and 547: Intel Fortran Libraries ReferenceAU
- Page 548 and 549: Intel Fortran Libraries ReferenceCo
- Page 550 and 551: Intel Fortran Libraries ReferenceDD
- Page 552 and 553: Intel Fortran Libraries Referencefu
- Page 554 and 555: Intel Fortran Libraries ReferenceFO
- Page 556 and 557: Intel Fortran Libraries ReferenceGE
- Page 558 and 559: Intel Fortran Libraries Referenceex
- Page 560 and 561: Intel Fortran Libraries ReferenceLT
- Page 562 and 563: Intel Fortran Libraries ReferenceNL
- Page 564 and 565: Intel Fortran Libraries Referencefo
- Page 566 and 567: Intel Fortran Libraries ReferencePX
- Page 568 and 569: Intel Fortran Libraries ReferencePX
- Page 570 and 571: Intel Fortran Libraries ReferencePX
- Page 572 and 573: Intel Fortran Libraries ReferenceRG
- Page 574 and 575: Intel Fortran Libraries ReferenceSE
- Page 576 and 577: Intel Fortran Libraries ReferenceSy
- Page 578 and 579: Intel Fortran Libraries ReferenceWi
- Page 580: Intel Fortran Libraries ReferenceIn
2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>GETFILEINFOQQ returns time and date in a packed format. You can use UNPACKTIMEQQ tounpack these values. Use PACKTIMEQQ to repack times for passing to SETFILETIMEQQ.Packed times can be compared using relational operators.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBSee Also: “PACKTIMEQQ”, “GETFILEINFOQQ”ExampleUSE IFPORTCHARACTER(80) fileTYPE (FILE$INFO) infoINTEGER(4) handle, resultINTEGER(2) iyr, imon, iday, ihr, imin, isecfile = 'd:\f90ps\bin\t???.*'handle = FILE$FIRSTresult = GETFILEINFOQQ(file, info, handle)CALL UNPACKTIMEQQ(info%lastwrite, iyr, imon,&iday, ihr, imin, isec)WRITE(*,*) iyr, imon, idayWRITE(*,*) ihr, imin, isecENDUNREGISTERMOUSEEVENTQuickWin Function: Removes the callback routine registered for a specified window by anearlier call to REGISTERMOUSEEVENT. This function is only available on Windows*systems.Module: USE IFQWINSyntaxresult = UNREGISTERMOUSEEVENT (unit, mouseevents)unit(Input) INTEGER(4) on IA-32 processors; INTEGER(8) on Intel Itanium processors. Unitnumber of the window whose callback routine on mouse events is to be unregistered.mouseevents(Input) INTEGER(4). One or more mouse events handled by the callback routine to beunregistered. Symbolic constants (defined in IFQWIN.F90) for the possible mouse events are:2-486