关于NETSHAREADD的shi_502_path的取得问题(100分)

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

lijun_lee

Unregistered / Unconfirmed
GUEST, unregistred user!
请救命
小弟用netshareadd 函数共享一个文件夹,路径用dir:=ExtractFilePath(Application.ExeName)+'xxx';
取得,但由于shi_502_path是pwidechar的,所以用stringtowidechar转换。
wdir:=stringtowidechar(dir,@wdir,2*length(dir));
但是不能成功,每次都跳出CPU DEBUG WINDOW。用add watch 追wdir,发现在shi_netname开始
赋值的时候wdir的硬盘符号变成乱码,最后出错。请问是不是要为wdir开辟内存空间,如果是的话
怎么开辟????????
请大虾帮忙!!!!
 
可不可以具体些啊??
 
真的没有高手知道怎么做吗?
 
STRINGTOWIDECHAR 用法有问题

procedure TForm1.Button1Click(Sender: TObject);
var
Buffer: array[0..255] of WideChar;
P:PWIDECHAR;
S:STRING;
begin
S:='aaaa';
p:=STRINGTOWIDECHAR(S, Buffer, SizeOf(Buffer) div 2);
S:=WIDECHARTOSTRING(P);
end;
 
接受答案了.
 
后退
顶部