摘要: procedure TForm1.Button1Click(Sender: TObject);{$j+}const i:integer=0;j:integer=0;{$j-}begininc(i);Dec(j);Self.Caption:=Format('Inc%d Dec%d',[i,j]);end;通过 Wiz 发布 阅读全文
posted @ 2012-06-10 09:12 XE2011 阅读(283) 评论(0) 推荐(0)