2012年1月6日
Delphi7函数大全
摘要： 首部 function Languages: TLanguages; $[SysUtils.pas功能 返回系统语言对象说明 通过此函数可以得到系统的语言环境参考 type SysUtils.TLanguages例子 ///////Begin Languagesprocedure TForm1.Button1Click(Sender: TObject);var I: Integer;begin Memo1.Clear; for I := 0 to Languages.Count - 1 do Memo1.Lines.Add(Languages.Name[I]);end;///////End L 阅读全文
posted @ 2012-01-06 15:43 今孤忡，川逝 阅读(1329) 评论(0) 推荐(0)