本文整理自网络,侵删。
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 为当前窗口客户区捉图: getformimage
Delphi firedac tfdconnection连接mysql数据库
更多相关阅读请进入《Delphi》频道 >>