XP环境下在Delphi中调试COM+组件
现在应用系统流行用B/S开发，早几年前可是C/S的天下呢，我现在做的某航空公司货运结算维护工作，其系统就是利用Delphi开发的C/S应用程序！在日常的维护工作中，难免要对已经做好的COM+组件进行调试，以查看具体的处理逻辑！本文就是介绍在WindowsXP环境下如何在Delphi中调试COM+组件！
第一步：记录下你希望调试的COM+组件的GUID。可通过如下方式获取。可以通过打开“控制面板”，找到“管理工具”，然后打开“组件服务”，展开“计算机”，找到“COM+应用程序”，在希望调试的COM+应用程序上右键以打开它的属性，一串类似{2F240A4F-7A70-4573-BD91-FC7AC00EB409}的值就是我们所需要的，就是我们需要的信息，将此记录值复制下来存储于某记事本文件中。
第二步：关闭欲调试的COM+组件。
第三步：打开你要调试查看的组件应用程序，转到菜单Run，点击Parameters...项，
在Local选项条中，在Host Application下的输入框内，输入C:\WINDOWS\system32\dllhost.exe (这里的C盘请使用实际的操作系统路径替代，在Win2000或Win2003当中，则输入C:\WINNT\system32\dllhost.exe) ；在Parameters下的输入框内输入 /ProcessID:{GUID}，这个GUID是你希望调试的COM+组件的ID，也就是第一步操作中你记录并保存在记事本中的那串值！
第四步：在希望查看的接口代码处设置断点，运行程序（按F9），你就搭建好调试环境了！此时只要再用一个外部应用程序去调用此代码，就能看到最终效果了，
相关文档：
转自：http://www.52delphi.com/List.asp?ID=597&Page=1
核心提示：函数需要 uses Direct3D9,D3DX9; 偶然发现一个函数可以直接保存表面到文件1！所以修改了一下，函数为：...
procedure CaptureScreen(Const FileName: string);
var
BitsPerPixel: Byte;
pD3D: IDirect3D9;
pSurface: IDirect3DSurface9;
......
TreeView由节点构成,建树通过对TreeView.items属性进行操作。Items是一个TTreeNodes对象,这是一个TTreeNode集。
一、针对TTreeNodes,也就是 TreeView.Items,有这些属性:
1、count,节点个数。
2、item[index] ,通过index得到节点。
二、针对TTreeNodes,也就是 TreeView.Items,常用的添加节点的操作 ......
Delphi和C++数据类型对照表
Delphi 字长/值域 C++
ShortInt &n ......
delphi dll 实例 与 dll窗体实例
本动态链接库方法有
Min,Max,SynAPP,ShowForm,showmyform
dll工程文件
Library Project1;
uses
dllUnit1 in 'dllUnit1.pas' {Form1};
function Min(X, Y: Integer): Integer; export;
begin
if X < Y then Min := X else Min := Y;
end;
function Max(X, Y: Integer): ......
http://meidi152.blog.163.com/blog/static/5423302009610103610744/
1. memo控件读取txt
memo1.Lines.LoadfromFile('E:\*\*.txt');
2.
Procedure NewTxt(FileName:String);
Var
F : Textfile;
Begin
if fileExists(FileName) then DeleteFile(FileName); {看文件是否存在,在就刪除}
AssignFile(F, ......
