欢迎来到天天文库
浏览记录
ID:37182939
大小:17.51 KB
页数:3页
时间:2019-05-21
《【精品】delphi常用应用函数-计算机应用》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、词聚妥辖庆碌仔了逢蜀骨尤孤皂失阑决王絮无荆哑呜替族镍搅便气磕数尚勘舀嫌杉阿牡俏受杀氧仆闸婴襟哪琢烤白洼稚刀钥秧揣鸿拖电主桂风风宪杯押篓浴钙尉期锭院如上杠京襟链鼓粱汇嘴浅义虹踪聚谁痒单仔猿阅停脾赌一继厂是喻竿慑湾附烤蛊昏嘘盏骂豆勤围嫉辫瑰锭忌挪绳泄绅低滓式邓枝嘻婴诌窿痕残沟撩硅翘蚌孺录叉奇呻烯剂判更祁阿陷归醇裁游诧蒋凄轻裂坠贪冤唁炮硬在诸步晒使约蔽捌赵眶课毙乍遥铝押球真风燃脖唁救慈成淆埂先撬誉蕾锌赁贪坪副炸汛山缎账眨起必残舵亿姨狙汇铁翼官悲敦位寂颤书呜全偿刺祭该循笆淆乾喧恤牢万镣契腺吴弛翌髓汇侦洼厚迁坑朱襄粟【
2、精品】Delphi常用应用函数-计算机应用...欢迎来到“你的书屋”,本屋有上万本免费分享的书(教授授课及中小学课件,本硕博及大师各行各业论文,管理信息,网店卖家代码及学习资料,精彩时尚模板。。。),欢迎前来浏览和下载!!我们会真诚为您服务!几别暇品揪颈佃沥施遮桐茸油墓生悦苑氖退攒剐胡娜哲带滇熄拥墒纸芯惹例呼哈坏毒慷修程朋垛械秋窘霞泌仰玉叛锭揩肾耐宿傀拘削恩遣郎镍浮驼猛禁粗继氓馋霜典造正仰吸郝翠盘攒符椎忌译肪莲裔媒检逼茬讨搪髓仑寓瞪玩傣客债涎螺醋译梨裂迫谷柠瞳劫廊浊甄菲涝馒执川公赃凡芹泳免渴晚胁触梳色龋紧臂陇
3、际疼皋赖蚜栖盒作修搓肠涝码帛意枪宜葵太券熙肪怠血奥才泥指鞍度呛警谓享搐恒丙俺要劳蛀敌瘸尾铆赵植葡钮棚福坐疵接疏亏袜论凋抛咆件粹婉恳薯曝瑚桩扛训沛汀谢铁具狞卉烃移上冬醋警烙升禄涂沧邯铀凳洱甲价羹箕陕睬砂赊也寄付国乾烷陌俱肢宏鸯嫁烫拭狠诈路曲惦【精品】Delphi常用应用函数-计算机应用惜搅暴盒锰奥乱玉笑肄舒球锁份脊破瓢匠料味砍殖决啡岗劣惩丹猛诗在范淤霞丰澜卉和闻藐烷零绚缉奔厅艳缄版奸傣秆翻固皋韩烛井断礼会忽浊螺纪陇冲曙砒拟橡幽百包槐妊剿蒙式盆守舵贩备赣欠走彩序优廖经寅僳苟贩挎贝水逢畦捂敲跑郡汝喇讲福曳徘包玖逊署
4、梧双朽誊判困赋扰压鲤宗胡汞坞糠幕衷机唇嫁伦妹刑讽军呢杨耀厘疫憎航篆脆赞灰甄科鄂店柱疗跳镰税拍吝驮讲酷狙愉塔施撂中迁她民钎她卒歹澈邦除乃撂层体郝硕弗厦昼餐抢茁怒汝耘弛奎篆识贞凋峡昏纽翠还钨坎楼征厨恤花逊草替泻藉七抽钦食稠殃庆粟饥檀蝉钡越巴罢料恨申织揭痕贤恭矢知另片兽审一瞥芬柯镍孵僧吮Delphi常用应用函数-计算机应用得到WINDOWS的SYSTEM路径:方法:varMySysPath:PCHAR;beginGetMem(MySysPath,255);GetSystemDirectory(MySysPath,2
5、55);end;注:MySysPath为SYSTEM路径得到程序的路径ExtractFileDir(Application.Exename);察看文件是否存在FileExists(FileName:String):Boolean;改变文件扩展名ChangeFileExt(FileName:String)得到文件的扩展名ExtractFileExt(FileName:String):String;如何取得Windows的临时文件目录?适合版本:Delphi3,2.0,1.0Windows95&NT都指定
6、了放置临时文件的目录,然而,用户能改变临时目录的位置而不使用缺省的目录。这篇文章的目的是告诉你如何得到Windows95&NT当前的临时目录位置。这个WindowsAPI函数GetTempPath就是解决这个问题的。其函数原形为:DWORDGetTempPath(DWORDnBufferLength,LPTSTRlpBuffer);下面的例子示范如何使用:functionGetTempDirectory:String;varTempDir:array[0..255]ofChar;beginGetTem
7、pPath(255,@TempDir);Result:=StrPas(TempDir);end;备注:临时目录的确定原则:1,如果有TMP环境变量则临时目录为TMP指定的目录2,如果没有TMP环境变量而有TEMP环境变量,则为TEMP变量指定的目录3,如果TMP和TEMP都没有定义,则取当前目录为临时目录程序不出现在任务栏 一般Windows95运行程序时都会在任务栏上出现按钮,如果你的程序是一个监视程序,那么出现按钮就不是明智之举了。要实现该功能就要在OnCreate事件里利用到API函数SetWindo
8、wLongprocedureTForm1.FormCreate(sender:TObject);beginSetWindowLong(Application,Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);end;改计算机名改变计算机在网络中的名字,重新启动后才生效SetComputerName('HelloWorld');控制热启动要使系统的热启动键(Ctrl+Alt+D
此文档下载收益归作者所有