看一段别人写的程序,里面有以下看不懂的地方,请大家帮忙解说一下!!Unit Flash;Interface
uses Tools;Type
... ...var
... ...const
Flash_Read : function(Address:LongInt):Byte=FIMemB_Flash;//(看不懂??)Implementation
... ...
在其他的unit中调用
Flash_Read:=FIMemB_Flash_Low;//(看不懂??)
Flash_Read($1822);//(看不懂??)
B:=Flash_Read(FlashAddr+A);//(看不懂??)

解决方案 »

  1.   

    Flash_Read : function(Address:LongInt):Byte=FIMemB_Flash;//(看不懂??)
    声明一个函数Flash_Read,将FIMemB_Flash的指针付给Flash_Read,直接执行Flash_Read函数的时候,将执行FIMemB_Flash函数体的内容。
    Flash_Read:=FIMemB_Flash_Low;//(看不懂??)
    FIMemB_Flash_Low函数指针付给Flash_Read,同上
    Flash_Read($1822);//(看不懂??)
    执行Flash_Read函数指针指向的函数。
    B:=Flash_Read(FlashAddr+A);//(看不懂??)
    同上