function GetSM2SignStr(SM4Encrp: string): string;
var
  SM2SM4Class:Variant;   {变体类型}
begin
  {
    sSM2Key: SM2私钥
    sSM4Key: SM4私钥
  }
  Result := '';
  try
    if (sSM2Key='') or (sSM4Key='') then Exit;
    SM2SM4Class := CreateOleObject('JQSM2SM4.SM2SM4Util'); {需要 use ComObj}
    Result := SM2SM4Class.GetSM2SM4('SM2Sign',
                        sSM2Key,sSM4Key,SM4Encrp);
  except on E:Exception do
    Showmessage(E.Message);
  end;
end;

下载地址：

国密SM4加解密SM2签名验签fordelphi等语言.rar_delphism加密-Delphi文档类资源-CSDN下载基于C#编写的COM组件DLL，可实现SM2签名验签，SM4加解密，100%适用于黑龙江省国家医保接delphism加密更多下载资源、学习资料请访问CSDN下载频道.https://download.csdn.net/download/wdsfeisng/29514283

技术交流微信feisng