[HELP] SKILL ERROR

seanhung99 · 发表于 2009-7-23 15:15

EDA365欢迎您！

您需要登录才可以下载或查看，没有帐号？注册

x

求助下列ERROR MESSAGE是错在哪里
E- *Error* axlGRPDrwInit: argument #1 should be any user-defined (other) type (type template = "otg") – nil

procedure( IFormTest(fw)

prog( (position)
; need to do this since have a return

;; Good pratice

;; If form is open expose it and return

(cond (fw

(axlUIWExpose fw)

(return fw)

)

)

position = '("NE")

;; no msg lines in form

position = '("NE" "msglines" 1)

;; create a form handle, position form and set-up mode

fw = axlFormCreate('f1s "axlform" position '_afCallback t nil )

bitmap_handle = axlGRPDrwInit(fw "bitmap" 'FlipIt)

bitmap_handle->Flip = 0

graphic_handle = axlGRPDrwInit(fw "graphic" 'FlipIt)

graphic_handle->Flip = 1

fw->Bitmap_handle = bitmap_handle

fw->Graphic_handle = graphic_handle

;; Set a better title then the form file

axlFormTitle(fw "--F1-- Skill Test Form" )

;; Build a dynamic popup for enum field

;axlFormBuildPopup(fw "enum" '(("item1" "1") ("item2" "2") ("item3" "3")) )

axlFormBuildPopup(fw "enum" '(("item1") ("item2") ("item3")) )

; demostrate color and font type in popups

axlFormBuildPopup(fw "enumcolor"

'(("green" 1 green)

("yellow" 2 yellow bold)

("red" 3 red underline)

("blue" 4 blue )

("button" 5 button )

("black" 6 black )

("white" 7 white )

("Bold" 8 bold )

("Underline" 9 underline )

) )

;; Set form fields to starting values

IFormRefresh(fw)

;; Last thing to do is display the form

axlFormDisplay(fw)

return(fw)
; return form handle to caller

)
)