各位老大,谁肯指教一下呢!如果点鼠标同时选中多个文件时,该用什么函数把全部文件调入程序呢?
2008-11-27 21:07
429 查看
各位老大,谁肯指教一下呢!如果点鼠标同时选中多个文件时,该用什么函数把全部文件调入程序呢? Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061127214337160.html
在点击鼠标右键的时候,调出程序的同时也就把这些文件调入程序。在没点击鼠标右键时,程序是没有打开的。怎么样才能判断鼠标选中了几个文件,而文件名又分别是什么呢?
for i:=1 to ParamCount do
if FileExists(ParamStr(i)) then CheckOpenFile(ParamStr(i));
通过ParamCount可以得到参数的数目,使用方法如下所示:
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
for i:=1 to ParamCount do
begin
Caption := Caption + '-' + ParamStr(i);
end;
end;
函数function ParamCount: Integer;可让你知道选择了多少个文件(ParamCount-1个文件)同时函数function ParamStr(Index: Integer): string;可以让你得到选择文件的
文件名 ParamStr(0)返回你的可执行文件名(即Application.ExeName,ParamStr(1)返回
选择的第一个文件,依次类推。
其实很多东西是操作系统完成的。比如说,你选择了很多文件,并点击右键菜单,操作系统则负责打开你的关联程序,并把所选择的文件作为参数传给你,你就可是通过上述的两个函数来处理。
老大们,你们的方法我都试过了, ParamStr只能得到几个文件中的一个文件的路径名字,其他的都得不到。到底怎样才能得到这几个文件得路径和名字?
http://www.delphi2007.net/DelphiAPI/html/delphi_20061127214337160.html
在点击鼠标右键的时候,调出程序的同时也就把这些文件调入程序。在没点击鼠标右键时,程序是没有打开的。怎么样才能判断鼠标选中了几个文件,而文件名又分别是什么呢?
for i:=1 to ParamCount do
if FileExists(ParamStr(i)) then CheckOpenFile(ParamStr(i));
通过ParamCount可以得到参数的数目,使用方法如下所示:
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
for i:=1 to ParamCount do
begin
Caption := Caption + '-' + ParamStr(i);
end;
end;
函数function ParamCount: Integer;可让你知道选择了多少个文件(ParamCount-1个文件)同时函数function ParamStr(Index: Integer): string;可以让你得到选择文件的
文件名 ParamStr(0)返回你的可执行文件名(即Application.ExeName,ParamStr(1)返回
选择的第一个文件,依次类推。
其实很多东西是操作系统完成的。比如说,你选择了很多文件,并点击右键菜单,操作系统则负责打开你的关联程序,并把所选择的文件作为参数传给你,你就可是通过上述的两个函数来处理。
老大们,你们的方法我都试过了, ParamStr只能得到几个文件中的一个文件的路径名字,其他的都得不到。到底怎样才能得到这几个文件得路径和名字?
相关文章推荐
- 解决:无法将“Add-Migration”项识别为 cmdlet、函数、脚本文件或可运行程序的名称。请检查名称的拼写,如果包括路径,请确保路径正确,然后再试一次
- 通过文件锁实现,程序开始运行时,先判断文件是否存在,若存在则表明该程序已经在运行了,如果不存在就用open函数创建该文件,程序退出时关闭文件并删除文件
- 解决:无法将“Add-Migration”项识别为 cmdlet、函数、脚本文件或可运行程序的名称。请检查名称的拼写,如果包括路径,请确保路径正确,然后再试一次
- 如果一个程序同时链接了MSVCRT.lib和libcmt.lib回出现函数重定义错误
- 【转】通过文件锁实现,程序开始运行时,先判断文件是否存在,若存在则表明该程序已经在运行了,如果不存在就用open函数创建该文件,程序退出时关闭文件并删除文件
- Mouse without Borders是微软的一个软件实验项目,这款软件可让鼠标自由在局域网中的多台电脑间移动,键盘输入实现无缝切换,还可以直接用鼠标相互拖拽文件。 如果经常需要同时使用两台以
- Android Studio中,如果一个.java文件中有很多函数,那么如果想要修改某一个函数,找起来相当麻烦,有没有什么好办法?
- 解决:无法将“Add-Migration”项识别为 cmdlet、函数、脚本文件或可运行程序的名称。请检查名称的拼写,如果包括路径,请确保路径正确,然后再试一次 1、输入的中划线“-”格式不对,检查是
- 项识别为 cmdlet、函数、脚本文件或可运行程序的名称。请检查名称的拼写,如果包括路径,请确保路径正确,然后再试一次
- net控件中数据导到Excel的格式 首先,我们了解一下excel从web页面上导出的原理。当我们把这些数据发送到客户端时,我们想让客户端程序(浏览器)以excel的格式读取它,所以把mime类型设为:application/vnd.ms-excel,当excel读取文件时会以每个cell的格式呈现数据,如果cell没有规定的格式,则excel会以默认的格式去呈现该cell的数据。这样就给我们提供了自定义数据格式的空间,当然我们必须使用excel支持的格式。下面就列出常用的一些格式: 1) 文本
- 通过文件锁实现,程序开始运行时,先判断文件是否存在,若存在则表明该程序已经在运行了,如果不存在就用open函数创建该文件,程序退出时关闭文件并删除文件。
- 在体量文件中加载族,然后想放置构件。放置构件用什么函数?
- C# 1.Winform 同时修改多个config文件2.实时监测某程序运行状态(多线程),未启动时,自启。
- 在埋头写程序学技术的同时,有没有想到你们的老板和上司在搞什么?
- stdafx.h、stdafx.cpp是干什么用的?为什么我的每一个cpp文件都必须包含stdafx.h? Windows和MFC的include文件都非常大,即使有一个快速的处理程序,编
- HTML 文档的字符编码未声明。如果该文件包含 US-ASCII 范围之外的字符。。。/escape函数被废弃
- 【Linux程序设计】之Linux库函数的使用,多文件程序开发,静态与共享函数
- 由于扩展配置问题而无法提供您请求的页面。如果该页面是脚本,请添加处理程序。如果应下载文件,请添加 MIME 映射。
- svc 报“由于扩展配置问题而无法提供您请求的页面。如果该页面是脚本,请添加处理程序。如果应下载文件,请添加 MIME 映射。“的HTTP 错误 404.3 – Not Found
- 微信小程序引用同一js文件中的方法函数(function)