delphi – 没有参数化TFormatSettings的StrToDate()应该抛出AV吗？

概述只是为了好奇：为什么这段代码给出AV而不是抛出异常？ procedure TForm1.Button1Click(Sender: TObject);var fs: TFormatSettings;begin strtodate('2011-01-01', fs);end; 您的代码引发异常,因为fs未初始化. uses SysUtis, Windows; procedure TFo 只是为了好奇：为什么这段代码给出AV而不是抛出异常？

procedure TForm1.button1Click(Sender: TObject);var fs: TFormatSettings;begin  strtodate('2011-01-01',fs);end;

解决方法 您的代码引发异常,因为fs未初始化.

uses SysUtis,windows;  procedure TForm1.button1Click(Sender: TObject);  var fs: TFormatSettings;  begin    GetLocaleFormatSettings(GetSystemDefaultLCID,fs); // what is your short-date format?    strtodate('2011-01-01',fs);  end;

总结

以上是内存溢出为你收集整理的delphi – 没有参数化TFormatSettings的StrToDate()应该抛出AV吗？全部内容，希望文章能够帮你解决delphi – 没有参数化TFormatSettings的StrToDate()应该抛出AV吗？所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。