使用Delphi可以方便而又快速地建立强大的数据库应用程序,Delphi的数据库应用程序开发,无论是客户/服务器数据库还是本地数据库,必须用到组件(组件的英文为Component,有叫控件、元件、构件的,本文称组件)TDataSource和Ttable,其中Ttable组件中有多种过滤记录的方法,现用最简单例子分别说明。 —- 1.给……继续阅读 » 搞代码 4年前 (2018-08-09) 187浏览 0评论0个赞
一、问题的提出 —- Delphi作为强大的数据库开发工具,正被愈来愈多的编程人员所采用,"聪明的程序员用Delphi"更形象生动的道出广大程序员的心声,但这并不意味着所有功能的实现都非常容易,例如,笔者在开发军队的某个信息系统中,就在为数据分析模块中DecisionGrid1控件的数据进行报表输出时走了不少的弯……继续阅读 » 搞代码 4年前 (2018-08-09) 210浏览 0评论0个赞
在数据处理量很大的情况下,如何在数据处理的同时响应用户操作?Window s95/98和WindowsNT作为多线程的多任务操作系统,其调度单元是线程,即线程是 系统分配处理器时间资源的基本单元,所以我们可以利用线程实现在处理大批量 数据的同时响应用户操作。 Delphi作为一个优秀的开发平台,对开发多线程应用程序提供了强有力的支 持,即可直……继续阅读 » 搞代码 4年前 (2018-08-09) 143浏览 0评论0个赞
在Delphi中用Loadcursor()得到的光标只有黑白两色,怎样在程序中得到彩色光标呢?笔者尝试制作了以下程序: 方法一 用Loadcursorfromfile()从外部调入图标作为光标 Loadcursorfromfile()函数可以读*CUR,*ICO,*ANI为后缀的文件作为光标,其中ICO为彩色图标格式(可用Imag……继续阅读 » 搞代码 4年前 (2018-08-09) 184浏览 0评论0个赞
以下程序将教你如何制作一个窗体,窗体一旦运行将在屏幕上不断抖动. 定义两个变量: var BackLeft,BackTop,I:integer; //保存窗体的lefthttp://www.gaodaima.com/?p=65824用Delphi制作抖动窗体_Delphi BackLeft := Left; //保存窗体的top Ba……继续阅读 » 搞代码 4年前 (2018-08-09) 161浏览 0评论0个赞
unit REdit; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TCustomREdit = class(T……继续阅读 » 搞代码 4年前 (2018-08-09) 115浏览 0评论0个赞
利用 TWinsocketStream 可以做到. TServerWinSocket serverSocket; TClientWinSocket clientSocket TFileStream inFile, outFile; // 假设各 Stream 都己 created // 在 Server 端 // Client send 一个命令告……继续阅读 » 搞代码 4年前 (2018-08-09) 139浏览 0评论0个赞
大家都用过用来显示密码的工具吧,嘿嘿。其实原理很简单.比如说在Delphi中,Edit控件的PasswordChar属性可让框中的回显的字符为自己想要的字符。但是这些字符对于内部来说是不变的(虽说不够专业,但就是这么回事)!!而我们伟大的Delphi给了这个API—- int GetWindowTextLength(HWND hWnd);……继续阅读 » 搞代码 4年前 (2018-08-09) 152浏览 0评论0个赞
Type TPCMWaveHeader = record rID : array[0..3] of char; { ‘RIFF’ Identifier } rLen : longint; &nb……继续阅读 » 搞代码 4年前 (2018-08-09) 128浏览 0评论0个赞
—-在软件的安装或演示操作等过程中,如果关闭WIN9X会产生严重的后果,就必须禁止用户关闭WIN9X,直到完成相应的操作,那么如何才能禁止用户关闭WIN9X呢?其实很简单,当用户关闭WIN9X时,系统会发送给各应用程序一个消息wm_queryendsession,告诉各应用程序要关机了,如果反馈回来的消息值为0,那么WIN9X就不能关机。因……继续阅读 » 搞代码 4年前 (2018-08-09) 174浏览 0评论0个赞