c_classes.pc

来自「Delphi脚本控件」· PC 代码 · 共 24 行

using Classes;

TList L = new TList();

L.Add(2);
L.Add(new TObject());
L.Add(5);
L.Add(7);

for (int I = 0; I < L.Count; I++)
  println L[I];

TStringList SL = new TStringList();

with (SL) {
  Add("abc");
  Add("pqr");
  Add("xyx");
}

for (var I = 0; I < SL.Count; I++)
  println SL[I];