Delphi ÖÐDLLµÄµ÷Óü¼ÇÉ
ÌáÆðDLLÄúÒ»¶¨²»»áİÉú£¬ÔÚWindowsÖÐÓÐ×Å´óÁ¿µÄÒÔDLLΪºó׺µÄÎļþ£¬ËüÃÇÊDZ£Ö¤WindowsÕý³£ÔËÐкÍά»¤Éý¼¶µÄÖØÒª±£Ö¤¡££¨¾Ù¸öÀý×Ó£¬±ÊÕßµÄWin95 SystemĿ¼Ï¾¡ÓÐ500¶à¸öDLLÎļþ¡££©Æäʵ£¬DLLÊÇÒ»ÖÖÌØÊâµÄ¿ÉÖ´ÐÐÎļþ¡£ËµËüÌØÊâÖ÷ÒªÊÇÒòΪһ°ãËü¶¼²»ÄÜÖ±½ÓÔËÐУ¬ÐèÒªËÞÖ÷³ÌÐò±ÈÈç*.EXE³ÌÐò»òÆäËûDLLµÄ¶¯Ì¬µ÷ÓòÅÄܹ»Ê¹Ó᣼òµ¥µÄ˵£¬ÔÚͨ³£Çé¿öÏÂDLLÊǾ¹ý±àÒëµÄº¯ÊýºÍ¹ý³ÌµÄ¼¯ºÏ¡£
ʹÓÃDLL¼¼ÊõÖ÷ÒªÓÐÒÔϼ¸¸öÔÒò£º
Ò»¡¢¼õС¿ÉÖ´ÐÐÎļþ´óС¡£
¡¡¡¡DLL¼¼ÊõµÄ²úÉúÓкܴóÒ»²¿·ÖÔÒòÊÇΪÁ˼õС¿ÉÖ´ÐÐÎļþµÄ´óС¡£µ±²Ù×÷ϵͳ½øÈëWindowsʱ´úºó£¬Æä´óСÒѾ´ïµ½¼¸Ê®Õ×ÄËÖÁ¼¸°ÙÕס£ÊÔÏëÈç¹û»¹ÊÇʹÓÃDOSʱ´úµÄµ¥Ö´ÐÐÎļþÌåϵµÄ»°Ò»¸ö¿ÉÖ´ÐÐÎļþµÄ´óС¿ÉÄܽ«´ïµ½ÊýÊ®Õ×£¬ÕâÊÇ´ó¼Ò¶¼²»ÄܽÓÊܵġ£½â¾öµÄ·½·¨¾ÍÊDzÉÓö¯Ì¬Á´½Ó¼¼Êõ½«Ò»¸ö´óµÄ¿ÉÖ´ÐÐÎļþ·Ö¸î³ÉÐí¶àСµÄ¿ÉÖ´ÐгÌÐò¡£
¶þ¡¢ÊµÏÖ×ÊÔ´¹²Ïí¡£
¡¡¡¡ÕâÀïÖ¸µÄ×ÊÔ´¹²Ïí°üÀ¨ºÜ¶à·½Ã棬×î¶àµÄÊÇÄÚ´æ¹²Ïí¡¢´úÂë¹²ÏíµÈµÈ¡£ÔçÆÚµÄ³ÌÐòÔ±¾³£Åöµ½ÕâÑùµÄÊÂÇ飬ÔÚ²»Í¬µÄ±à³ÌÈÎÎñÖбàдͬÑùµÄ´úÂë¡£ÕâÖÖ·½·¨ÏÔÈ»ÀË·ÑÁ˺ܶàʱ¼ä£¬ÎªÁ˽â¾öÕâ¸öÎÊÌâÈËÃDZàдÁ˸÷ÖÖ¸÷ÑùµÄ¿â¡£µ«ÓÉÓÚ±à³ÌÓïÑԺͻ·¾³µÄ²»Í¬ÕâЩ¿âÒ»°ã¶¼²»ÄÜͨÓ㬶øÇÒÓû§ÔÚÔËÐгÌÐòʱ»¹ÐèÒªÕâЩ¿â²ÅÐУ¬¼«²»·½±ã¡£DLLµÄ³öÏÖ¾ÍÏñÖÆ¶¨ÁËÒ»¸ö±ê×¼Ò»Ñù£¬Ê¹ÕâЩ¿âÓÐÁËͳһµÄ¹æ·¶¡£ÕâÑùÒ»À´£¬Óò»Í¬±à³ÌÓïÑԵijÌÐòÔ±¿ÉÒÔ·½±ãµÄʹÓÃÓñðµÄ±à³ÌÓïÑÔ±àдµÄDLL¡£ÁíÍ⣬DLL»¹ÓÐÒ»¸öÍ»³öµÄÌØµã¾ÍÊÇÔÚÄÚ´æÖÐÖ»×°ÔØÒ»´Î£¬ÕâÒ»µã¿ÉÒÔ½ÚÊ¡ÓÐÏÞµÄÄڴ棬¶øÇÒ¿ÉÒÔͬʱΪ¶à¸ö½ø³Ì·þÎñ¡£
Èý¡¢±ãÓÚά»¤ºÍÉý¼¶¡£
¡¡¡¡Ï¸ÐĵÄÅóÓÑ¿ÉÄÜ·¢ÏÖÓÐһЩDLLÎļþÊÇÓа汾˵Ã÷µÄ¡££¨²é¿´DLLÎļþµÄÊôÐÔ¿ÉÒÔ¿´µ½£¬µ«²»ÊÇÿһ¸öDLLÎļþ¶¼ÓУ©ÕâÊÇΪÁ˱ãÓÚά»¤ºÍÉý¼¶¡£¾Ù¸öÀý×Ó°É£¬ÔçÆÚµÄWin95ÖÐÓÐÒ»¸öBUGÄǾÍÊÇÔÚÈòÄê²»ÄÜÕýÈ·ÏÔʾ2ÔÂ29ÈÕÕâÒ»Ìì¡£ºóÀ´£¬Microsoft·¢²¼ÁËÒ»¸ö²¹¶¡³ÌÐò¾ÀÕýÁËÕâ¸öBUG¡£ÖµµÃÒ»ÌáµÄÊÇ£¬ÎÒÃDz¢Ã»ÓÐ֨װWin95£¬¶øÊÇÓÃа汾µÄDLL´úÌæÁ˾ɰ汾µÄDLL¡££¨¾ßÌåÊÇÄÄÒ»¸öDLLÎļþ±ÊÕßһʱÏë²»ÆðÀ´ÁË¡££©ÁíÒ»¸ö³£¼ûµÄÀý×ÓÊÇÇý¶¯³ÌÐòµÄÉý¼¶¡£ÀýÈç£¬ÖøÃûµÄDirectX¾Í¶à´ÎÉý¼¶£¬ÏÖÔÚÒѾ·¢Õ¹µ½ÁË6.0°æÁË¡£¸üÃîµÄÊÇ£¬µ±ÎÒÃÇÊÔͼ°²×°½ÏµÍ°æ±¾µÄDLLʱ£¬ÏµÍ³»á¸øÎÒÃÇÌáʾ£¬±ÜÃâÈËΪµÄ²Ù×÷´íÎó¡£ÀýÈçÎÒÃÇÉý¼¶Ä³Ó²¼þµÄÇý¶¯³ÌÐòʱ£¬¾³£Åöµ½WindowsÌáʾÎÒÃǵ±Ç°°²×°µÄÇý¶¯³ÌÐò±ÈÔÀ´µÄÇý¶¯³ÌÐò¾É¡£
ËÄ¡¢±È½Ï°²È«¡£
¡¡¡¡ÕâÀï˵µÄ°²È«Ò²°üÀ¨ºÜ¶à·½Ãæ¡£±
Ïà¹ØÎĵµ£º
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OleCtrls, SHDocVw, ExtCtrls,MSHTML;
type
TForm1 = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
Edit1: TEdit;
&nb ......
delphiÈ«¾Ö±äÁ¿µÄ¶¨ÒåÓ븳ֵÖ÷ÒªÓÐÏÂÃæ¼¸ÖÖ·½·¨£º
1.
È«¾Ö±äÁ¿µÄ³õʼ»¯
ÔÚ×îºó½áÊøµÄend.֮ǰ,Ôö¼Óinitialization¹Ø¼ü×Ö,È»ºó¼ÓÈë¶ÔÈ«¾Ö±äÁ¿µÄ³õʼ»¯,ÕâÑù¾Í¿ÉÒÔ³õʼ»¯È«¾Ö±äÁ¿ÁË.²»ÂÛÔÚinterface»¹ÊÇÔÚimplementation²¿·ÖµÄÈ«²¿±äÁ¿,¶¼¿ÉÒÔÕâôÀ´³õʼ»¯
//Ê¡ÂÔÇ°ÃæµÄinterface, uses, type.
var
i: Integer;
......
DelphiµÄTThreadÀà
http://bigpower.blog.51cto.com/209892/89525
ÎÒÃdz£Óй¤×÷Ï̺߳ÍÖ÷Ïß³ÌÖ®·Ö£¬¹¤×÷Ï̸߳ºÔð×÷һЩºǫ́²Ù×÷£¬±ÈÈç½ÓÊÕÓʼþ£»Ö÷Ï̸߳ºÔð½çÃæÉϵÄһЩÏÔʾ¡£¹¤×÷Ï̵߳ĺô¦ÔÚijЩʱºòÊDz»ÑÔ¶øÓ÷µÄ£¬ÄãµÄÖ÷½çÃæ¿ÉÒÔÏìÓ¦ÈκβÙ×÷£¬¶ø±³ºóµÄÏß³ÌÈ´ÔÚĬĬµØ¹¤×÷¡£
VCLÖУ¬¹¤×÷Ïß³ÌÖ´ÐÐÔÚExecute·½·¨ÖÐ ......
ͼÏñÐýת£¬ÊÇÖ¸°´ÕÕ¸ø¶¨µÄ½Ç¶È£¬¼ÆËã³öͼÏñÿ¸öÏñËØ×ø±êµãÔÚÐÂͼÏñÉϵÄ×ø±êλÖ㬴ӶøÊµÏÖÕû¸öͼÏñ×ø±ê±ä»»µÄͼÏñ´¦ÀíÊֶΡ£ÆäÏñËØ×ø±êµÄ±ä»»¹«Ê½Îª£º
(1)¡¢x' = x * cos(angle) + y * sin(andle)
y' = ......
ÍøÉÏËѼ¯×ÊÁÏ ²Î¿¼Ð´µÄ´úÂë ʵÏֿؼþµÄ¶¯Ì¬´´½¨ ÍêÕû´úÂëÈçÏ£º
(ʵÏÖ½çÃæ)
-------------------
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, ComCtrls;
type
TControlClass =class ......