calldlgglobals.f90

来自「Intel Visual Fortran 应用程序开发 周振红编著」· F90 代码 · 共 11 行

module CallDlgGlobals
  use IFLogM
  implicit none
  !  Parameters
  integer*4, parameter, public :: SIZEOFAPPNAME = 100
  !  Global data
  integer		ghInstance
  integer		ghModule
  integer		ghwndMain
  type (dialog) gdlg
end module CallDlgGlobals