学习官方示例 - System.RunError
2013-05-20 22:34
323 查看
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); end; var Form1: TForm1; implementation {$R *.dfm} var P: Pointer; procedure TForm1.Button1Click(Sender: TObject); begin if P = nil then RunError(204); end; end.
相关文章推荐
- 学习官方示例 - System.RunError
- 学习官方示例 - System.Hi、System.Lo
- 学习官方示例 - System.TClass
- 学习官方示例 - System.Assigned
- 学习官方示例 - System.Frac: 返回小数部分
- 1182566 - Error: "RUN-050406 Bad system" when you try to run jobs on the server
- 学习官方示例 - TApplication.OnShowHint
- Android 官方示例:android-architecture 学习笔记(二)之todo-mvp
- Windows Installer Cleanup卸载清理错误提示:Run-time error '-2147024882 (8007000e)' System Error &H80004005 (-2147467259). Unspecified er
- 苹果官方示例代码《LazyTableImages》异步加载图片的学习记录
- 学习官方示例 - SysUtils.DecodeDate、DecodeTime
- 学习官方示例 - TApplication.Icon
- unity3d官方教学示例之SpaceShooter学习笔记
- [Nginx学习]nginx: [error] OpenEvent("Global\ngx_reload_5988") failed (2: The system cannot find the fi
- Android 官方示例:android-architecture 学习笔记(一)
- linux系统启动报错:An error occurred during the file system check(linux学习记录)
- 学习官方示例 - TApplication.OnDeactivate
- Android 官方示例:android-architecture 学习笔记(六)之todo-mvp-contentproviders
- 学习官方示例 - TForm.BorderIcons
- 学习ffmpeg官方示例代码transcoding.c遇到的问题