一、在Delphi7中连接MS SQL Server 2000的方法。
刚开始时界面如下：添加4个控件。
设置控件属性过程：
1、ADOConnection1设置
1）双击ADOConnection1，进行设置连接字符串（作用是：选取连接驱动方式和连接的数据库设置）。过程如下图所示：
2、ADOQuery1设置：
1）ADOQuery1.connection属性为ADOConnection1;
2）ADOQuery1.SQL属性为select student.sno,sname,cname,grade from student,sc,course where student.sno=sc.sno and course.cno=sc.cno
3）ADOQuery1.Active设置为TRUE。
3、DataSource1设置
DataSet属性为ADOQuery1
4、DBGrid1设置
DataSource属性设置为DataSource1.
效果图：
二、通过Delphi7进行设计SQL查询的界面和程序实现。
1、界面设计
添加Edit，Button和Label控件，如图摆放和设置基本属性。
2、在BitBtn1的Click事件内完成程序。（Edit1和Edit2的综合查询，共4种情况）
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i:integer;
SqlStr:String;
begin
i:=0;
if edit1.Text<>'' then
i:=i+1;
if edit2.Text<>'' then
i:=i+2;
case i of
0:
begin
Sql ......
一、在Delphi7中连接MS SQL Server 2000的方法。
刚开始时界面如下：添加4个控件。
设置控件属性过程：
1、ADOConnection1设置
1）双击ADOConnection1，进行设置连接字符串（作用是：选取连接驱动方式和连接的数据库设置）。过程如下图所示：
2、ADOQuery1设置：
1）ADOQuery1.connection属性为ADOConnection1;
2）ADOQuery1.SQL属性为select student.sno,sname,cname,grade from student,sc,course where student.sno=sc.sno and course.cno=sc.cno
3）ADOQuery1.Active设置为TRUE。
3、DataSource1设置
DataSet属性为ADOQuery1
4、DBGrid1设置
DataSource属性设置为DataSource1.
效果图：
二、通过Delphi7进行设计SQL查询的界面和程序实现。
1、界面设计
添加Edit，Button和Label控件，如图摆放和设置基本属性。
2、在BitBtn1的Click事件内完成程序。（Edit1和Edit2的综合查询，共4种情况）
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i:integer;
SqlStr:String;
begin
i:=0;
if edit1.Text<>'' then
i:=i+1;
if edit2.Text<>'' then
i:=i+2;
case i of
0:
begin
Sql ......
由于项目需要，开始学习DELPHI，并自己编写代码来测试用VC写的DLL，觉得自己又多掌握了一些，不对的地方希望指正，我会好好学习
1、响应键盘事件：
因为KeyPreview默认是 False;我们这里需要响应键盘事件的话，需要将其修改为True；
所以KeyPreview:=True; 这对一些快捷键会有用。
在FormCreate这个函数里修改KeyPreview := True;
在FormKeyDown这个函数里就可以对键盘事件进行操作了，(*^__^*) 嘻嘻
不断更新。。。 ......
Delphi的源码定位方法网上搜索到好像不太多。
这里分享我自己的两个方法。
引用一段话
引用内容
什么是 MAP 文件？
MAP 文件是程序的全局符号、源文件和代码行号信息的唯一的文本表示方法，它可以在任何地方、任何时候使用，不需要有额外的程序进行支持。而且，这是唯一能找出程序崩溃的地方的救星。
DELPHI源码生成MAP文件有两种
1 DELPHI设置。
英文版到为 project -> options -> Linker -> Map file 选择detailed
如图
中文版为 ：工程- -> 选项 -> Linker -> Map file 选择detailed
2
新建一个bat文件，当然必须在源文件到文件夹内
bat内容为 dcc32 -GD xx.dpr
把xx.dpr改成你自己的工程文件。 比如FF到服务端为 FServer.dpr
那么bat的内容就是 dcc32 -GD FServer.dpr
然后运行该bat
就能编译出程序的map文件。
另外百度一下DELPHI的源码免杀方法
delphi免杀的方法总结如下：
一。添加垃圾汇编代码。
其实许多的朋友都是知道的，Delphi支持在代码中嵌套汇编代码。也就是说，如果加入了垃圾汇编代码，就网网可以直接过免杀。
例如：
asm
nop
nop
nop
......
在Delphi中使用RAS实现对系统拨号的控制
在企业应用中有时候希望能在程序中实现对拨号网络的控制，以实现自动拨号、自动断开网络。在尝试了多种方式之后，认为RAS是一种比较稳定的方式。在google了网上一些资料后，现整理如下：
一、首先需要有个针对RAS的头文件定义，Ras.pas代码如下
{* Copyright (c) 1992-1995, Microsoft Corporation, all rights reserved
**
** ras.h
** Remote Access external API
** Public header for external API clients
*}
{ Delphi conversion by Davide Moretti <dmoretti@iper.net> }
{ Note: All functions and structures defaults to Ansi. If you want to use
Unicode structs and funcs, use the names ending with 'W' }
unit Ras;
interface
uses Windows, Messages;
const
{ These are from lmcons.h }
DNLEN = 15; // Maximum domain name length
UNLEN = 256; // Maximum user name length
PWLEN = 256; // Maximum password length
NETBIOS_NAME_LEN = 16; // NetBIOS net name (bytes)
RAS_MaxDeviceType = 16;
RAS_MaxPhoneNumber = 128;
RAS_MaxIp ......
一、引子：
现在的Windows应用程序几乎都使用图标、图片、光标、声音等，我们称它们为资源（Resource）。最简单的使用资源的办法是把这些资源的源文件打入软件包，以方便程序需要的时候调用。资源是程序的一部分，程序要正常运行就离不了资源文件。但是它是不可执行代码。
为了更好地管理资源，Delphi中提供了一种.RES类型的资源文件。它可以把我们程序中所需要的资源整合到一个资源文件(.RES)下来。在编译应用程序时直接编译进了可执行程序里，成为应用程序的整合体。
这样做的好处是：1。由于定位资源比在磁盘中定位文件花费时间少，所以应用程序执行会更快。2。多种资源可以放在一个文件中，减少了图标、图片、光标、声音等文件数量。不用怕用户在使用过程中的不小心而损坏了资源文件致使程序无法正常运行。
缺点是：因为资源文件的加入从而加大了编译出的可执行程序的字节数，当资源文件较大时会使应用程序变得看起来雍肿。
使用资源文件的优点很显著，其缺点也很突出。所以在实际应用中就要根据情况权衡利弊、灵活使用，这已不在本文的讨论之列。下面仅就Delphi系统编程中对于资源文件的使用方法做一个大致的总结。
二、创建资源文件：
注意事项：创建的资源文件� ......
在DELPHI为编程者提供了一个灵活的绘图场所,即本文所述的
CANVAS类,在DELPHI中的很多控件都具有此属性,使编程者可以
在这些的控件的表面随心所欲的绘图,这对完善用户界面或者制
作一些屏幕特技都有着非凡的作用,下面举例说明几种特殊屏幕
效果的形成过程。
一、CANVAS必备基本知识：
1.具有CANVAS属性的控件:
TBitmap,TComboBox,TDBComboBox,TDBGrid,TDBListBox,TDirectoryListBox,
TDrawGrid,TFileListBox,TForm,THeaderControl,TImage,TListBox,TOutline,
TPaintBox,TPrinter,TStatusBar,TStringGrid等,
2.CANVAS属性及命令:篇幅所限,省略参数及格式说明,具体请参考文后程序及DELPHI帮助文件:
canvas.rectangle():画矩形pen.color:定义画笔颜色
roundrect():画圆角矩形pen.width:定义画笔宽度
arc():画弧线(不填充) brush.color:定义填充颜色&n ......
最新文章 : delphi