... "+odb1:unit+" "+padl(cvaltochar(odb1:qty),nqtylen," ")+" V"+alltrim(odb1:version)+" "+odb1:mem) odb1:SKIP() enddo oWnd1:oClient:=oTree oTree:Expand() SET MESSAGE OF oWnd1 TO "BOM树型展开表" FONT ofont14 ACTIVATE WINDOW oWnd1 VALID (oBmp1:End(),oBmp2:End(),.t.) ...