delphi 检查是否分配了控制

uqdfh47h 于 2022-11-04 发布在其他

关注(0)|答案(1)|浏览(115)

我有一个函数，它包含传入参数的TMemo。如果它不为空，我想在其中添加一些行。如何检查它不为空？

function send(logger: TMemo): boolean;
begin
if (logger <> NULL) then logger.Lines.Add('aaaa'); //not works

end;

1条答案

NULL是一个变量类型。在Pascal中，C语言中NULL的概念被称为NIL。
所以正确的方法是与NIL-not NULL进行比较：

if (logger <> NIL) then logger.Lines.Add('aaaa');

或者，在我看来更好，因为它更正确地描述了你正在试图做的事情，是：

if Assigned(logger) then logger.Lines.Add('aaaa');