我要疯调了,求救求教求救求教,气死我了,第一贴子不能用,我再贴(300分)

  • 主题发起人 主题发起人 lsys
  • 开始时间 开始时间
L

lsys

Unregistered / Unconfirmed
GUEST, unregistred user!
我花了300贴了个贴子居然不能看[:(!][:(!][:(!][:(!][:(!]
我重贴//
我在做指纹采集activex控件,给asp调用,
指纹采集的函数有指纹采集仪器的厂商提供
//////////
FingerProcess
处理指纹图象,产生特征数据
函数原形:
long FingerProcess(unsigned char *Bmp, unsigned char *TemplateData);
输入参数:
Bmp无符号字符数组 存放指纹图象
大小: Width*Height字节(存放一幅W* H点阵256级灰度指纹图象)
输出参数:
TemplateData 无符号字符数组 存放指纹特征数据
大小:TemplateSize字节
///////////
asp不能接受pchar类型
我要将pchar转换成widestring
如何的将pchar转换成widestring
又将widestring转换回pchar
我先用ansistring调试
var
dd:ansistring;
aa:pchar;
begin
dd:=TemplateData;
aa:=pchar(dd);
---aa<>TemplateData,但是有时又相等,
dd:=strpas(TemplateData);
aa:=pchar(dd);
---aa<>TemplateData,但是有时又相等,
dd:=ansistring(TemplateData);
aa:=pchar(dd);
---aa<>TemplateData,但是有时又相等,

end;
为什么会这样!!![:(!][:(!][:(!]
 
直接强制转化不可以吗
widestring(pchar)
pchar(wisdestring)
 
直接用widestring(pchar)
pchar(wisdestring)从来就没有成功过

TemplateData的缓存大小为400
当TemplateData值大小为400时会成功
当TemplateData值大小小于400时就失败

 
要不先把widestring 转化为string
string:=widestring;
然后再转化
var
ws:widestring;
s:string;
p:pchar;
begin
s:='iam aman &amp;Icirc;&amp;Ograve;&amp;Ecirc;&amp;Ccedil;&amp;Ograve;&amp;raquo;&amp;cedil;&amp;ouml;&amp;ordm;&amp;Atilde;&amp;Egrave;&amp;Euml;';
p:=pchar(s);
ws:=string(p);
showmessage(ws);
 
Study... ...To Lsys,Get me fen(ljg);
 
我有一个很恶心的法子,您肯定不屑一顾
 
TNND真变态,指纹采集仪器厂商提供的函数一定要补足400位
这TNND真变态
For i:=0 to 400-1 do
begin
dd:=dd+TemplateData;
end;
aa:=pchar(dd);
to sun 你的阳光都照耀到2003年了,


 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
687
import
I
后退
顶部