zoukankan      html  css  js  c++  java
  • [原创] Delphi Assigned函数的使用和介绍

    Assigned 函数在Delphi 的单元中并不能找到,网上有人评论说它并不是一个真正的函数,至今我也没有找到不能证明它为什么不是函数,但可以肯定的是,它确实可以当做函数来使用

    原型:function Assigned(var P ): Boolean;

    概念:Assigned 用来确定引用的指针或过程是否为空(nil),这个P必须是指针或者引用过程类型的变量,Assigned (P) 对应指针变量的测试 P<>nil,过程变量的 @P<>nil,如果P为nil,Assigned返回False,否则返回True。

    典型应用:

    if not Assigned(Form1) then 
    begin 
       Form1:= TForm1.Create(Application); 
       Form1.ShowModal; 
       Form1.Free; 
    end; 
    

    以上创建之后的窗体采用 Form1.Free 释放,实际上窗体还是存在的,并没有从内存中完全释放。

    两种方法纠正:

      1、在Form1窗体中 FormDestroy 销毁事件中 加入 Form1:=nil

      2、把Form1.Free 换成 FreeAndNil(Form1);  , 参考点击超链接

    创建日期:2019.12.27

    来源:https://www.cnblogs.com/guorongtao/p/12107128.html

  • 相关阅读:
    swoole 的 go function 是什么
    MySQL grant之后要不要跟上 flush privileges
    操作数据库
    APP端异常情况
    评论列表优化联表问题
    tp5修改数据前过滤
    字典
    if语句
    【整理】android事件传递机制
    Linux常用操作
  • 原文地址:https://www.cnblogs.com/guorongtao/p/12107128.html
Copyright © 2011-2022 走看看