delphiÖÐActiveX ºÍ Web
http://book.77169.com/data/web5302/20050228/20050228__3692503.html
ActiveX ºÍ Web
ÔÚWindows ²Ù×÷ϵͳÏ£¬ÓÐÒ»¸öÖØÒªµÄ»úÖÆ£¬¾ÍÊÇOLE £¬¾ÍÊÇ¿ÉÒÔÈÃij
¸öÓ¦ÓóÌÐò£¨OLE Controller£©·ÃÎÊÆäËüÓ¦ÓóÌÐò£¨OLE Server£©ËùÌṩµÄ
¹¦ÄÜ£¬ÕâÑù×öµÄºÃ´¦ÊÇ£¬Èç¹ûÒѾÓÐÁËÍê³ÉijÏÄܵijÌÐò£¬Äã¾Í²»±ØÔÙΪ
ijÏÄܱàдÌض¨µÄÓ¦ÓóÌÐò£¬¿ÉÒÔÖ±½Óͨ¹ýOLE µ÷Óá£
Ò»¡¢ ÖÆ×÷ÓÃWeb µ÷ÓõÄActiveX
Ê×ÏÈÉèÖÃÒ»¸öÐéÄâĿ¼£¬¶¨ÃûΪDelphi
1£©½øÈëDelphi£¬Close all
2£©New -> Other -> ActiveX -> ActiveX Form ->Name: MyActiveX
OK
3£©³öÏÖÒ»¸öÆÕͨµÄForm½çÃ棬·ÅÈë
TButton
TListBox
TEdit
Èý¸ö¿Ø¼þ£¬Éè¼ÆÄ¿±êÊÇ£¬µãButtonºóListBoxÌí¼ÓÒ»¸öEditµÄÄÚÈÝ¡£
4£©Save all µ½ÐéÄâĿ¼µÄ ActiveX\Ac2\ ×ÓĿ¼Ï¡£
5£©Ë«»÷Button£¬ÔÚButton1Clickʼþ³ÌÐòÏÂд£º
ListBox1.items.add(edit1.text);
6£©Õâ¾ÍÍê³ÉÁË£¬±£´æ¡£
7£©Porject ->Build All ±àÒë
8£©Porject -¡µWeb Deployment Options ÉèÖ÷ַ¢²ÎÊý
µÚÒ»ÏOCX±£´æµÄĿ¼ £¨ÐéÄâĿ¼\ActiveX\ac2\£©
µÚ¶þÏOCX±£´æÔÚÄĸöÏà¶Ô·¾¶ÖÐ
£¨http://127.0.0.1/delphi/ActiveX/ac2/£©
µÚÈýÏDelphi²úÉúµÄHTML ±£´æ·¾¶£¨ÐéÄâĿ¼\ActiveX\ac2\£©
Ok
9£©²úÉúǶÈëActiveXFormµÄHTMLÎļþ
Porject -¡µWeb Deploy
ÏÖÔÚ±£´æÕâ¸ö¹¤³ÌÈ»ºóÍ˳ö
¹Û²ìЧ¹û
´ò¿ªIEä¯ÀÀÆ÷£¬ °ÑÍøַдΪ£ºhttp://127.0.0.1/delphi/activex/ac2/
¾Í¿ÉÒÔ¿´µ½ÏÂÃæµÄÎļþÁÐ±í£º
[To Parent Directory]
2000Äê5ÔÂ27ÈÕ 9:10 750 MyActiveImpl1.~dfm
2000Äê5ÔÂ27ÈÕ 9:11 9160 MyActiveImpl1.~pas
2000Äê5ÔÂ27ÈÕ 9:31 16936 MyActiveImpl1.dcu
2000Äê5ÔÂ27ÈÕ 9:16 51 MyActiveImpl1.ddp
2000Äê5ÔÂ27ÈÕ 9:14 778 MyActiveImpl1.dfm
2000Äê5ÔÂ27ÈÕ 9:15 9307 MyActiveImpl1.pas
2000Äê5ÔÂ27ÈÕ 9:11 334 MyActiveProj1.~dpr
2000Äê5ÔÂ27ÈÕ 9:11 6424 MyActiveProj1.~tlb
2000Äê5ÔÂ27ÈÕ 9:27 386 MyActiveProj1.cfg
2000Äê5ÔÂ27ÈÕ 9:27 1436 MyActiveProj1.dof
2000Äê5ÔÂ27ÈÕ 9:11 334 MyActiveProj1.dpr
2000Äê5ÔÂ27ÈÕ 9:29 382 MyActiveProj1.htm
2000Äê5ÔÂ27ÈÕ 9:31 477696 MyActiveProj1.ocx
2000Äê5ÔÂ27ÈÕ 9:27 1836 MyActiveProj1.res
2000Äê5ÔÂ27ÈÕ 9:11 6424 MyActiveProj1.tlb
2000Äê5ÔÂ27ÈÕ 9:11 15377 MyActiveProj1_TLB.~pas
2000Äê5ÔÂ27ÈÕ 9:31 11952 MyActiv
Ïà¹ØÎĵµ£º
ÔڵͰ汾ÖÐÉ趨MSCOMM¿Ø¼þ£¬Êǵ¼ÈëMSCOMM×é¼þ£¬È»ºó¾Í¿ÉÒÔ¿´¼ûMSCOMM¿Ø¼þµÄµç»°µÄͼ±êÁË£¬µ«ÊÇÔÚDELPHI 2005»òÒÔÉÏ°æ±¾ÖоͱØÐëÏȰѴ˿ؼþ´´½¨µ½°üÖУ¨BPL£©È»ºóµ¼ÈëBPL£¬ÄǸöµç»°Í¼±ê¾Í¿ÉÒÔ¿´¼ûÔÚ¹¤¾ßÌõÉÏÁË¡£ÎÒÊÔÁ˶àÉٻزÅÊÔ³öÀ´µÄ¡£ ......
{-----------------------------------------------------------------------------
Unit Name: HashTable
Author: LiuHeng
Date: 2010-04-13
Purpose: ·â×°DelphiµÄHashTable
History:
------------------------------- ......
unit MyADO;
interface
uses
SysUtils, Classes,ADODB,DB,Variants,StdCtrls,Dialogs;
type
TMyADO = class(TComponent)
private
Connection: TADOConnection;
Query: TADOQuery;
Table: TADOTable;
FConnectio ......
TMS Scripter£ºÖ§³ÖPascalºÍVBScriptÁ½ÖÖÓï·¨¡£ÓŵãÊÇÎĵµÆëÈ«¡¢Àý×ÓÆëÈ«£¬½Å±¾¿ÉÖ±½ÓÖ§³ÖDLL£¬¹Ù·½»¹ÌṩÁ˷ḻµÄIDE Debug¹¤¾ß¡¢µ¥Ôªµ¼³öº¯Êý¹¤¾ßµÈ£¬È±µãÊDZàÒëÔËÐнÏÂý¡£for ¿ÕÑ»·1000Íò´Î£¬ÐèÒª10ÃëÖÓÒÔÉÏ¡£TMS ScripterÊÇÉÌÒµ¹²ÏíÈí¼þ¡£
FastScript£ºÓùýFastReport±¨±íµÄÍ¬Ñ ......
תÔØ×Ô£ºhttp://www.cnblogs.com/jdmei520/archive/2009/06/17/1505053.html
Webservice¼¼ÊõµÄ³öÏÖ½«¸÷ÖÖ¿ª·¢¼¼ÊõºÍÓïÑÔÍêÈ«µÄÈÚºÏÁË£¬ÏÂÃæ¾ÍÕâÖÖÈÚºÏÔÚC#ºÍdelphiÖ®¼äµÄ½»»¥×öÒ»´ÎÈ«ÃæµÄÌåÏÖ
1.ʹÓÃC#´´½¨Ò»¸öWebservice·þÎñ¡£
ʹÓÃvs2005µÄÄ£°å´´½¨C#µÄwebservice·Ç³£ÈÝÒס£ÔÎļþÈçÏÂ:
[WebService(Namespace  ......