主题:请教"窗口中显示图片"问题
* main.prg 文件
CCC = 1
SET TALK OFF
SET SAFETY OFF
SET DATE YMD
SET SYSMENU OFF
SET STATUS OFF
SET STATUS BAR OFF
SET CENTURY ON
CLOSE ALL
DO cdsy.mpr
READ EVENTS
***********************************
* cdsy.mpr 文件
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD UU OF _MSYSMENU PROMPT '进仓操作' SKIP FOR CCC = 0 COLOR SCHEME 3
DEFINE PAD VV OF _MSYSMENU PROMPT '出仓操作' SKIP FOR CCC = 0 COLOR SCHEME 3
DEFINE PAD WW OF _MSYSMENU PROMPT '库存查询' SKIP FOR CCC = 0 COLOR SCHEME 3
DEFINE PAD ZZ OF _MSYSMENU PROMPT '退出系统' SKIP FOR CCC = 0 COLOR SCHEME 3
ON PAD UU OF _MSYSMENU ACTIVATE POPUP 进仓操作
ON PAD VV OF _MSYSMENU ACTIVATE POPUP 出仓操作
ON PAD WW OF _MSYSMENU ACTIVATE POPUP 库存查询
ON SELECTION PAD ZZ OF _MSYSMENU quit
DEFINE POPUP 进仓操作 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 进仓操作 PROMPT '进仓记录'
ON SELECTION BAR 1 OF 进仓操作 ;
DO AA IN LOCFILE("\SUU\CD" )
DEFINE POPUP 出仓操作 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 出仓操作 PROMPT '出仓记录'
ON SELECTION BAR 1 OF 出仓操作 ;
DO BB IN LOCFILE("\SUU\CD" )
DEFINE POPUP 库存查询 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 库存查询 PROMPT '查询库存'
ON SELECTION BAR 1 OF 库存查询 do ba in MAO
**************************************************
还有一个图片文件 不妨设为 88.jpg
当运行上述main.prg文件后,出现一个菜单栏的界面,但这个界面中是一片空白,现想用程序(或者说上述某个文件中添加一段代码或新添一个程序文件)将图片88.jpg出现在上述这个空白中,谢谢!
CCC = 1
SET TALK OFF
SET SAFETY OFF
SET DATE YMD
SET SYSMENU OFF
SET STATUS OFF
SET STATUS BAR OFF
SET CENTURY ON
CLOSE ALL
DO cdsy.mpr
READ EVENTS
***********************************
* cdsy.mpr 文件
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD UU OF _MSYSMENU PROMPT '进仓操作' SKIP FOR CCC = 0 COLOR SCHEME 3
DEFINE PAD VV OF _MSYSMENU PROMPT '出仓操作' SKIP FOR CCC = 0 COLOR SCHEME 3
DEFINE PAD WW OF _MSYSMENU PROMPT '库存查询' SKIP FOR CCC = 0 COLOR SCHEME 3
DEFINE PAD ZZ OF _MSYSMENU PROMPT '退出系统' SKIP FOR CCC = 0 COLOR SCHEME 3
ON PAD UU OF _MSYSMENU ACTIVATE POPUP 进仓操作
ON PAD VV OF _MSYSMENU ACTIVATE POPUP 出仓操作
ON PAD WW OF _MSYSMENU ACTIVATE POPUP 库存查询
ON SELECTION PAD ZZ OF _MSYSMENU quit
DEFINE POPUP 进仓操作 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 进仓操作 PROMPT '进仓记录'
ON SELECTION BAR 1 OF 进仓操作 ;
DO AA IN LOCFILE("\SUU\CD" )
DEFINE POPUP 出仓操作 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 出仓操作 PROMPT '出仓记录'
ON SELECTION BAR 1 OF 出仓操作 ;
DO BB IN LOCFILE("\SUU\CD" )
DEFINE POPUP 库存查询 COLOR SCHEME 4 SHADOW MARGIN RELATIVE
DEFINE BAR 1 OF 库存查询 PROMPT '查询库存'
ON SELECTION BAR 1 OF 库存查询 do ba in MAO
**************************************************
还有一个图片文件 不妨设为 88.jpg
当运行上述main.prg文件后,出现一个菜单栏的界面,但这个界面中是一片空白,现想用程序(或者说上述某个文件中添加一段代码或新添一个程序文件)将图片88.jpg出现在上述这个空白中,谢谢!