even2004: 入门课堂:如何读取当前PART的TAG int module_id ; Entity ObjTag; char ObjName[133]; char *file_name; logical *unused; int *response ; char info[133];' UF_ask_application_module(&module_id); printf(" %dn",module_id); ObjTag=UF_ASSEM_ask_work_part(); printf(" tag %dn",ObjTag); UF_OBJ_ask_name(ObjTag,ObjName); printf("tag name:%sn",ObjName); sprintf(info,"tag %d name %s",ObjTag,ObjName); uc1601(info,1);
|
|