Delphi 5 控制Excel
(一) 使用动态创建的方法
首先创建 Excel 对象，使用ComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' );
1) 显示当前窗口：
ExcelApp.Visible := True;
2) 更改 Excel 标题栏：
ExcelApp.Caption := '应用程序调用 Microsoft Excel';
3) 添加新工作簿：
ExcelApp.WorkBooks.Add;
4) 打开已存在的工作簿：
ExcelApp.WorkBooks.Open( 'C:\Excel\Demo.xls' );
5) 设置第2个工作表为活动工作表：
ExcelApp.WorkSheets[2].Activate;
或
ExcelApp.WorksSheets[ 'Sheet2' ].Activate;
6) 给单元格赋值：
ExcelApp.Cells[1,4].Value := '第一行第四列';
7) 设置指定列的宽度（单位：字符个数），以第一列为例：
ExcelApp.ActiveSheet.Columns[1].ColumnsWidth := 5;
8) 设置指定行的高度（单位：磅）（1磅＝0.035厘米），以第二行为例：
ExcelApp.ActiveSheet.Rows[2].RowHeight := 1/0.035; // 1厘米
9) 在第8行之前插入分页符：
ExcelApp.WorkSheets[1].Rows[8].PageBreak := 1;
10) 在第8列之前删除分页符：
ExcelApp.ActiveSheet.Columns[4].PageBreak := 0;
11) 指定边框线宽度：
ExcelApp.ActiveSheet.Range[ 'B3:D4' ].Borders[2].Weight := 3;
相关文档：
procedure Delay(msecs:integer);
var
Tick: DWord;
Event: THandle;
begin
Event := CreateEvent(nil, False, False, nil);
try
Tick := GetTickCount + DWord(msecs);
while (msecs > 0) and (MsgWaitForMultipleObjects(1, Event, False, msecs, QS_ALLINPUT) <&g ......
定义：
CbName: TComboBox;
width: Integer; //实际所需的宽度
在执行代码中按如下方法写：
width := CbName.Canvas.TextWidth(CbName.Items[I]); //可用此方法通过遍历获得某选项的最大宽度，也可以按自己的� ......
我一直使用Delphi6开发软件，看到CSDN上的OPhone手机开发，又去Google一番，听说编写手机软件
能赚钱，所以要学习Java ME，读了几天博文，大多数概念搞清楚了。
要学JavaME就得先学JavaSE，所以装了很多软件(不装那么多，OPhone就装不上去)。
推荐一篇优秀的文章：
在 NetBeans IDE 中设计 Swing GUI
读完这篇文章，初 ......
最近一阵子，总是被一个莫名其妙的bug困扰。自己写的ocx（.net2005）在delphi7中调用，明明没有释放主动释放过内存，却被连续释放了两次。结果，程序退出时就down掉了。当然，这是在debug模式下才会出现，但是exe跑的时候会莫名奇妙的down掉，而且出错往往指向ocx，我想一定和ocx的调用有关。
上网找了purify，boundscheck ......
一．编写 RC 脚本文本
用记事本或其它文本编辑器编写一个扩展名为“.rc”的文件。格式如下：
AVI 无声动画
BITMAP 位图文件
CURSOR 光标文件
ICON 图标文件
WAVE 声音文件
以上所列均为标准资源类型，也可以给资源自定义一个类型，如：“mytype ......
