34 lines
786 B
Plaintext
34 lines
786 B
Plaintext
class CreateTable {
|
|
function : Main(args : String[]) ~ Nil {
|
|
s := String->New();
|
|
|
|
s->Append("<table>");
|
|
s->Append("<thead align = \"right\">");
|
|
s->Append("<tr><th></th>");
|
|
td := "XYZ";
|
|
for(i:=0; i<3; i+=1;) {
|
|
s->Append("<td>");
|
|
s->Append(td->Get(i));
|
|
s->Append("</td>");
|
|
};
|
|
s->Append("</tr>");
|
|
s->Append("</thead>");
|
|
s->Append("<tbody align = \"right\">");
|
|
for(i:=0; i<3; i+=1;) {
|
|
s->Append("<tr><td>");
|
|
s->Append(i);
|
|
s->Append("</td>");
|
|
for(j:=0; j<3; j+=1;) {
|
|
s->Append("<td>");
|
|
s->Append((Float->Random() * 10000)->As(Int));
|
|
s->Append("</td>");
|
|
};
|
|
s->Append("</tr>");
|
|
};
|
|
s->Append("</tbody>");
|
|
s->Append("</table>");
|
|
|
|
s->PrintLine();
|
|
}
|
|
}
|