Delphi中,怎么根据输入的字符串来调用相应的函数

Delphi中,如何根据输入的字符串来调用相应的函数？
假如动态库DllLib.Dll中有一个函数CallFunc(FuncName,pParameter: pchar): Olevarint;此函数作为一个接口，供其他程序调用；同时，DllLib.Dll中还有其他函数,FunA(pParameter: pchar),FunB(pParameter: pchar),FunC(pParameter: pchar),现在要求如下，外部程序调用CallFunc('FunA','输入参数'),要在CallFunc中调用FunA(pParameter: pchar)，如果外部程序调用CallFunc('FunB','输入参数'),要在CallFunc中调用FunB(pParameter: pchar);请问,CallFunc函数该怎么写？

------解决方案--------------------
function CallFunc(FuncName,pParameter: pchar): Olevarint;
begin
if FuncName = 'FunA' then FunA(pParameter)
else if FuncName = 'FunB' then FunB(pParameter)
else if FuncName = 'FunC' then FunC(pParameter);
...
end;
------解决方案--------------------
楼上真快~_~
------解决方案--------------------
判断FuncName
------解决方案--------------------

探讨

function CallFunc(FuncName,pParameter: pchar): Olevarint;
begin
  if FuncName = 'FunA' then FunA(pParameter)
  else if FuncName = 'FunB' then FunB(pParameter)
  else if FuncName = 'FunC' then FunC(pParameter);
  ...
end;

------解决方案--------------------
学习
------解决方案--------------------
学习一下～
------解决方案--------------------
http://blog.****.net/SmallHand/archive/2009/06/22/4290004.aspx