Delphi×é¼þ¿ª·¢¹ý³ÌÖÐÅöµ½µÄ¹ÖÎÊÌâ
Çó½Ì¸ßÊÖ£ºÎÒ°´ÏÂÃæµÄ´úÂë×öÁ˸ö²âÊÔ£¬·¢ÏÖ×齨TT2ÔÚÊôÐÔ¶Ô»°¿òÖÐÉèÖÃMyFontÓÐЧ£¬¶øÔËÐеÄʱºò×ÖÌåÓÖ»¹ÔÁË£¬¸ãÁËÒ»ÌìÁËÒ²²»ÖªµÀΪʲô£¬»¹Íû¸ßÈËÖ¸µãһϣ¬Ð»Ð»ÁË£¡
unit T1;
interface
uses
SysUtils, Classes, Controls, ExtCtrls, Graphics, StdCtrls;
type
TT1 = class(TPanel)
private
FFont:TFont;
procedure SetFont(const Value: TFont);
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
procedure SetLayout;virtual;
published
property MyFont:TFont read FFont write SetFont;
end;
TT2=class(TT1)
private
FLabel:TLabel;
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
procedure SetLayout;override;
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('MyTest', [TT2]);
end;
{ TT1 }
constructor TT1.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FFont:=TFont.Create;
FFont.Assign(inherited Font);
end;
<
Ïà¹ØÎÊ´ð£º
Delphi ÏñÍö¹úµÄÄÏËΣ¬ÊÔÎÊÕâÓïÑÔ»¹ÓÐǰ;Âð£¿
Win32¿ª·¢²»ÈçC#£»
ÃæÏñ¶ÔÏñ¿ª·¢²»ÈçJAVA£»
ϵͳ¿ª·¢²»ÈçVC++6.0£»
ÄÜÓÃÐÔ²»ÈçVB6.0£»
²»Ö§³ÖWeb¿ª·¢¡£¡£¡£
³ö¸öDelphi 2010Ãâ·ÑÒ»Äê»áÓÐÈËÓÃÂð£¿
......
Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
begin
case wParam of
WM_KEYDOWN:
fEatKeystroke := (p.vkCode = VK_RETURN);
& ......
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
ÕâÓïÑÔºÃÄѰ¡ ѧdelphi¼òµ¥ ¿Þ
Ò»¸ödll ºÍÒ»¸ö Ö¸Õ뺯Êýµ÷Óà ¸ãÁËÎÒ2Àñ°Ý »¹ÊÇÔÚÎÒÓÐdelphi»ù´¡µÄÇé¿öÏ ¿Þ
ÄÑ¶È ±È delphi ¸ßºÜ¶à¡£¼ÌÐøÅ¬Á¦Ñ§°¡¡£
ºÃÏñÒ²²¢²»±ÈdelphiÄѶàÉÙ°É
Ö÷Òª´úÂë ²»Ö±¹ÛÁË¡ ......
ÈçºÎʵÏÖdelphi Ìá½»±íµ¥
ÎÒµÄ˼·ÊÇ webbrowser1 ´ò¿ª ¹È¸è
È»ºó Êó±ê µã»÷µ½ ËÑË÷ÀïÃæ
È»ºó ÊäÈë ÒªËÑË÷µÄ¹Ø¼ü×Ö È»ºó µã»÷ ËÑË÷
ÎÒÏÖÔÚ¾ÍÊÇ ÈçºÎ ÌíÈë ÒªËÑË÷µÄ¹Ø¼ü×Ö ²»» ......