面试的问题,高手指导一下.

[chenmt_zw]

如何在文件属性框中增加一页自定义的面板，并在该面板上放一页图片？？

[chenmt_zw]

TO:starluck
右击电脑上任何一个文件,选择"属性",就会弹出该文件属性对话框,要求在这个对话框当中,增加一个自定义的面板(即再增加一个页面框)

[AsheBin]

没遇到过这种问题哦。
面试怎么出这么奇怪的问题呢？

[ks_reny]

[Quote=引用 4 楼 chenmt_zw 的回复:]
TO:starluck
右击电脑上任何一个文件,选择"属性",就会弹出该文件属性对话框,要求在这个对话框当中,增加一个自定义的面板(即再增加一个页面框)
[/Quote]
看来要修改注册表。

[chenmt_zw]

对方要求用编程实现.那家公司开发是偏向于底层开发,所以才出这种题目考我.真晕.看来没戏了.

[delphi_911]

[Quote=引用楼主 chenmt_zw 的帖子:]
如何在文件属性框中增加一页自定义的面板，并在该面板上放一页图片？？
右击电脑上任何一个文件,选择"属性",就会弹出该文件属性对话框,要求在这个对话框当中,增加一个自定义的面板(即再增加一个页面框)
[/Quote]

这得对windows有关的东西深入了解才行。

[kill211]

使用笨方法成功了
procedure TForm1.Button1Click(Sender: TObject);
begin
Windows.SetParent(FindWindowEx(FindWindow('#32770','新建文本文档.txt 属性'),0,'SysTabControl32',''),Form1.Handle);
if form1.Controls[0] is TTabControl then
begin
(form1.Controls[0] as TTabControl).Tabs.Add('自定义页面');
Windows.SetParent((form1.Controls[0] as TTabControl).Handle,FindWindowEx(FindWindow('#32770','新建文本文档.txt 属性'),0,'SysTabControl32',nil))
end;
end;

[kill211]

procedure TForm1.Button1Click(Sender: TObject); //修改一下上面的
begin
Windows.SetParent(FindWindowEx(FindWindow('#32770','新建文本文档.txt 属性'),0,'SysTabControl32',''),Form1.Handle); //拿过来
if form1.Controls[0] is TTabControl then //判断控件属性是否TTabControl
begin
(form1.Controls[0] as TTabControl).Tabs.Add('自定义页面'); //新增自定义页面
Windows.SetParent((form1.Controls[0] as TTabControl).Handle,FindWindow('#32770','新建文本文档.txt 属性')) //放回去
end;
end;

谁有聪明的方法?

[zerostudy]

关注中。我也想知道。

[7年]

关注下。

[taste品味]

严重关注

[nbzip]

好像是WINAPI中的文件创建函数,好像有一个扩展文件属性.

[yct0605]

关注了

[DreamMan81]

关注中

[chenmt_zw]

[Quote=引用 13 楼 kill211 的回复:]
使用笨方法成功了
procedure TForm1.Button1Click(Sender: TObject);
begin
Windows.SetParent(FindWindowEx(FindWindow('#32770','新建文本文档.txt 属性'),0,'SysTabControl32',''),Form1.Handle);
if  form1.Controls[0]  is  TTabControl  then
begin
(form1.Controls[0]  as  TTabControl).Tabs.Add('自定义页面');
Windows.SetParent((form1.Controls[0]  as  TTabControl).Handle,FindWindowEx(Fin…
[/Quote]
这样达不到他们要求，要在系统的文件属性框中添加一个页面框。

[chenmt_zw]

感谢大家的热情帮忙，想不到还有跟我一样还用DELPHI的兄弟

[zuoyi2009]

关注中...

[W9757]

LZ有福了.

[t8543]

路過,看看,關注

[xiaowei_001]

关注

[zwjchina]

这个公司不去也罢。