delphiÒýÈëActiveX¿Ø¼þ±¨coreide70.bpl´íÎó½â¾ö°ì·¨
½ñÌìÔÚ´óÀí½£´¨×ö¼à¿ØÁªÍø¹¤³Ì£¬Óöµ½2̨DIYµÄPC-DVR£¬ÁªÍøºÜ²»Ë³Àû¡£»úÆ÷µÄÈí¼þÊǵÁ°æÆÆ½âµÄ£¬Ö»ÆÆ½âÁË·þÎñÆ÷¶Ë£¬¿Í»§¶ËÎ´ÆÆ½â£¬»¹ÓоÍÊǰ汾Ҳ²»¶Ô¡£×îºó·¢ÏÖÈí¼þÏÂÓÐÒ»ActiveX¿Ø¼þ¿ÉÒÔ×öÁªÍøÊ¹Óã¬ÓÚÊÇÏë°ÑÕâ¸öOCXÒýÈëÏîÄ¿Èí¼þ¹¤³Ì¡£ÔÚÒýÈëµÄʱºòdelphiÌáʾcoreide70.bpl±¨´í£¬´íÎó´úÂë:00000019¡£ÍøÂçÉϲéÁËϺܶàÈËÅöµ½Õâ¸öÎÊÌ⣬µ«Ã»ÓÐÒ»¸öÈ˽â¾öÁËÎÊÌâ¡£Ö»ÄÜ×Ô¼ºÑо¿ÁË¡£
×ÐϸÏëÏ룬ActiveX¹æ·¶ÒѾ³öÁ˺ܳ¤ºÜ³¤Ê±¼äÁË£¬´ó¸ÅÓÐ12ÄêÁ˰ɡ£ÎҼǵÃ98ÄêÎÒ¾ÍÔÚʹÓÃActivexFormÁË¡£delphiÖ§³ÖÕâÖֹ淶Ӧ¸ÃÊÇûÓÐÎÊÌâµÄ¡£×Ðϸ¼ì²éÁËÉú³ÉµÄÎļþ£¬·¢ÏÖÊÇdcrÎļþÖаüº¬Óг¬¹ý256É«µÄ24x24µÄλͼËùÖÁ£¬ÔÚ°ü¹¤³ÌÎļþÖÐɾ³ýÁ˶ÔÓ¦µÄdcrÎļþºó£¬°²×°³É¹¦¡£
dcrÎļþÊǹ¤³Ì×ÊÔ´Îļþ¡£¶ÔÓÚpackage¹¤³ÌÀ´Ëµ£¬ÀïÃæÆäʵ¾ÍÊǰüº¬Á˰²×°ÔÚdelphi¹¤¾ßÀ¸µÄ´ú±í¿Ø¼þµÄ24X24µÄλͼͼ±ê£¬É¾Á˶ÔÓ¦µÄdcrÎļþ£¬delphi»áʹÓÃȱʡµÄͼ±ê´úÌæ£¬ÍêÈ«²»Ó°Ï칦ÄÜ£¬Ö»ÊÇÄÑ¿´Ò»µã£¬¶ÔÓÚÒýÈë´óÁ¿¿Ø¼þÀ´ËµÈ·Êµ²»·½±ã¡£dcr Îļþ¿ÉÒÔʹÓÃdelphi×Ô´øµÄÓ¦Óù¤¾ßimage editor±à¼¡£¿´µÃ²»Ë¬µÄ»°¿ÉÒÔ×Ô¼º»¸öͼ±ê´úÌæ¡£
ÎÒ×Ô¼ºÊÇÀÁµÃÈ¥»Í¼±êÁË¡£ÄÑ¿´¾ÍÄÑ¿´Á˰ɡ£
Ïà¹ØÎĵµ£º
»ñµÃÍø¿¨µÄMACµØÖ·ÔÚºÜ¶àµØ·½¶¼ÓкܴóµÄÓô¦,ÏÂÃæµÄº¯ÊýÒÔXX-XX-XX-XX-XX-XX µÄ¸ñʽ·µ»ØÔ¶³Ì»ò±¾µØ»úÆ÷µÄMACµØÖ·¡£
Function to return the MAC address of a remote or local machine in the format XX-XX-XX-XX-XX-XX
·µ»ØµÄMACµØÖ·ÊÇÒ»¸öÄÜÓÃÔÚ¶à¸ö·½ÃæµÄΨһ±êʶ¡£Ê¹Ó÷½·¨£º
ShowMessage(GetMacAddress( ......
ʲôÊÇÁ÷£¿Á÷,¼òµ¥À´Ëµ¾ÍÊǽ¨Á¢ÔÚÃæÏò¶ÔÏó»ù´¡ÉϵÄÒ»ÖÖ³éÏóµÄ´¦ÀíÊý¾Ý
µÄ¹¤¾ß¡£ÔÚÁ÷ÖУ¬¶¨ÒåÁËһЩ´¦ÀíÊý¾ÝµÄ»ù±¾²Ù×÷£¬Èç¶ÁÈ¡Êý¾Ý£¬Ð´ÈëÊý¾ÝµÈ£¬
³ÌÐòÔ±ÊǶÔÁ÷½øÐÐËùÓвÙ×÷µÄ£¬¶ø²»ÓùØÐÄÁ÷µÄÁíһͷÊý¾ÝµÄÕæÕýÁ÷Ïò¡£Á÷²»
µ«¿ÉÒÔ´¦ÀíÎļþ£¬»¹¿ÉÒÔ´¦Àí¶¯Ì¬ÄÚ´æ¡¢ÍøÂçÊý¾ÝµÈ¶àÖÖÊý¾ÝÐÎʽ¡£Èç¹ûÄã¶Ô
Á÷µÄ²Ù×÷·Ç³£ÊìÁ·£¬ÔÚ³ ......
@·ûºÅ·µ»ØÒ»¸ö±äÁ¿µÄµØÖ·
Àý£º
var
f:string;
p:^string; //ÉùÃ÷Ò»¸ö×Ö·û´®ÀàÐ͵ÄÖ¸Õë
begin
f ='demo'; ......
The built-in assembler allows you to write assembly code within Delphi programs. It has the following features:
ÄÚǶµÄ»ã±àÆ÷ÔÊÐíÔÚdelphi³ÌÐòÖÐÊéд»ã±à´úÂ룬ËûÓÐÈçÏÂÌØÐÔ£º
Allows for inline assembly
ÔÊÐíÄÚǶ»ã±à
Supports all instructions found in the Intel Pentium III, In ......
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB,comobj, OleServer,
ExcelXP;
type
TForm1 = class(TForm)
ADOConn: TADOConnection;
& ......