delphi引入ActiveX控件报coreide70.bpl错误解决办法
今天在大理剑川做监控联网工程，遇到2台DIY的PC-DVR，联网很不顺利。机器的软件是盗版破解的，只破解了服务器端，客户端未破解，还有就是版本也不对。最后发现软件下有一ActiveX控件可以做联网使用，于是想把这个OCX引入项目软件工程。在引入的时候delphi提示coreide70.bpl报错，错误代码:00000019。网络上查了下很多人碰到这个问题，但没有一个人解决了问题。只能自己研究了。
仔细想想，ActiveX规范已经出了很长很长时间了，大概有12年了吧。我记得98年我就在使用ActivexForm了。delphi支持这种规范应该是没有问题的。仔细检查了生成的文件，发现是dcr文件中包含有超过256色的24x24的位图所至，在包工程文件中删除了对应的dcr文件后，安装成功。
dcr文件是工程资源文件。对于package工程来说，里面其实就是包含了安装在delphi工具栏的代表控件的24X24的位图图标，删了对应的dcr文件，delphi会使用缺省的图标代替，完全不影响功能，只是难看一点，对于引入大量控件来说确实不方便。dcr 文件可以使用delphi自带的应用工具image editor编辑。看得不爽的话可以自己画个图标代替。
我自己是懒得去画图标了。难看就难看了吧。
相关文档：
DECLARE
TYPE TY_QUECUR IS REF CURSOR;
CUR_COLUMNS TY_QUECUR;
SQLCMD VARCHAR(500);
TABNAME VARCHAR(20);
COLNAME VARCHAR(50);
COLTYPE VARCHAR(20);
COLCOMMENT VARCHAR2(50);
COLLENGTH INTEGER;
COLPRECISION INTEGER; ......
名称 类型 说明
abort 函数 引起放弃的意外处理
abs 函数 绝对值函数
addexitproc 函数 将一过程添加到运行时库的结束过程表中
addr 函数 返回指定对象的地址
adjustlinebreaks 函数 将给定字符串的行分隔符调整为cr/lf序列
align 属性 使控件位于窗口某部分
alignment 属性 � ......
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
if CheckBox1.Checked then
SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOSIZE or SWP_NOMOVE)
else
SetWindowPos(Handle, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOSIZE or SWP_NOMOVE);
end;//使用Self.FormStyle := fsStayOnTop;会使界 ......
使用Delphi调用WebServices接口的简单应用实例
Delphi从6.0就开始支持Web Services的开发和应用了，本文通过使用Delphi 7.0调用新浪发送短信的Web Service进行短信应用程序开发这一实例详细的介绍在Delphi中如何开发基于Web Services的应用系统。
第一步，准备工作，了解新浪短信Web Service。新浪发送短信的Web Service� ......
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB,comobj, OleServer,
ExcelXP;
type
TForm1 = class(TForm)
ADOConn: TADOConnection;
& ......
