delphi 自定义网络函数：unit net interface uses sysutils ,windows ,dialogs ,winsock ,classes ,comobj ,wininet //得到本机的局域网ip地址 function getlocalip(var localip:string): boolean //通过ip返回机器名 function getnamebyipaddr(ipaddr: string var macname: string): boolean //获取网络中sqlserver列表 function getsqlserverlist(var list: tstringlist): boolean //获取网络中的所有网络类型 function getnetlist(var list: tstringlist): boolean //获取网络中的工作组
标签： interface sysutils classes dialogs
上传时间： 2015-05-09
上传用户：wanghui2438
delphi在数据库中存取Word文档indows, Messages, sysutils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtnrs, ExtCtrls, DBTables, Db, DBCtrls
标签： Messages Graphics Controls sysutils
上传时间： 2014-01-06
上传用户：ynzfm
unit Video interface uses Windows, Messages, sysutils, Classes, Graphics, Controls, stdctrls, ExtCtrls, avicap, mmsystem, dsgnintf // Types for event-procedures type TCapStatusProc = procedure(Sender: TObject) of object TCapStatusCallback = procedure(Sender: TObject nID: integer status: string) of object TVideoStream = procedure(sender: TObject lpVhdr: PVIDEOHDR) of object TAudioStream = procedure(sender: TObject lpWHdr: PWAVEHDR) of object // Property Editor for driver selection type TDrivereditor = class(TPropertyEditor) function GetAttributes: TPropertyAttributes override procedure GetValues(Proc: TGetStrProc) override function GetValue: string override procedure SetValue(const Value: string) override end
标签： interface Messages Graphics Controls
上传时间： 2013-12-21
上传用户：heart520beat
unit comm interface uses Windows, Messages, sysutils, Classes, Graphics, Controls, Forms, Dialogs, SPComm, StdCtrls, ExtCtrls type TFcomm = class(TForm) Comm1: TComm GroupBox1: TGroupBox Memo1: TMemo Memo2: TMemo GroupBox2: TGroupBox Button1: TButton Btn_send: TButton Button2: TButton procedure Button1Click(Sender: TObject) procedure Button2Click(Sender: TObject) procedure Btn_sendClick(Sender: TObject) procedure Comm1ReceiveData(Sender: TObject Buffer: Pointer BufferLength: Word) private { Private declarations } public { Public declarations } end
标签： interface Messages Graphics Controls
上传时间： 2016-06-10
上传用户：gxmm
tsp遗传算法源代码，nit fEA_TSP interface uses Windows, Messages, sysutils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Spin, ComCtrls, uIEA, uITSP, uUtilsEA, uDisplayTSP type TFormGA = class(TForm) PanelFit: TPanel Panel2: TPanel Panel3: TPanel PanelDisp: TPanel Panel5: TPanel Panel6: TPanel Label2: TLabel EditNoCities: TSpinEdit EditPopulationSize: TSpinEdit EditKill: TSpinEdit EditInversion: TSpinEdit EditTransposition: TSpinEdit EditGens: TSpinEdit ButtonRun: TButton ButtonStep: TButton ButtonCreateCities: TButton ButtonCreatePop: TButton
上传时间： 2015-12-28
上传用户：bjgaofei
一般的数据库管理系统 uses Classes, SConnectEx, TltConst, ExtCtrls, MMSystem, Types, windows, TltLogic , sysutils
标签： SConnectEx ExtCtrls MMSystem TltConst
上传时间： 2013-12-24
上传用户：zhangyigenius
