DelphiÏà¹ØÎÊÌâ - Delphi / ÓïÑÔ»ù´¡/Ëã·¨/ϵͳÉè¼Æ
ÔÚ°²×°Íê³ÉDelphiµÄʱºò£¬´ò¿ªDelphi½øÈë´°¿Ú£¬µãÔËÐеÄʱºòΪʲô×Ô¶¯Í£Ö¹ÔËÐÐÁË¡£
ʲôÒâ˼£¬ÊÇн¨µÄÓ¦ÓÃÔËÐÐÍ£Ö¹£¬»¹ÊdzÌÐòÍ£Ö¹ÁËÄØ¡£ ûÃ÷°×LZÒâ˼~~ÒýÓà ÔÚ°²×°Íê³ÉDelphiµÄʱºò£¬´ò¿ªDelphi½øÈë´°¿Ú£¬µãÔËÐеÄʱºòΪʲô×Ô¶¯Í£Ö¹ÔËÐÐÁË¡£ ÊÇ consonle ÏµĻ¹ÊÇ£¿ ¾ÍÊÇÀýÈçн¨ÁËÒ»¸öform´°Ì壬ÉÏÃæ·½Á˼¸¸ö¿Ø¼þ£¬Õâ¸öʱºòµãÔËÐУ¡~°´ÀíÓ¦¸Ã»á³öÏÖÎÒ½¨µÄ½¨µÄÄǸö´°¿ÚÓë¿Ø¼þ£¬µ«µãÔËÐа´¼þµÄʱºò£¬Ö±½Ó¾ÍÍ£Ö¹ÁËÔËÐС££¨Òâ˼ÊǸù±¾Ã»Óп´µ½ÔËÐнá¹û¾ÍÍ£Ö¹ÁË£© Ìù¹¤³Ì²¿·ÖµÄ´úÂë¿´Ï£®¡¡¿ÉÄÜÊÇ°Ñ Application.CreateForm ¸øÈ«É¾Á˰ɣ® Ä¿標exeÊÇ·ñÒÑ運ÐУ¬ÈôÓУ¬ÏÈ關閉 unit sd1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DB, ADODB; type TF_zct = class(TForm) Edit1: TEdit; Edit2: TEdit; ADOConnection1: TADOConnection; Label1: TLabel; Label2: TLabel; Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var F_zct: TF_zct; implementation {$R *.dfm} procedure TF_zc
Ïà¹ØÎÊ´ð£º
³ÌÐòʹÓõÄÊÇOrcalÊý¾Ý¿â£¬Ï붨ÆÚ£¨Ã¿¼¾¶È£©¶ÔÊý¾Ý¿â½øÐб¸·Ý£¬Ã»É¶Í·Ð÷£¬ÇëÎÊÓ¦¸ÃÔõôŪ£¿ ÓÐÊ²Ã´ÌØÊâÒªÇóÂ𣬱ÈÈçҪǰ¶Ë½çÃæ£¿ Ò»°ãÓÃÊý¾Ý¿â×Ô´øµÄ¡°¼Æ»®ÈÎÎñ¡±ÅäÖÃһϾ͹»ÁË Ã»ÓÐÊ²Ã´ÌØÊâÒªÇó¡£ÀýÈ磬ֻҪµ ......
//DLL ·ÅÔÚEXEÖÐûÎÊÌâ function SkinForm(var skfrm:TForm):Integer;stdcall; var skf:TbsBusinessSkinForm; nskfrm:TForm; begin frmUUMain:=skfrm; skf:=TbsBus ......
¸÷λºÃ£¡£¡ ¼ÙÉèÎÒÓÐÁ½¸ötextÎļþ Ò»¸öÃû½Ð 1.text ÄÚÈÝ£º I like PC.... ÁíÍâÒ»ÊÇ2.text ÄÚÈÝ: function yk as string endfunction globals endglobals ***********************·Ö½çÏß********** ......
ÀÏʦ²¼ÖÃÁËÒ»¸ö¿ÎÌ⣬ÐèÒªÓÃDelphi×öÒ»¸öÓ°ÔºÊÛÆ±¹ÜÀíϵͳ£¬µ«ÊÇÎÒÃÇ»¹Ã»ÓÐѧ¹ýDelphi£¬¸÷λ¸ßÊÖÄÜ·ñÖ¸µãһϣ¬ÈçºÎ½øÐÐϵͳÉè¼Æ£¬Ê±¼ä±È½Ï½ô¼±£¬Ð»Ð»°¡ ÎÒÒ²²»¶®£¬Ò²Ïëѧ£¡ ÎÒÒ²Êǰ¡£¬¸Ð¾õDelphiͦºÃµÄ£¬ÏÖ ......
ÇëÎÊÄÄλ´óÉñÄܰïÎÒ¿´¿´ÎÒÕâ¾äתµÃ¶Ô²»¶Ô ÀÏÊÇ»á³ö´í¡£ vc: C/C++ code: DWORD WINAPI debugProc(LPVOID lpParameter ) { if(debuger1.caozuo==1) { ......