Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphi Èý²ã¿ª·¢¾­Ñé»ã×Ü

delphiºÜÔç¾ÍÒѾ­¿ÉÒÔ½øÐÐÈý²ãµÄ¿ª·¢ÁË. µ«Ò»Ö±µ½ÏÖÔÚ, ÍøÉÏÕâ·½ÃæµÄ¶«Î÷Ì«ÉÙ ÁË. Ҫô̫ÀÏ, ÉõÖÁ²»ÍêÈ«ÕýÈ·.  ÀýÈç:
ÈçºÎ½øÐжà±í¸üÐÂ(Ìá½»), ºÜ¶à»Ø¸´»¹ÊÇ˵ÓÃADOConnectionµÄÊÂÎñ, (Èç¹ûҪͬʱ¸üÐÂSQL SERVERºÍOracleÊý¾Ý¿âµÄ±íÔõô°ì).
µ±È»Ò²ÓÐ˵ÓÃSetComplete, SetAbortµÄ. µ«ËµµÄºÜ¼òµ¥, ÆäÖеÄ×¢ÒâÊÂÏîÓÖÊÇÊ²Ã´ÄØ. »¹ÓеÄÍÆ¼ö¿´ÀîάµÄÄDZ¾·Ö²¼Ê½¿ª·¢µÄÊé. ÄDZ¾ÊéÖÐÊÇдÁ˺ܶàÖµµÃѧϰºÍÁ˽âµÄ¶«Î÷. µ«ÓÐЩ¶«Î÷ÒѾ­¹ýʱÁË»òÕß˵µÄ²»Ïêϸ, ÀýÈçwin2000ÖÐÒѾ­ÓÐCOM+ÁË. COM+ÒѾ­ÕûºÏÁËmts¼°ÆäËüһЩ¶«Î÷ÁË. Áí¸ö, Ò²ÓÐЩÌù×ÓÉÏÓÐÈË˵, Ó¦Ó÷þÎñÆ÷ÉÏÖ»ÓÃÒ»¸öTDataSetPrivoderºÍÒ»¸ö TDataSet(ADO, Query, DBXQueryÖ®Ò»)¾Í¿ÉÒÔÁË. µ«¾ßÌåÔõôÓÃÄØ?ÓÖ¿´²»µ½ÏÂÎÄ.
ÁíÍâ, »¹ÓÐһЩÅóÓÑÔÚÓõÚÈý·½µÄһЩ¿Ø¼þ. ÎÒ¿´ÁËÒ»ÏÂ, ´ó¶à¾ÍÏñ¸öǶÈëµ½IEÖеÄActiveX, ¸Ð¾õҲûÓÐʲôÒâ˼---Ö±½ÓŪ¸öActiveXµ½IEÖоͲ»ÐÐÁË.
1. ÈçºÎÖ»ÓÃÒ»¸öTDataSetPrivoderºÍÒ»¸öTADOQuery.
delphiµÄTRemoteDataModule¼¯³ÉÁËIAppServer½Ó¿Ú.²¢ÇÒʵÏÖÁËIAppServer½Ó¿ÚµÄ·½·¨:
view plaincopy to clipboardprint?
{ IAppServer } 
 function AS_GetProviderNames: OleVariant; safecall;  
 function AS_ApplyUpdates(const ProviderName: WideString; Delta: OleVariant;  
   MaxErrors: Integer; out ErrorCount: Integer;  
   var OwnerData: OleVariant): OleVariant; safecall;  
 function AS_GetRecords(const ProviderName: WideString; Count: Integer;  
   out RecsOut: Integer; Options: Integer; const CommandText: WideString;  
   var Params, OwnerData: OleVariant): OleVariant; safecall;  
 function AS_DataRequest(const ProviderName: WideString;  
   Data: OleVariant): OleVariant; safecall;  
 function AS_GetParams(const ProviderName: WideString; var OwnerData: OleVariant): OleVariant; safecall;  
 function AS_RowRequest(const ProviderName: WideString; Row: OleVariant;  
   RequestType: Integer; var OwnerData: OleVariant): OleVariant; safecall;  
&


Ïà¹ØÎĵµ£º

delphiÖÐCreateMutex£¬OpenMutexʹÓÃÒ»Àý

VCÉùÃ÷
HANDLE CreateMutex(
¡¡¡¡LPSECURITY_ATTRIBUTES lpMutexAttributes, // SD
¡¡¡¡BOOL bInitialOwner, // initial owner
¡¡¡¡LPCTSTR lpName // object name
¡¡¡¡);
delphiÉùÃ÷£º
function CreateMutex(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL; lpName: PChar): THandle; stdcall;
´´½ ......

Windows XP ³£ÓÃÄÚºËÊý¾Ý½á¹¹¶¨Òå[Delphi/Pascal¸ñʽ]

windows¼¸¸öÖØÒªµÄÄÚºËÊý¾Ý½á¹¹ËäÈ»ÍøÉÏÒ²ÓÐÏà¹ØµÄ¶¨Ò壬µ«¸öÈ˾õµÃ²»ÆëÈ«¶¨Òå²»¹æ·¶£¬Òò´ËÓÃÒ»Ììʱ¼äʹÓÃWinDbg+Win2000sourcecodeÖØÐ¶¨ÒåÁ˳£ÓõÄÄÚºËÊý¾Ý½á¹¹£¬²¢¾¡¿ÉÄÜ»¹Ô­Î¢ÈíµÄÔ­½á¹¹¶¨Ò壬ÿ¸ö½á¹¹¶¼µÝ¹éµ½×î×Ó²ãµÄ½á¹¹²¢ÇÒͨ¹ýÁ˲âÊÔ¡£Í¨¹ýÕâ´Î¹¤×÷¹ý³Ì²»½öʹ×Ô¼ºµÃµ½Ò»´ÎѧϰµÄ»ú»á£¬¶øÇÒÌá¸ßÁË×Ô¼ºµÄÕûÌåÈí¼þ¼Ü¹ ......

DelphiϵÄCOM±à³Ì

Delphiͨ¹ýÏòµ¼¿ÉÒԷdz£Ñ¸Ëٺͷ½±ãµÄÖ±½Ó½¨Á¢ÊµÏÖCOM¶ÔÏóµÄ´úÂ룬µ«ÊÇÕû¸öCOMʵÏֵĹý³Ì±»ÍêÈ«µÄ·â×°£¬ÉõÖÁûÓÐVCLÄÇô½á¹¹ÇåÎú¿É¼û¡£Ò»¸öûÓÐC++ÏÂCOM¿ª·¢¾­ÑéÉõÖÁûÓнӴ¥¹ýCOM¿ª·¢µÄDelphi³ÌÐòÔ±£¬Ò²Äܹ»ºÜÈÝÒ׵İ´Õս̳ÌÉè¼ÆÒ»¸ö½Ó¿Ú£¬µ«ÊÇ£¬¿ÖÅÂÉîÈëÒ»Ï룬Á¬Éú³ÉµÄ´úÂë´ú±íºÎÖÖÒâÒ壬ÄÄЩÄܹ»¶¨Öƶ¼²»Çå³þ¡£Ç°¼¸ÆÚ &ld ......

ʹÓÃDelphi±àдÆåÅÆÀàÓÎÏ· »ù´¡Æª(1)

Ŀǰ¿ª·¢ÆåÅÆÀàÓÎÏ·µÄ¹«Ë¾ºÍ¸öÈ˺ܶࡣµ«ÊǶÔÓںܶ࿪·¢ÕßÀ´Ëµ£¬¿ª·¢Ò»¿î¾ßÓпÉÀ©Õ¹¡¢Îȶ¨µÄÆåÅÆÀàÓÎÏ·»¹ÊǾßÓÐÒ»¶¨µÄÄѶȡ£Õâ´ÎÎÒ¾ÍÒÔÎÒ¿ª·¢ÆåÅÆÀàÓÎϷΪÀý£¬½²ÊöÈçºÎʹÓÃDELPHIÀ´¿ª·¢ÆåÅÆÀàÓÎÏ·¡£Ï£ÍûÎҵľ­Ñé¿ÉÒÔ¶ÔÓÎÏ·¿ª·¢°®ºÃÕ߯ðµ½Å×שÒýÓñµÄ×÷Óá£Èç¹ûÄú¶ÔÎÒ»ù´¡ÆªÖÐÉæ¼°µ½µÄÄÚÈݷdz£ÊìϤ£¬¿ÉÒÔÖ±½ÓÌø¹ý½øÈëÉè¼ÆÆª¡£ ......

DELPHI ²éÕÒ£¬Ôö¼Ó£¬Ð޸ģ¬É¾³ý

unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls;
type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Button1: TButton;
    Button ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ