请C＋＋与Delphi兼修的人帮我解决个小问题！谢谢 ( 积分: 50 )

帮我将这个转换为Delphi好吗？本人C++超级菜。
typedef void __stdcall (*fun_AddResult)(char pDataStr[10][255],
do
uble pDataDouble[100]);
extern "C"
void __declspec(dllimport) __stdcall FanSelect(
void *pSeriesNames,//系列名称 * (typedef struct{char Data[255];}
fun_AddResult pAddResult//函数指针,用于回传数据
);

type
TCharArray=array [0..9] of array [0..254] of Char;
PCharArray=^TCharArray;
TDoubleArray=array [0..99] ofdo
uble;
PDoubleArray=^TDoubleArray;
fun_AddResult=procedure(pDataStrCharArray;pDataDoubleDoubleArray);stdcall;
procedure FanSelect(pSeriesNamesointer;pAddResult:fun_AddResult);cdecl;

接受答案了