两个小问题,可能也有点难,大家进来讨论讨论?(不难也就不给200分咯) (200分)

  • 主题发起人 主题发起人 cornermoss
  • 开始时间 开始时间
C

cornermoss

Unregistered / Unconfirmed
GUEST, unregistred user!
[:D]第一个:我用TListView取得文件名时的问题,怎么取得包括扩展名的文件名呢??
不知各位遇到这个问题没有,如果系统是“隐藏已知类型文件的扩展名”时,用TListView
取得的文件名就可能不包含扩展名,现在要让它显示出完整的文件名,该怎么做呢??
谢谢各位呀~~~~我是想要双击TListView时,如果Item是可以打开运行的,则运行。
现在问题就是,如果没取到扩展名,它就不会运行~~~~

[:D]第二个:我的程序运行后是占满了整个屏幕,屏蔽了系统键,隐藏了任务栏。
现在要做的是:如果我调用了其他外部程序,怎样让这个程序的Title在我的按纽上显示出
来?并且,我点击了显示这个程序Title的按纽,可以把这个程序提到前面,和实际点击任
务栏是一样的。(需要切换的程序只是由我的程序启动的外部程序)
我以前也照着做过过遍历进程并杀死进程的程序,但是得到的都是进程ID号,不是在任务
栏上显示的Title(我的程序是在Win98运行的)。
因为我的程序比较花哨~~用Win98的任务栏不好看~~所以公司要求自己做个类似任
务栏的东东~~~~

大家讨论讨论吧~~~~谢谢先~~~~
两个问题在csdn的地址分别是:
http://www.csdn.net/Expert/TopicView1.asp?id=854437[?]
http://www.csdn.net/Expert/TopicView1.asp?id=857534[?]
 
第一个问题
http://www.delphibbs.com/delphibbs/dispq.asp?LID=1110450
第二个问题
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1035657
 
第一个问题:
shelllistview1.SelectedFolder.PathName
第二个问题:
用findwindow可以实现你的要求。
 
谢谢bubble:对于第二个问题,已经基本解决~~只是在系统托盘的无法正常取出
如果你有去csdn的话,请去http://www.csdn.net/Expert/TopicView1.asp?id=857534收分
但是第一个问题,仍然没有办法呀~~那个HD-Copy的帖子看得我头大了~~
另外,to YoungSun:listview1有 SelectedFolder.PathName这个属性吗?
 
对第二个问题,现在有个问题是:
procedure TTabShell.AppName_BtnClickHandle(Sender:TObject);
var wnd:HWND;
begin
with Sender as TspSkinButton do
begin
wnd:=Windows.FindWindow(nil,PChar(Hint));//PChar(Hint)是每个窗体的caption
ShowWindow(wnd,SW_RESTORE);
end;
end;

这样的话,有些窗体不能被Restore,比如Delphi6,浏览器;而记事本、文件夹则可以;
是不是应该取得进程标识号来Restore呢?那样又用什么函数呢?谢谢指点~~~~^_*
 
第1问
可以放在SUBITEMS里吧!
 
to popzhu对第一问:
我用的ShellExecute(Handle,'open',PChar(cbPath.Text+'/'+ListViewall.Items[ListViewall.ItemIndex].Caption),'',nil,SW_SHOWNORMAL);
用ListViewall.Items[ListViewall.ItemIndex].SUBITEMS[0]得到是文件大小呀~~
 
太无聊了~~~~~这也算是答案吧:(((
 
后退
顶部