Delphi 如何在定义局部变量时赋初始值

本文整理自网络，侵删。

 如何在定义局部变量时赋初始值

局部变量不像全局变量可赋初始值, 但可以通过编译指令把指定类型的常量当作变量用, 如:
--------------------------------------------------------------------------------


const
{$J+}
num: Integer = 1;
{$J-}
begin
Inc(num);
ShowMessage(IntToStr(num)); {2}
end;

//或者写作:
const
{$WRITEABLECONST ON}
num: Integer = 1;
{$WRITEABLECONST OFF}
begin
Inc(num);
ShowMessage(IntToStr(num)); {2}
end;

 

相关阅读 >>

Delphi webservices传数据

Delphi idhttp returning http 1.1/500 显示错误内容

Delphi txt日志log

Delphi sysutils.strcopy、sysutils.strecopy

Delphi tfilestream 的读写 合并文件

Delphi 检查屏幕是否处于锁屏或关闭状态

Delphi memo 手动选择txt文本编码并读取

Delphi一个抓屏的函数

Delphi firedac获取自增长字段值

Delphi webbrowser获取页面全部链接

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 如何在定义局部变量时赋初始值