sq1228的专栏

***后续****：后面的部分是从网络上摘抄的，向原作者致敬！！！请大家支持我的劳动成果，帮我多点击个人网站，谢谢！==========http://hanzaihua.kuosan.com ==============我的主页============本文可能有些内容有重复，见谅！=====================2006年5月 汗栽花------------...

16、SaveDialog1确认文件存不存在的办法？答：procedure TForm1.SaveDialog1CanClose(Sender: TObject; var CanClose: Boolean); begin if FileExists(SaveDialog1.FileName) then //如果文件已经存在 if MessageDlg('文件已经存在，保存吗？', m...

 新一篇: delphi动态创建的TMSComm串口控件不起作用！ <script></script>procedure TExprmResultDlg.PreviewExprmReport;var    Template, NewTemplate,DocumentType,OleVisible:oleVariant;    strTitle_Prior,strT...

用Delphi改变图片的像素,即大小．需代码！急用，谢谢！我给你讲一种非常简单的方法：第一步：在窗体上放上image1和image2两个图片控件。再放一个Button按钮控件。第二步：在image1的Picture属性中载入一张JPG或者BMP图片。而image2不要管它。第三步：双击Button进行按扭编写环境。写入下面代码：Image2.Height := 200;//新图像高度Image2...