#if 0 //--------------------------------------------// // 本文件为自动生成,请勿编辑 // // thanks to 最萌小汐 // //--------------------------------------------// #endif #ifdef USE_BJ_ANTI_LEAK #ifndef YDWEMultiboardSetItemWidthBJNullIncluded #define YDWEMultiboardSetItemWidthBJNullIncluded library YDWEMultiboardSetItemWidthBJNull function YDWEMultiboardSetItemWidthBJNull takes multiboard mb, integer col, integer row, real width returns nothing local integer curRow = 0 local integer curCol = 0 local integer numRows = MultiboardGetRowCount(mb) local integer numCols = MultiboardGetColumnCount(mb) local multiboarditem mbitem = null // Loop over rows, using 1-based index loop set curRow = curRow + 1 exitwhen curRow > numRows // Apply setting to the requested row, or all rows (if row is 0) if (row == 0 or row == curRow) then // Loop over columns, using 1-based index set curCol = 0 loop set curCol = curCol + 1 exitwhen curCol > numCols // Apply setting to the requested column, or all columns (if col is 0) if (col == 0 or col == curCol) then set mbitem = MultiboardGetItem(mb, curRow - 1, curCol - 1) call MultiboardSetItemWidth(mbitem, width/100.0) call MultiboardReleaseItem(mbitem) endif endloop endif endloop set mbitem = null endfunction endlibrary #endif #endif