本文整理自网络,侵删。
uses Generics.Collections;
procedure TForm1.FormCreate(Sender: TObject);varFDic: TDictionary<string,string>;beginFDic:= TDictionary<string,string>.Create;FDic.AddOrSetValue('123', '456');Caption:=FDic.Items['123'];FDic.Free;end;
相关阅读 >>
Delphi 用idhttp打开网页或下载文件时如何显示进度
更多相关阅读请进入《Delphi》频道 >>