pchar是什么意思? (50分)

  • 主题发起人 主题发起人 tswhoney
  • 开始时间 开始时间
T

tswhoney

Unregistered / Unconfirmed
GUEST, unregistred user!
请详细解释。
为何语句
procedure TForm1.Button1Click(Sender: TObject);
var
hDstWin:hwnd;
begin
hDstWin:=FindWindow('explorewclass',nil);
SetWindowPos(hDstWin,HWND_TOP,
100, // horizontal position
100, // vertical position
600, // width
600, // height
SWP_SHOWWINDOW // window-positioning options
);
end;
运行后没有任何显示?
 
上面的程序是对windows中的“资源管理器”窗口进行设置!
请先打开:开始--》程序--》找到“Windows 资源管理器”然后打开它!!
再运行你的程序,就OK了!
你看看!!!!!!!!


 
procedure TForm1.Button1Click(Sender: TObject);
var
hDstWin:hwnd;
begin
hDstWin:=FindWindow('explorewclass',nil);
if hDstWin=0 then showmessage('No Such window');
...
end;
 
procedure TForm1.Button1Click(Sender: TObject);
var
hDstWin:hwnd;
begin
hDstWin:=FindWindow('explorewclass',nil);
if hDstWin<>0 then //看一下你的hDstWin是不是等于0
SetWindowPos(hDstWin,HWND_TOP,
100, // horizontal position
100, // vertical position
600, // width
600, // height
SWP_SHOWWINDOW // window-positioning options
);
end;
 
to 春意:我打开了资源管理器可还是不行;
to lb_icesea79:我的 hDstWin等于0。怎末办?
pchar是什么意思?
 
你要显示资源管理器,假如你现在的资源管理器标题是"我的文档“,打开资源管理器,不要最小化
然后运行你的程序,就没有问题了。
procedure TForm1.Button1Click(Sender: TObject);
var
hDstWin:hwnd;
begin
hDstWin:=FindWindow('ExploreWClass','我的文档');
SetWindowPos(hDstWin,HWND_TOP,
100, // horizontal position
100, // vertical position
600, // width
600, // height
SWP_SHOWWINDOW // window-positioning options
);
end;
 
to 飘摇客:现在到是出来了,可这就起不到调用的作用,能否改成直接调用,而不用先打开资源管理器?
 
哪需要首先打开资源管理器的。可以使用ShellExecute等API函数的。
 
那pchar是什么意思?
 
A PChar is a pointer to a null-terminated string of 8-bit characters.
 
to wangzhekin:能用中文描述一下吗?
 
PChar 就是指向一个以 #0 结尾的每个字符为一个字节的字符串的指针。
^^^^^^^^^^^^^^^^^^/
和 PWideChar 相区别。
 
可以看成是一个字符串
 
多人接受答案了。
 
后退
顶部