자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Delphi C# 소스 Delphi변환
2014.05.27 00:22
c# 에서 사용된 아래와 같은 소스를 델파이에서 구현 가능 할까요?
아래 소스는 mscorlib.dll 사용한 c# 소스 입니다.
delphi2009에서 mscorlib.dll 사용 할수 있나요 방법좀 알려 주세요
private int GetEncryptedData(byte[] arrOriginData, byte[] arrKey, ref byte[] arrEncryptedData)
{
int nRtn = CDefine.CReturn.NOTHING;
DESCryptoServiceProvider DesKey = new DESCryptoServiceProvider();
DesKey.Mode = CipherMode.ECB;
DesKey.Padding = PaddingMode.PKCS7;
DesKey.Key = arrKey;
using (MemoryStream stream = new MemoryStream())
{
using (CryptoStream cs = new CryptoStream(stream, DesKey.CreateEncryptor(), CryptoStreamMode.Write))
{
cs.Write(arrOriginData, 0, arrOriginData.Length);
cs.FlushFinalBlock();
arrEncryptedData = stream.ToArray();
nRtn = CDefine.CReturn.SUCCESS;
}
}
return nRtn;
}
댓글 0
Delphi C# 소스 Delphi변환
2014.05.27 00:22
c# 에서 사용된 아래와 같은 소스를 델파이에서 구현 가능 할까요?
아래 소스는 mscorlib.dll 사용한 c# 소스 입니다.
delphi2009에서 mscorlib.dll 사용 할수 있나요 방법좀 알려 주세요
private int GetEncryptedData(byte[] arrOriginData, byte[] arrKey, ref byte[] arrEncryptedData)
{
int nRtn = CDefine.CReturn.NOTHING;
DESCryptoServiceProvider DesKey = new DESCryptoServiceProvider();
DesKey.Mode = CipherMode.ECB;
DesKey.Padding = PaddingMode.PKCS7;
DesKey.Key = arrKey;
using (MemoryStream stream = new MemoryStream())
{
using (CryptoStream cs = new CryptoStream(stream, DesKey.CreateEncryptor(), CryptoStreamMode.Write))
{
cs.Write(arrOriginData, 0, arrOriginData.Length);
cs.FlushFinalBlock();
arrEncryptedData = stream.ToArray();
nRtn = CDefine.CReturn.SUCCESS;
}
}
return nRtn;
}
