#13: 表示＂回车＂#10: 表示＂换行＂ ASCII码    Delphi字符     C程序      含义-------    ----------     -----     ------  10          #10          '\n'      换行  13          #13          '\r'      回车 Delphi里用#13#10表示换行符 ASCII#13=Chr(13) 这不是DELPHI规定的, 微软的Txt文件, 行结束就是 #13#1…

DELPHI中如何让FORM窗体透明,只显示控件?分享到: 对我有用[0] 丢个板砖[0] 引用 | 举报 | 管理 回复次数:7largewanglargewanglargewang等级:Blank#1 得分:5 回复于: 2002-12-17 13:58:37procedure TForm1.FormCreate(Sender: TObject);begin BorderStyle := bsNone; Brush.Style := bsClear;end; //保证你只看的到控件!!!关注…

delphi 中TStringList 通过function AddObject(const S: string; AObject: TObject): Integer; 方法添加了一个对象,请问我在调用Clear 方法的时候该对象有没有被释放   object里存的只是指向对象的指针,clear只是把指针清除了,对象并没有被释放.TObjectList可以自动释放对象,剩下的TList,StringList等List类型的都需要手动释放.…

用Delphi从数据库中取得资料,然后导出到Excel中做成报表是个不错的选择,因为Excel强大的报表功能那可是没话说前提Delphi中要 uses comobj;var Excel:Variant;一.Excel操作1.创建Excel对象Excel := CreateOleObject( Excel.Application );2.显示ExcelExcel.Visible:=true;3.更改标题Excel.Caption:=Excel的标题;4.退出ExcelExcel.Quit;二.工作…

TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的. 常规的用法大家都知道,现在来讨论它的一些高级的用法. 先把要讨论的几个属性列出来: 1.CommaText 2.Delimiter & DelimitedText 3.Names & Values & ValueFromIndex 先看第一个:CommaText.怎么用呢?用代码说话: const constr :String = 'aaa,bbb,ccc,ddd'; var strs :TStrings…

  其他(28)   //启动Word   try     wordapplication1.connect;   except     messagedlg('word may not be installed', mterror, [mbok], 0);     abort;   end; //打开文档 procedure TForm1.OpenWord(Sfile: string); var   FileName, ConfirmConversions, ReadOnly, AddToRe…

Delphi中一些常用的组合键值  CTRL+A: #1  CTRL+B: #2  CTRL+C: #3  CTRL+D: #4  CTRL+E: #5  CTRL+F: #6  CTRL+G: #7  CTRL+H: #8  CTRL+I: #9  CTRL+J: #10  CTRL+K: #11  CTRL+L: #12 CR: #13 //回车 M             ? CTRL+N: #14  CTRL+O: #15  CTRL+P: #16  CTRL+Q: #17  CTRL+…

随着软件技术的不断进步,软件界面也越来越美观,操作也越来越方便.综观市面上比较专业的各种软件,我们会发现大部分都提供窗体停靠的功能,特别象工具软件,基本上都或多或少有停靠功能.自然,Delphi也支持停靠,而且她和VCL紧密结合,对于广大的Delphi程序员来说更是一大福音.让我们省去枯燥的编码时间.把注意力集中在核心程序的构思上.先让我们来复习一下VCL的结构,在TWinControl类中有一个DockSite属性(boolean),它的作用是是否允许别的控件停靠在它的上面,在TControl…

上次写了如何在VC6.0下对Delphi写的COM进行调用,原本想马上写如何在Delphi中调用VC6.0开发的COM时,由于在写事例程序中碰到了个很怪的问题,在我机子上用VC写的接口程序编译能通过.但是调用就会出现问题,(在VC下调用也是一样的出现).但是用Delphi写的接口程序编译后,不管是在VC下还是在Delphi下调用都没有问题.后来我把VC开发的接口程序编译后,拷贝到其它机子上试,怪事,完全没有问题了.总结后才知道是我机子有点问题.我到现在还没有解决为什么在我的机子上不行,在其它机子…

Delphi中 Round函数有个Bug一旦参数是形如 XXX.5这样的数时如果 XXX 是奇数 那么就会 Round up如果 XXX 是偶数 那么就会 Round down例如 Round(17.5)=18但是 Round(12.5)=12下面的函数即可纠正这个 Bug 但是是临时性的执行 DoRound(12.5) 结果为 13 正确 function DoRound(Value: Extended): Int64; procedure Set8087CW(NewCW: Word); as…