delphi 正弦曲线图
本实例要在窗体上直接绘制正弦曲线,为了防止窗口切换的过程中会输出不完整的图形,因此绘制图形的关键代码都放在了窗体的OnPaint过程中,代码如下:
procedure TForm1.FormPaint(Sender: TObject);
var
x: Integer;
y,a: Double;
begin
Canvas.Pen.Width:=3;
Canvas.MoveTo(0,Trunc(self.Clie ...
初探Delphi中的插件编程
插件结构的编程需要一个插件容器来控制各DLL的运行情况,将划分好的每个子系统安排到一个DLL库文件中。对每个DLL程序需要为容器预留接口函数,一般接口函数包括:启动调用DLL库的函数、关闭DLL库的函数。通过接口函数,插件容器可以向DLL模块传递参数实现动态控制。具体实现细节我将在下文说明并给出响应代码。 您可能需 ...
Delphi Command模式
这个例子还是比较好理解的, 所以只给出代码.unit pattern;interfaceuses Dialogs;type TAudioPlayer = class; TCommand = class public procedure execute; virtual; abstract; end; T ...
delphi中一个值得大家来考虑的DLL问题
以下是我的原代码:==========================================================================================DPR 单元代码program Mdiform;uses Forms, UMdiform in ´UMdiform.pas´ {Mainform}, UDM in ´UDM.pas´ ...
插件管理框架 for Delphi(二)
unit untDllManager;
interface
uses
Windows, Classes, SysUtils, Forms;
type
EDllError = Class(Exception);
TDllClass = Class of TDll;
TDll = Class;
TDllEvent = procedure(Se ...
插件管理框架 for Delphi(一)
插件技术的出发点主要是为了使软件能够灵活地进行扩展功能,而不需要对主程序(框架程序)进行重新编译和发布。它的原理相当简单。软件的功能由框架程序和插件来决定。在框架程序和插件之间具有一个特定的接口,它们两者须通过这个接口来传递数据或控制信息,以实现软件功能。因此,只要符合该接口的程序(或其他功能实体) ...
Delphi建立、读取、存贮INI文件的方法《一》
一、有必要了解INI文件的结构:
;注释
[小节名]
关键字=值
...
INI文件允许有多个小节,每个小节又允许有多个关键字, “=”后面是该关键字的值。
值的类型有三种:字符串、整型数值和布尔值。其中字符串存贮在INI文件中时没有引号,布尔真值用1表示,布尔假值用0表示。
注释以分号“;”开头。
二、 ...
delphi建立、读取、存贮INI文件的方法《二》
从.INI文件中获取字符串varstrResult:pchar;beginGetPrivateProfileString(´windows´, // []中标题的名字´NullPort´, // =号前的名字´NIL´, // 如果没有找到字符串时,返回的默认值strResult, //存放取得字符100, //取得字符的允许最大长度&a ...
delphi建立、读取、存贮INI文件的方法《三》
从.INI文件中获取字符串 var strResult:pchar; begin GetPrivateProfileString( ´windows´, // []中标题的名字 ´NullPort´, // =号前的名字 ´NIL´, // 如果没有找到字符串时,返回的默认值 strResult, //存放取得 ...
在Delphi实现在数据库中存取图像的图文演示无错
本实例演示如何在数据库中存取图像文件。
向窗体上添加一个TListBox组件、一个TImage组件和一个TTable组件,设计完成的主界面如图1所示。
图1 主界面
本系统中需要设计一个新的基于Paradox 7的数据库Image.db,图2为设计完成的Image.db数据库。
图2 设计完成的数据库
为了方便测试程序,Image.db数据库存储在实例 ...