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

delphiÄÜɾ³ý¶¯Ì¬Éú³ÉµÄ¿Ø¼þÂð?

delphiÄÜɾ³ý¶¯Ì¬Éú³ÉµÄ¿Ø¼þÂð?
µ±È»¿ÉÒÔ

ÄܸæËßһϲ»?

ÄãµÄÎÊÌâºÜ³éÏó
ʵÀýɾ³ý¶¯Ì¬´´½¨µÄBUtton

´´½¨
  BB := TButton.Create(self);
  BB.Parent := self;

ɾ³ý
  BB.Free;


Delphi(Pascal) code:

ÏÈÉùÃ÷Ò»¸öEditÊý×飬¿ÉÒÔÊǾ²Ì¬µÄÒ²¿ÉÒÔÊǶ¯Ì¬µÄ±ÈÈç AEdit: array of TEdit;
//´´½¨
Count := 10;
SetLength(AEdit,Count+1);
for i:=1 to Count do
begin
EditName := 'Edit' + IntToStr(i);
AEdit[i] := TEdit.Create(Self);
AEdit[i].Parent := Self;
if i = 1 then
begin
AEdit[i].Top := Top;
end
else if i > 1 then
begin
AEdit[i].Top := Top + 10;
end;
AEdit[i].Left := 405;
AEdit[i].Width := 100;
AEdit[i].Height := 14;
AEdit[i].AutoSize := False;
AEdit[i].Name := EditName;
AEdit[i].OnKeyDown := EditKeyDown;
//ÊÍ·Å
for i:=1 to Count do
begin
EditName := 'Ed


Ïà¹ØÎÊ´ð£º

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

DELPHIÕâÖÖÇé¿öÔõô°ì£¿ - Delphi / Windows SDK/API

¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......

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

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

unit UShare;
interface
uses Windows, Me ......

Delphi½øÏú´æÅ̵ãά»¤ ÅÌÓ¯¿÷¹¦ÄÜ

ÏëÇëÎʸ÷λ£ºÅ̵ãά»¤ÀïÃæ£ºÅÌÓ¯¿÷ÊýÁ¿=¿â´æÊýÁ¿+Èë¿âÊýÁ¿-³ö¿âÊýÁ¿£¬ÕâÑù×öÊǶԵÄÂð£¬

Â¥ÉÏÕý½â,ÕýÊýÅÌÓ¯ ¸ºÊýÅÌ¿÷

һ¥ÕýÈ·£¡

лл¸÷λÀ²

¾ÍÊÇ£ºÊDz»ÊÇ Êµ¼Ê¿â´æÀïµÄ¿â´æÁ¿ ÓëÄãÊÖ¶¯Êä½øÈ¥µÄÊýÁ¿Ö®¼äµ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ