DELPHI新的变量的声明方法
DELPHI新的变量的声明方法
从DELPHI 10.3.1开始支持新的变量声明方法:
procedure TForm1.查询1Click(Sender: TObject); begin var url: TynUrl := TynUrl.Create; var serial: TynSerial := TynSerial.Create; var send: TMemoryStream := TMemoryStream.Create; try url.url := 'http://127.0.0.1:5566'; url.command := 'query8'; url.params.Add('accountno=1'); url.params.Add('sql=select * from tunit'); serial.Text := http.Post(url.text, send); serial.ReadFDDataSet('dataset', FDMemTable1); finally serial.Free; send.Free; url.Free; end; end;
支持中文方法名、新的变量声明,DELPHI越来越像一门现代语言。要是能把前面的var也省掉,岂不是更好?
本文来自博客园,作者:{咏南中间件},转载请注明原文链接:https://www.cnblogs.com/hnxxcxg/p/10534750.html