Borland Delphi 6.0 - 7.000509CB0 > $ 55 PUSH EBP00509CB1 . 8BEC MOV EBP,ESP00509CB3 . 83C4 EC ADD ESP,-1400509CB6 . 53 PUSH EBX00509CB7 . 56 PUSH ESI0...
分类：
其他好文 时间：
2014-07-29 20:59:02
阅读次数：
321
Dll的创建与调用 File ->New->Other->Dll Wizard
DLL的创建
//可以将本代码复制粘贴到项目中
library Project1; uses SysUtils, Classes, Windows, Forms; {$R *.res} function Min(x,y:...
分类：
其他好文 时间：
2014-07-29 20:58:32
阅读次数：
227
//Canvas 在Image控件中绘制文字procedure TForm1.Button1Click(Sender: TObject);beginimage1.Canvas.Font.Size:= 72; //设置文字大小image1.Canvas.TextOut(1,1,'Delphi'); /...
分类：
其他好文 时间：
2014-07-29 20:54:42
阅读次数：
187
TransparentColor:=true; TransparentColorValue:=clFuchsia; Color:= TransparentColorValue; BorderStyle:=bsNone;delphi 窗体透明http://hi.baidu.com/duduppp/it...
//Canvas.TextOut文字保存为图片//Delphi开发案例精选，使用TextOut在画布上画图procedure TForm1.Button1Click(Sender: TObject);varMy_Image:Timage;i:integer;begintryMy_Image:=Tim...
分类：
其他好文 时间：
2014-07-29 20:42:32
阅读次数：
227
Delphi连接MySQL真麻烦，研究了一天，从网上找了无数文章，下载了无数插件都没解决。最后返璞归真，老老实实用ADO来连接，发现也不是很顺利，但最终还是连接成功了。多少有点心得：ADO各个组件的作用和联系必须清楚，否则设置起来很容易混乱。总结一下用ADO连接MySQL5.1要点：1、需要下载My...
分类：
数据库 时间：
2014-07-29 20:40:42
阅读次数：
256
//获取一个文件夹下的所有文件
//不包括文件夹里面的文件
//ListBox1.Items:=searchfile('Z:\'); //注意,path后面要有'\'; functionSearchfile(path:string):TStringList; var SearchRec:TSearc...
分类：
其他好文 时间：
2014-07-29 20:36:32
阅读次数：
469
function StopServies(sServiceName: String): boolean; // 停止某个服务；
var
schService: SC_HANDLE;
schSCManager: SC_HANDLE;
ssStatus: TServiceStatus;
begin
schSCManager := OpenSCManager(nil, nil, SC_M...
分类：
其他好文 时间：
2014-07-29 12:51:26
阅读次数：
153
xe6[dcc32 Fatal Error] ToolsAPI.pas(18): F1026 File not found: 'E:\...\DockForm.dcu'delphi，xe6，包含了DesignEditors, DesignIntf文件后，报错。ToolsAPI.pas里有DockFo...
分类：
其他好文 时间：
2014-07-29 12:45:56
阅读次数：
319
1 //跑马灯 2 procedure Tfr_Main.tme_TitleTimer(Sender: TObject); 3 var 4 strTrim: Widestring; 5 begin 6 strTrim := copy(strScroll, 1, 1); // 获取第1个字符...
分类：
其他好文 时间：
2014-07-29 11:58:26
阅读次数：
239
