director可以用一些html标签来实现表格
不过做起来比较麻烦
on makeTable memberName, headings,widths,data
-- start with <HTML> and <BODY> tags
htmlText = "<HTML><BODY BGCOLOR=FFFFFF>"
-- beginning of table
put "<TABLE BORDER=1><TR>" after htmlText
repeat with i = 1 to count(headings)
put "<TD width=" & widths[i] & "><B>"&headings[i]&"</B></TD>" after htmlText
end repeat
put "</TR>" after htmlText
-- add each row
repeat with i = 1 to count(data)
put "<TR>" after htmlText
-- add a row
repeat with j = 1 to count(data[i])
put "<TD width=" & widths[j] & ">" after htmlText
put "<font color=""E&"#FFFF00""E&">"&data[i][j]&"</font>"&"</TD>" after htmlText
end repeat
put "</TR>" after htmlText
end repeat
-- close table and html
put "</TABLE></BODY></HTML>" after htmlText
put htmlText
member(memberName).html = htmlText
end
--<font color="#FF0000">￥33.6</font>
on testTable
headings = ["Name","Address","Phone","Birthday","City","city1"]
widths = [100,150,60,60,80,110]
data = []
add data, ["John Doe", "123 Street Road", "555-3456","7/28/65", "Seattle","city1"]
add data, ["Betty Deer", "654 Avenue Blvd", "555-1234","9/11/68", "Los Angeles","city1"]
add data, ["Robert Roberts", "9346 Dead End Pl.","555-9999", "1/8/67", "New York","city1"]
makeTable("htmltable",headings,widths,data)
end
