导航

心动吧DELPHI网络书

自发研究:须要多维思想而且要想不可能为可能的人才能做到

[置顶] {下载}本站提供delphi下载

  下载的时候最好不要用迅雷,要不然很容易断线.

  提供多个控件下载:

实现文件拖放的一种简洁方法

实现文件拖放的一种简洁方法实现文件拖放的一种简洁方法 湖北省襄樊市电信局计算机中心 张洪征 ---- 读了南京海军指挥学院黄向明同志在贵报上发表的《用MFC实现文件拖放到编辑框》一文获益匪浅,同时也发现了该方法的几点不足:1、自已编写专用的类,程序复杂、维护麻烦;2、必须要将文件拖到对话框中的编辑控件上,拖动的文件名才被接受,而标准的WINDOWS程序只须将文件拖放到对话

实现应用程序的文件拖放功能

实现应用程序的文件拖放功能实现应用程序的文件拖放功能 南京市东南大学 王捷 ---- 在Delphi 中有许多控件支持拖放操作, 但仅限于应用程序内部, 而不能实现从Windows 环境里向应用程序拖放文件, 本文将要介 绍的就是如何用Delphi 编写支持文件拖放的应用程序, 由于主要 使用Windows API 函数, 因此也可供其它语言使用者参考. ----

使用 COM+ 参数化对象结构编程技术

使用 COM+ 参数化对象结构编程技术作者: 陈一蛟一、引言  COM+ 服務技術的一個核心理念就是系統本身提供完成許多面向企業應用開發者的通用基本模組(如線程、物件資源池管理、事務服務管理、事件服務管理等),讓系統設計人員把精力集中在企業應用本身的業務邏輯上。  COM+提供了許多新的服務和一致的管理運行環境,它還支援申明性編程模型(declarative programmi

使用DELPHI实现文本文件显示和声音同步播放

使用DELPHI实现文本文件显示和声音同步播放使用DELPHI实现文本文件显示和声音同步播放 南京动力专科学校 朱群生 ---- 在一些语言教学软件中,经常使用文本显示和声音同步播放,我们可以用DEL PHI实现之。 ---- 一、材料的制作 ---- 首先,我们选择几篇文章,这里我们选择马丁路德金、林肯和里根的演说,每一篇文章分为若干句,在制作声音文件时,记下每个句子

使用MIDAS在客户端执行存贮过程

使用MIDAS在客户端执行存贮过程  本文为你演示怎样在客户端执行存贮过程。  假如你的存贮过程返回一个数据集,那你需要调用 TStoredProc 的 Open 方法,然后,只需要使用 TDataSetProvider 来连接它就行了。效果很好。  假如你的存贮过程不返回一个数据集,这就意味着需要调用 TStoreProc 的 ExecProc 方法。步骤是:&nb

使用ReadLn()从文件中读出超过225字符的字符串

使用ReadLn()从文件中读出超过225字符的字Type{use longest line you may encounter here}TLine = Array [0..1024] of Char;PLine = ^TLine;VarpBuf: PLine;...New( pBuf );...ReadLn( F, pBuf^ );向文本文件后追加一行varfilevar: textfile;

使用zlib来压缩文件

使用zlib来压缩文件主题:使用zlib来压缩文件发信人: teleme(PassWord)整理人: teleme(2001-06-28 19:47:51) 站内信件今天用到压缩文件的问题,找了一些网上的资料,后来发现了delphi自身所带的zlib单元,根据例子稍微改变了一些,使它能够符合所有的格式。使用时,需要Zlib.pas和 Zlibcon

输出TDataSet中的内容至逗号分割的ASCII 文件

  过程代码如下:    unit Unit1;     interface     uses db, classes, dialogs,sysutils;   &nbs

数据定义文件 u_def.pas

数据定义文件 u_def.pas发信人: raphaelzl (小飞熊), 信区: Delphi标  题: 数据定义文件 u_def.pas发信站: BBS 水木清华站 (Sat Jan  1 11:25:21 2000)unit

数据文件路径的管理

  Delphi中的Table控件(Component)和Query控件都有一个DatabaseName属性。可以用DatabaseName属性来指定该控件所引用的数据表的路径。有两种方法可以为属性DatabaseName设置路径:第一种方法是直接输入数据表所在路径,另一种方法是使用数据库别名(Alias)。在Delphi中,数据库别名是在数据库引擎(BDE)中建立的,一个别名对应一个文件路径。可

刷新文件缓冲区到硬盘

刷新文件缓冲区到硬盘procedure TForm1.Button1Click(Sender: TObject);var  f : file;  i : integer;begin  i := 10;  AssignFile(f, 'C:\DownLoad\Test.Bin');  ReWrite(f, 1);  BlockWrite(f

通过版本控制判断是否覆盖文件

通过版本控制判断是否覆盖文件  以下是一个关于如何判断文件是否应该被覆盖的示例。只需要使用:   if VersionCopyFileCheck(file1,file2) then CopyFile(file1,file2,FALSE);   uses SysUtils, Classes, Windows;   //&mdash

分页:[«][15]16[17][18][19][20][21][22][23][24][25][26][27][28][29][»]

日历

<< 2013-5 >>

Sun

Mon

Tue

Wed

Thu

Fri

Sat

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

站内搜索

Copyright ⊙ 2004-2009 心动吧 UrL:ABCXD.CoM All RiGhts Reserved