- 博客(8)
- 资源 (1)
- 收藏
- 关注
翻译 delphi动态创建的TMSComm串口控件不起作用!
我是用Create动态创建的TMSComm然后将Comport和OnComm事件赋值将句柄赋给一个var 变量打开串口都很成功,而且访问串口的属性也都没有问题就是串口输入的时候没有任何反应.如果我直接将控件拖放到主界面就没有问题郁闷,搞不明白!!!!! lxz3000("It"业小虾米) ( ) 信誉:
2006-11-07 09:23:00
3025
原创 delphi word技术融合
procedure TExprmResultDlg.PreviewExprmReport;var Template, NewTemplate,DocumentType,OleVisible:oleVariant; strTitle_Prior,strText_Prior,strTitle_Last,strText_Last:String;begin Try Word
2006-06-24 13:56:00
1310
原创 IP地址输入框制作
unit IpInput;interfaceuses Windows,Dialogs,SysUtils,Classes,Graphics,Forms,Controls,StdCtrls,Buttons,ExtCtrls, ComCtrls,Commctrl;type TInputIpFrm = class(TForm) SpdBfdftnCancle:
2006-06-20 11:34:00
1706
翻译 UnicodeToGB 字符转换函数
function UnicodeToGB(const wsUnicode: WideString): string;var iLen: Integer; //需要转换的字符数 sTmp: string;begin //计算转换的字符数 iLen := WideCharToMultiByte (936, 0, PWideChar(wsUnicode), -1, nil, 0,
2006-06-20 11:30:00
1141
原创 Delphi 图形处理 技巧
1。得到输出字符串在 屏幕上的象素数。BOOL GetTextExtentPoint32( HDC hdc, // handle of device context LPCTSTR lpString, // address of text string int cbString, // number of characters in string LPSIZE lpS
2006-05-16 08:57:00
1433
转载 编译delphi库文件
你如果更改了源代码后,必须对源代码进行编译,才能进行下面的操作。比如你更改了TStringGrid控件,该控件所在的unit是 Grids.pas,如果你想使用更改后的TStringGrid的话,必须重新编译该文件(Grids.pas),并把编译的结果:Grids.dcu覆盖原来delphi的Grids.dcu。一般并不建议这么做。最好的办法是重新写一个控件,该控件从TCustomGrid继承,该
2006-04-30 08:44:00
1529
转载 #ifdef的用法
#ifdef的用法灵活使用#ifdef指示符,我们可以区隔一些与特定头文件、程序库和其他文件版本有关的代码。代码举例:新建define.cpp文件#include "iostream.h"int main(){#ifdef DEBUG cout#endif return 0;}运行结果为:Press any key to continue 改写代码如下
2006-04-17 17:19:00
2089
原创 delphi 在动态链接库中访问数据库
在动态链接库中访问数据库时一定要在数据模板中加入以下语句:Initialization CoInitialize(nil);Finalization CoUninitialize; 不过还要引用单元:Activex并且数据模板的生成要放在 导出函数里面,否则会产生错误;生成格式:TCustomerData1为数据模板类if CustomerData1 =
2006-04-14 11:24:00
1306
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人