delphi做一个dll文件，既要被delphi调用，也要被c++调用如何实现？

Question

procedure showauthor;stdcall;
begin
  Form1:=TForm1.Create(Application);
  Form1.ShowModal;
end;function CheckRed_Green(i:Integer;ComNum:Integer):PChar;stdcall;
。function CheckRed_Green_C(i:Integer;ComNum:Integer):PChar;cdecl ;
{
  result:=CheckRed_Green(i:Integer;ComNum:Integer);
}exports
CheckRed_Green,
CheckRed_Green_c,
showAuthor；因为我没有C++的环境，不知道这样可以不？
1、如果delphi调用就调用CheckRed_Green，如果C++调用就调用CheckRed_Green_C
2、dll静态载入还要注意什么谢谢

Answer 1

用通用的数据类型例如Integer,PChar，注意调用规则

Answer 2

可以！。dll不是通用的吗? 

Answer 3

呵呵  谢谢已经解决
增加一个给C的函数
function CheckRed_Green_C(i:Integer;ComNum:Integer):PChar;cdecl;
begin
  result:= CheckRed_Green(i,ComNum);
end;