主页
Top.Mail.Ru Yandeks.Metrika
论坛:“主要”;
当前存档:2002.01.08;
下载:[xml.tar.bz2];

向下

如何阅读命令行选项 找到类似的分支


ProfiUgl   (2001-12-19 15:24) [0]

доброго дня суток МАСТЕРА!
Может быть кто-нубудь подскажет как считать параметры прокраммы в командной строке. Например я запускаю свое приложение: MyProg.exe -k, требуется в выкусить -k



Юрий Федоров   (2001-12-19 15:25) [1]

ParamStr, ParamCount



ProfiUgl   (2001-12-19 15:40) [2]

Спасибо понял!



oomneeq   (2001-12-19 15:45) [3]

А вот эта круче всех! :)

FindCmdLineSwitch

单元
SysUtils单元


type TSysCharSet = set of Char;

function FindCmdLineSwitch(const Switch: string; SwitchChars: TSysCharSet; IgnoreCase: Boolean): Boolean;

描述


Returns True if a specified string was passed as a command line argument.
TSysCharSet is a set containing special characters (e.g., "-" and "/" are common) that can be used to parse a string. The IgnoreCase parameter controls whether a case-sensitive or case-insensitive search is performed.

例子


var s : string;
sc: TSysCharSet;

s:="help";
sc:=["/","-","|"];

// executed as: AppName.exe /help

if FindCmdLineSwitch(s,sc,False) then
ShowMessage("Application called with
HELP parameter!");


来源:
http://delphi.about.com/library/rtl/blrtlFindCmdLineSwitch.htm



Страницы: 1 整个分支

论坛:“主要”;
当前存档:2002.01.08;
下载:[xml.tar.bz2];

楼上









内存:0.81 MB
时间:0.024 c
1-22013
好奇
2001-12-17 12:53
2002.01.08
从当前程序运行exe。


3-21936
KS
2001-12-05 06:42
2002.01.08
Delphi5 + SQL Server7很好,Delphi5 + SQL 2000是废话


3-21995
德米特里D.
2001-12-07 08:00
2002.01.08
错误BDE退出......我不明白可能是什么问题


1-22252
tovSuhov
2001-12-17 14:22
2002.01.08
C TreeView заминочка...


3-21977
Amelin Vadim
2001-12-03 20:42
2002.01.08
在InterBase中创建数据库





南非荷兰语 阿尔巴尼亚人 阿拉伯语 亚美尼亚 阿塞拜疆 巴斯克 白俄罗斯 保加利亚语 加泰罗尼亚 简体中文 中国(繁体) 克罗地亚 捷克 丹麦语 荷兰人 英语 爱沙尼亚语 菲律宾人 芬兰 法文
加利亚西语 格鲁吉亚语 德语 希腊语 海地克里奥尔语 希伯来语 印地语 匈牙利 北日耳曼语 印度尼西亚人 爱尔兰语 意大利语 日语 韩语 拉脱维亚 立陶宛 马其顿 马来语 马耳他语 挪威语
波斯语 波兰语 葡萄牙语 罗马尼亚 俄语 塞尔维亚 斯洛伐克 斯洛文尼亚 西班牙语 斯瓦希里 瑞典语 泰国人 土耳其 乌克兰 乌尔都语 越南人 威尔士语 意第绪语 孟加拉 波斯尼亚
宿务 世界语 古吉拉特语 豪萨语 苗族 伊博 爪哇 卡纳达语 高棉 老挝 拉丁语 毛利 马拉 蒙古人 尼泊尔 旁遮普 索马里 泰米尔人 泰卢固语 约鲁巴语
祖鲁
英文 Французский Немецкий Итальянский Португальский 俄文 Испанский