DELPHI
文章平均质量分 64
七级风科技
程序最终会实现独立思考。
展开
-
用Delphi怎么调用IE菜单中的internet选项
我们可以使用ShellExecute来调用IE的internet选项。首先,新建一表单,添加一个Button;然后uses添加ShellAPI。代码如下:procedure TForm1.Button1Click(Sender: TObject);begin ShellExecute(Handle, 'open', 'control.exe', 'INETCPL.CPL', Nil,原创 2015-11-07 15:05:21 · 367 阅读 · 0 评论 -
用Delphi开发视频聊天软件
目前网上视频聊天软件、视频会议软件、可视IP电话软件随处可见,你是否想自己做一个玩玩?其实这类软件无非是视频加上网络而建成的。如果熟悉视频捕捉和网络传输技术,根本就难不倒你。微软为软件开发人员提供了一个专门用于视频捕捉的VFW SDK(Video for Windows SDK),用它实现视频捕捉很简单,至于网络传输嘛,Delphi更是提供了N多种网络组件,随你用了。本文详细介绍了如何利用Delp转载 2015-11-12 10:40:07 · 412 阅读 · 0 评论 -
delphi 三层架构简单例
delphi 三层架构简单例所谓三层:(1) 客户端(2) 服务器端(3) 数据库 在数据访问时,使得客户端必须通过服务器来访问数据库。提高了系统的安全性。 在Delphi中可以使用Socket或者Dcom来连接他们相互间的通讯。如果使用Scocket在系统使用时必须提供Scocket连接器,而Dcom则不用。客户端和服务器的连接需要Broker来联系。环境转载 2015-11-12 10:35:39 · 578 阅读 · 0 评论 -
Delphi的三层开发初学经验
在数据库开发方面Delphi相对于其他众多开发工具其优势在于灵活快速,且十分稳定。本实例使用Remote DataModule(远程数据模块)创建。服务端: 首先让我们来编译服务器端,打开Delphi7, 选择File菜单,New-> application,创建一个新窗体form1。 选择File菜单 -> New -> Other-> Multitier -> 选择R转载 2015-11-12 10:31:12 · 2267 阅读 · 0 评论 -
DELPHI 动态 创建和释放 多个 EDIT 控件
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 =class(TForm) pnl1: TPanel;转载 2015-11-12 11:26:18 · 655 阅读 · 0 评论 -
使用TCP/IP协议实现聊天程序
TCP/IP协议的传输即面向点到点的传输方式! 1.创建应用程序 选择“NEW”菜单下的“Application”选项,创建一个普通的应用程序。 2.创建所需控件 首先在控件栏的Win32页中选择ImageList控件和CoolBar控件,再从Win32栏选择ToolBar控件放置到CoolBar 控件上。用鼠标右键单击“ImageList”控件,在弹出的菜单中选转载 2015-11-12 10:49:37 · 2479 阅读 · 0 评论 -
用Delphi创建IIS虚拟目录
//可以添加ACTIVE DS TYPE LIBRARYunit MainUnt; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, FileCtrl, Buttons,Activeds_TLB;转载 2015-10-22 10:39:19 · 321 阅读 · 0 评论 -
DELPHI 线程池
unit uThreadPool;{ aPool.AddRequest(TMyRequest.Create(RequestParam1, RequestParam2, ...)); }interfaceuses Windows, Classes;// 是否记录日志// {$DEFINE NOLOGS}type TCriticalSect转载 2015-10-22 10:44:22 · 1414 阅读 · 0 评论 -
用Delphi即时判断当前的网络的连接方式
判断网络的是否连接或者连接方式,比较重要的一点就是是不是即时判断,如果你明明无连接,判断出来却说你有,连接上了,却说你还未连接,下面要介绍的两个方法中 InternetGetConnectedState就是不怎么够即时的API函数,而第二个使用的是IsNetworkAlive这个API函数,这个没有InternetGetConnectedState的那种问题,但是可能需要安装SDK,也就是.N转载 2015-11-07 15:07:11 · 445 阅读 · 0 评论 -
Delphi使用IdHttp 获取 HttpsURL内容
uses IdHTTP, IdSSLOpenSSL;function HttpsGet(const aURL, aContentFile: string): Boolean;var vIdHTTP: TIdHTTP; vSSL: TIdSSLIOHandlerSocket; vMemory: TMemoryStream;begin try vIdHTTP := TI转载 2015-11-23 16:19:11 · 8787 阅读 · 0 评论