X xmmpgg Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-13 #1 还是PBYTE转换成string,<br><br>pbData:PBYTE;<br>它指向的值应该是:373F 4E2E C732 7508 934E CC19 C07B FB4F,<br>我如何用string格式的把它显示出来那????<br>急急急。。。。
还是PBYTE转换成string,<br><br>pbData:PBYTE;<br>它指向的值应该是:373F 4E2E C732 7508 934E CC19 C07B FB4F,<br>我如何用string格式的把它显示出来那????<br>急急急。。。。
J jsxjd Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-13 #3 procedure TForm1.Button1Click(Sender: TObject);<br>var<br> pByte;<br> s:string;<br>begin<br> p:=pbyte(pchar('ddddd'));<br> s:=pchar(p);<br> showmessage(s);<br>end;<br>
procedure TForm1.Button1Click(Sender: TObject);<br>var<br> pByte;<br> s:string;<br>begin<br> p:=pbyte(pchar('ddddd'));<br> s:=pchar(p);<br> showmessage(s);<br>end;<br>
X xmmpgg Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-13 #4 不好意思,我说得不太清楚,是这样的,我要从证书里读出序列号,<br> pnewCertContextCCERT_CONTEXT;<br> pNewCertContext := CertCreateCertificateContext(MY_ENCODING_TYPE,<br> pCertCon.pbCertEncoded,pCertCon.cbCertEncoded);<br> cbData := pNewCertContext.pCertInfo.SerialNumber.cbData;<br> pbData := allocmem(cbData);<br> pbData := pNewCertContext.pCertInfo.SerialNumber.pbData;<br>上面列出的值是应该得到的,可是在这个里面不知道怎样得出。<br>
不好意思,我说得不太清楚,是这样的,我要从证书里读出序列号,<br> pnewCertContextCCERT_CONTEXT;<br> pNewCertContext := CertCreateCertificateContext(MY_ENCODING_TYPE,<br> pCertCon.pbCertEncoded,pCertCon.cbCertEncoded);<br> cbData := pNewCertContext.pCertInfo.SerialNumber.cbData;<br> pbData := allocmem(cbData);<br> pbData := pNewCertContext.pCertInfo.SerialNumber.pbData;<br>上面列出的值是应该得到的,可是在这个里面不知道怎样得出。<br>
X xmmpgg Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-16 #5 呵呵,我自己已经实现了,anyway,<br><br>还是谢谢你们两个,把分给你们了。。。