<% {$I ../../inc/public._ps} var I, J: Integer; S,T, tbN, ln1, ln2, ln3: String; F: TCTMetaField; col: Integer; begin tbN:=GetLabelText(CurTable); %> ${tbN}
  • 全部
  • 热门
  • 最近
<% for J:=0 to 9 do begin col := 0; ln1 := ''; ln2 := ''; ln3 := ''; for I:=0 to CurTable.MetaFields.Count-1 do begin F:=CurTable.MetaFields.Items[I]; if not F.CanDisplay('grid') then Continue; S:=F.GenDemoData(1, '', nil);; //T := T+'"'+F.Name+'": "'+S+'"' T := S; if col=0 then ln1 := T else if col<=2 then ln2 := Trim(ln2 + ' '+T) else if col <=4 then ln3 := Trim(ln3 + ' '+T); col := col + 1; end; %>

${ln1}

${ln2}

${ln3}

<% end; %>
<% end. %>