拡張子を.exeから.scrに変えた後は、ダブルクリックすれば起動できるようです。白い四角を１０個づつ表示しては、画面を黒で塗りつぶして、また四角を表示し続けます。 logical(4) function ScreenSaverConfigureDialog(hDlg ,message ,wParam, lParam) !DEC…

Intel Visual Fortran Ver.10.1 で Screen Saver 用の Module が提供されているのを見つけました。最小限度のものを作ってみます。Module scrnsave を使用します。 SUBSYSTEM は Windows Program 用にします。 出来た EXE ファイルの拡張子を .SCR に変えて…

Fortran2003 での C 呼び出し規約と、Win32 での呼び出し規約が、異なっているようなので、以下の内容は間違っているかもしれません。名称の規約しか合っていない可能性があります。 MODULE m_sub USE ifwin CONTAINS INTEGER (LRESULT) FUNCTION MainWndPro…