by たかせ » 2019年4月18日(木) 19:18
過去に同様な投稿がありましたが、
以下の様にすればよいと思います。
#N88BASIC
/* AB5CP5の場合 */
SetWindowText(ActiveBasic.Prompt.Detail._PromptSys_hWnd,"TEST PROGRAM")
/* AB4の場合 */
SetWindowText(_PromptSys_hWnd,"TEST PROGRAM")
PRINT "TEST PROGRAM"
MessageBox(NULL,"TEST","TESTEND",MB_OK)
END
なお現在AB5CP5は#N88BASICタイプのプログラムをコンパイルするとエラーになります。
なのでAB4を使用してください。
よろしくお願いいたします。
過去に同様な投稿がありましたが、
以下の様にすればよいと思います。
#N88BASIC
/* AB5CP5の場合 */
SetWindowText(ActiveBasic.Prompt.Detail._PromptSys_hWnd,"TEST PROGRAM")
/* AB4の場合 */
SetWindowText(_PromptSys_hWnd,"TEST PROGRAM")
PRINT "TEST PROGRAM"
MessageBox(NULL,"TEST","TESTEND",MB_OK)
END
なお現在AB5CP5は#N88BASICタイプのプログラムをコンパイルするとエラーになります。
なのでAB4を使用してください。
よろしくお願いいたします。