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

Delphi´°Ìåµ½µ×ÈçºÎ²ÅÄÜÒþ²Ø£¿

ÔÚÍøÉÏËÑÁ˺ܶ෽·¨£¬¸Ð¾õ¶¼²»ºÃÓá£
ÓÐ˵ÓÃForm1.HideµÄ£¬µ«ÊÇÎÒ·¢ÏÖÕâ¸ö¸ù±¾Ã»Óá£
ÓÐ˵ÓÃshowwindow(application.handle,sw_hide);  µÄ£¬Ò²²»ÐС£
ÓÐ˵
ÔÚ¹¤³ÌÎļþµÄ 
  Application.Run£» 
  Ç°Ãæ¼ÓÉÏ 
  Application.ShowMainForm:=False;  µÄ£¬Õâ¸öµ¹ÊÇ¿ÉÒÔÒþ²Ø£¬¾ÍÊÇ´°ÌåÉÏÃæµÄWebBrowser¿Ø¼þÓò»ÁËÁË¡£

ÆÚ´ý¸ßÊÖ¸øÒ»¸öÍêÃÀµÄ½â¾ö°ì·¨°¡¡£

procedure TForm1.FormCreate(Sender: TObject);
begin
  Self.WebBrowser1.Navigate('WWW.SINA.COM');
  Windows.SetParent(WebBrowser1.Handle, 0);
end;

  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.ShowMainForm:=False;
  Application.Run;



ÄãÊÇÏëҪʵÏÖ´°Ìå͸Ã÷°É
ÔÚinterfaceµÄprivateÀï¼ÓÈë 
   
  PROCEDURE  CMEraseBkgnd(var  Message:TWMEraseBkgnd);Message  WM_ERASEBKGND; 
   
  ÔÚimplemetationÀï¼ÓÈë 
  PROCEDURE  Tform1.CMEraseBkgnd(var  Message:TWMEraseBkgnd); 
  BEGIN 
      brush.style:=bsClear; 
      Inherited; 
  END; 


ÒýÓÃ
procedure TForm1.FormCreate(Sender: TObject);
begin
  Self.


Ïà¹ØÎÊ´ð£º

delphi編寫×Ô動¸üгÌÐò

ÓÉÓÚ¿Í戶¶ËÓеÄÎļþ經³£¸üУ¨遠³ÌµÄ£¬²»ÊǾÖÓò網£©£¬
ËùÒÔÏë寫個×Ô動¸üÐ嵀 ³ÌÐò¡£
¿´網É쵀 ·½·¨資ÁÏ£¬ÖªµÀЩ·½·¨£¬µ«²»ÖªµÀ¾ß體Ôõô寫¡£
......

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

Çë½Ì¹ØÓÚDelphiµÄÊ÷Ðοؼþ

ÇëÎÊDelphiÓÐÊ÷ÐοؼþÂð£¿
ÔõÑùʹÓã¿
Ttreeview 
 treeview.items.addchild(nil(Éϼ¶½Úµã),'°¸·¢Ê±·¢'(text));

raize ¿Ø¼þ°üÀïÃæÓУ¬csdnÓÐÏÂÔØµÄ

²é°ïÖúTTreeViewºÍTNodeÁ½¸öÀà

TTreeView ......

¹ØÓÚ±ÜÃâdelphi°æÈ¨»òÕßÊÕÂÉʦº¯µÄ·½°¸¡£

×î½ü»»Á˼ҹ«Ë¾£¬ÓôÃÆµÄÊǹØÓÚDelphiµÄÎÊÌ⣬¹«Ë¾Ö®Ç°ÓõÄÒ²ÊÇD°æDelphi7ÆóÒµ°æµÄ¡£ºóÀ´±»ËÍÁËÂÉʺ¯ÒԺ󣬾ÍÇ¿ÖÆ¸ÄÓÃDelphi7¸öÈ˰棬¾ç˵Õâ¸ö°æ±¾ÊÇÃâ·Ñ°æ£¬»òÕß˵ºÜ±ãÒË£¬Èç¹û²é³öÀ´£¬¾ÍÂò¸öºÃÁË¡£ÕâÏ¿ɺ᣿àÁËÎ ......

ÇóÒ»¶Îdelphi´úÂëתC#´úÂ룬¼±Ó㬿ÉÈËÃñ±ÒÖ§¸¶£¬Ð»Ð»

¼±Óá£ÁªÏµQQ£º8775262£¬Ð»Ð»¡£
ÐèÒª½øÐÐDllImportµÄµØ·½Ö±½ÓдDLLImport.·½·¨Ãû¡£
È磺DLLImport.GlobalAddAtom(¡­¡­);
Îļþ£ºUShare.pas
Delphi(Pascal) code:

unit UShare;
interface
uses Windows, Me ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ