delphi技巧记录
#13回车换行
将form2内容加入到form1列表框:在form2里:form1.listbox1.items.add(edit1.text)
listbox1.items.loadfromfile('chinese.txt')将chinese.txt文件内容载入列表框中。但前提是要整个窗体创建时候加载导入,双击整个窗体procedure TForm1.FormCreate(Sender: TObject)
listbox1.items.savetofile('chinese.txt')将列表框的列表内容保存到当前目录下的chinese.txt文件中。
listbox1.deleteselected删除列表框所选的一项combobox1.deleteselected删除下拉列表框所选的一项
form1.show与form1.showmodal的区别: show,表单1打开表单2的同时,仍能切换到表单1操作。而showmodal,开了表单2,关闭了才能切换返回表单1。
功能函数:showmessage('内容'); 表单form.close; 表单form.show;
编写菜单时:ctrl+→(右方向键):嵌套子菜单项。
messagebox(handle,'文字','标题',MB_ok);
除了MB_ok:对话框的确定,还有MB_ICONINFORMATION:蓝色惊叹号。MB_ICONWARNING:黄色惊叹号。MB_ICONQUESTION:无声音蓝色问号。MB_ICONHAND:红色警告交叉号。
------------------------------
Rgn:region缩写[ri:dʒən]地区,地带,区域,领域,范围【仅为英文翻译,例CreateEllipticRgn翻译为创建了一个椭圆形区域】
相关文档:
delphi 编写的com 对象 用delphi 的调用实例
COM 对象与 前一篇文章的 PHP调用的COM为同一个对象,故不例出COM.
procedure TForm1.Button4Click(Sender: TObject);
var
myCounter, mReturn: variant;
begin
myCounter := CreateOleObject('abc.myxml');
mReturn := myCounter.xml;
&nbs ......
delphi 注册 com 对象的方法
procedure TForm1.Button3Click(Sender: TObject);
var
Sd: TSecurityDescriptor;
begin
InitializeSecurityDescriptor(@Sd, SECURITY_DESCRIPTOR_REVISION);
SetSecurityDescriptorDacl(@Sd, true, Nil, false);
RegSe ......
使用delphi多年,前些天忽然遇到不会string转pbyte,很是失落,此时对于编程基本功的重要性深有体会.这其中用到MOVE函数.
搞了好一会才搞明白其用法.所以想贴出来帮助需要帮助的人.
var
s:string;
ps:Pchar;
b:pbyte;
len:integer;
begin
&nb ......
delphi中国际化的几种方案及比较(转)
随着全球化程度加深,软件越来越像蒲公英,到处飘散、扎根。这其中要解决的是不同语言的显示问题。我们当然希望一套程序,可以不修改代码就可以支持不同的语言,不要去维护很多的版本。
首先要谈到的一个问题是乱码问题,因为delphi
wi ......