哪位大虾给我讲讲过程变量(100分)

begin
theHandle:=LoadLibrary('C:/Samples/S9_1/DLL2/Project2.dll');
if theHandle <> 0 then
begin
@MultiplyNum := GetProcAddress(theHandle,'MultiplyNum');
if (@MultiplyNum) <> nil then
begin
TMultiplyNum(MultiplyNum); //这一句话中声明为TMultiplyNum=procedure
FreeLibrary(theHandle); //过程变量究竟该如何使用，上面一句是什么意思？
end;
end
else
MessageBox(0,'指定的动态链接库可能不存在' , '信息',MB_OK+MB_ICONWARNING);

begin
theHandle:=LoadLibrary('C:/Samples/S9_1/DLL2/Project2.dll');//加载动态连接库
if theHandle <> 0 then//如果加载成功
begin
@MultiplyNum := GetProcAddress(theHandle,'MultiplyNum');//获取函数入口地址
if (@MultiplyNum) <> nil then//如果函数入口地址不空
begin
TMultiplyNum(MultiplyNum); //TMultiplyNum指向函数入口
FreeLibrary(theHandle); //释放动态连接库句柄
end;
end
else
MessageBox(0,'指定的动态链接库可能不存在' , '信息',MB_OK+MB_ICONWARNING);