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

¼òµ¥µÄdelphi´úÂ룬ÇëÀÏÄñ¸ø²ËÄñÖ¸Õý£¡

ÎҵĴúÂ룬´ó¼Ò°ï¿´ÏÂÄÄÀï³ö´íÁË£¡ÎÒÊÇÐÂÊÖÇë¸÷λ¸ßÈËÖ¸½Ì£¡
var
zbwnd,qtwnd:=hwnd;
st:string;
st:='hao123£­£­ÎÒµÄÉÏÍøÖ÷Ò³ - Microsoft Internet Explorer'£»
zbwnd:=findwindow(nil,pchare(st));
qtwnd:=GetForegroundWindow;
if zbwnd <> qtwnd then
showmessage('ûÓÐ×°±¸¡¯)£»
else
showmessage('×°±¸ÕÒµ½¡¯)£»
end;
qtwnd:=hwnd; ..
pchare ..
'ûÓÐ×°±¸¡¯..

if zbwnd <> qtwnd then
showmessage('ûÓÐ×°±¸¡¯)
else
showmessage('×°±¸ÕÒµ½¡¯)£»


ÄãµÄbeginÄÄÈ¥ÁË£¿

elseǰ²»ÄÜÓзֺ𣡣¡£

Â¥Ö÷¿´Ò»Ð©»ù´¡½Ì³Ìû£¿

ûbegin£¬¶¨Òå±äÁ¿Ò²´íÁË¡£¡£


Ïà¹ØÎÊ´ð£º

ACCESSµÄ×Ô¶¨Ò庯ÊýÔÚdelphiÀïÔõôÓÃÄØ...

ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()

¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...

Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!


(ÔÚA ......

СµÜ²»»áDELPHI£¬Çë´óÏÀÃǰï¸öæ

Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
  begin
    case wParam of
      WM_KEYDOWN:
      fEatKeystroke := (p.vkCode = VK_RETURN);
  & ......

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

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

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

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

Delphi ʹÓÃshockwaveflash¿Ø¼þµÄÎÊÌâ

ÎÒдÁ˸öС³ÌÐò£¬ÉÏÃæÌí¼ÓÁËÒ»¸öshockwaveflash¿Ø¼þ£¬È»ºóÔÚmovieÀïдÈëswfÎļþµÄ·¾¶£¬È»ºóÖ´ÐÐûÓÐÎÊÌâ¡£
µ±ÎÒ°ÑÕâ¸ö³ÌÐò×ªÒÆµ½Áíһ̨µçÄÔÖ´ÐÐʱ£¬ shockwaveflash ¿Ø¼þÏÔʾ¿Õ°×¡£Ò²¾ÍÊÇûÓмÓÔØÄǸöswfÎļþ¡£ ......

DelphiÓï·¨³ö´íµÄÆæ¹Ö

if (svSearch.head.Flag = $C8BD3 ) then
      if (svSearch.head.Type = 3) then
      begin
        bSearchSv := TRUE;
      ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ