摘要: //OpenDialog获取文件procedure TForm2.Button1Click(Sender: TObject);begin File_Path:=''; if OpenDialog1.Execute then File_Path:=OpenDialog1.FileName; if Le... 阅读全文
posted @ 2014-05-29 14:15 sidely 阅读(1165) 评论(0) 推荐(0) 编辑
摘要: x:=ExtractFileName(str);//取文件名+扩展名,不包含文件路径y:=ExtractFileExt(str);//取文件的扩展名 阅读全文
posted @ 2014-05-29 13:30 sidely 阅读(3962) 评论(0) 推荐(0) 编辑
摘要: 在开发应用程序时往往需要获取当前系统时间。尽管Y2K似乎已经平安过去,但在我们新开发的应用程序中还是要谨慎处理“时间”问题。 在《融会贯通--Delphi4.0实战技巧》(以下简称“该书”)第89页专门介绍了两种获取当前系统时间的方法,但这两种方法都存在不足或错误,以下就此进行讨论。 该书第一种... 阅读全文
posted @ 2014-05-29 13:28 sidely 阅读(8290) 评论(0) 推荐(0) 编辑
摘要: 第一种方法是设置窗体的BorderIcons/biMaximize属性为False,这种方法仅让窗体的最大化按钮灰掉;第二种方法是设置窗体的BorderStyle属性为bsDialog,这种方法使最大化,最小化按钮都不可见,并且不能调整窗体大小。 阅读全文
posted @ 2014-05-29 13:26 sidely 阅读(1056) 评论(0) 推荐(0) 编辑
摘要: caption:= ExtractFileExt(‘带路径,带扩展名的文件名’);//返回的就是扩展名caption:= ChangeFileExt(ExtractFileName(‘带路径,带扩展名的文件名’),'')//返回的就是不带路径,不带扩展名的文件名 阅读全文
posted @ 2014-05-29 12:35 sidely 阅读(147) 评论(0) 推荐(0) 编辑
摘要: Delphi 2010已于近日由Embarcadero公司发布。作者Kim Madsen作为一名资深的Delphi开发者,在他的博客中谈到了Delphi 2010的新性能、它的使用感受以及对Delphi语言未来的期望。博文如下:Delphi 2010使用的第一感觉是:是时候为它抛弃Delphi 7了... 阅读全文
posted @ 2014-05-29 10:37 sidely 阅读(1467) 评论(3) 推荐(0) 编辑