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

DELPHIÓÃFindWindow¡¢FindWindowEx ²éÕÒ´°¿Ú

FindWindow(
lpClassName, {´°¿ÚµÄÀàÃû}
lpWindowName: PChar {´°¿ÚµÄ±êÌâ}
): HWND; {·µ»Ø´°¿ÚµÄ¾ä±ú; ʧ°Ü·µ»Ø 0}
//FindWindowEx ±È FindWindow ¶à³öÁ½¸ö¾ä±ú²ÎÊý:
FindWindowEx(
Parent: HWND; {Òª²éÕÒ×Ó´°¿ÚµÄ¸¸´°¿Ú¾ä±ú}
Child: HWND; {×Ó´°¿Ú¾ä±ú}
ClassName: PChar; {}
WindowName: PChar {}
): HWND;
{
Èç¹û Parent ÊÇ 0, Ôòº¯ÊýÒÔ×ÀÃæ´°¿ÚΪ¸¸´°¿Ú, ²éÕÒ×ÀÃæ´°¿ÚµÄËùÓÐ×Ó´°¿Ú;
Èç¹û ÊÇ HWND_MESSAGE, º¯Êý½ö²éÕÒËùÓÐÏûÏ¢´°¿Ú;
×Ó´°¿Ú±ØÐëÊÇ Parent ´°¿ÚµÄÖ±½Ó×Ó´°¿Ú;
Èç¹û Child ÊÇ 0, ²éÕÒ´Ó Parent µÄµÚÒ»¸ö×Ó´°¿Ú¿ªÊ¼;
Èç¹û Parent ºÍ Child ͬʱÊÇ 0, Ôòº¯Êý²éÕÒËùÓеĶ¥²ã´°¿Ú¼°ÏûÏ¢´°¿Ú.
}
//²âÊÔ1: ÊÔ×ÅÕÒÕÒн¨³ÌÐòÖ÷´°¿ÚµÄ¾ä±ú
var
h: HWND;
begin
{ÏÖÔÚÎÒÃÇÖªµÀ´°¿ÚµÄ±êÌâÊÇ: Form1¡¢´°¿ÚµÄÀàÃûÊÇ: TForm1}
h := FindWindow('TForm1', 'Form1');
ShowMessage(IntToStr(h)); {656180; ÕâÊÇËæ»ú, ÿ´ÎÆô¶¯´°¿Ú¿Ï¶¨²»Ò»Ñù}
{¼ÙÈç²»ÖªµÀÀàÃû}
h := FindWindow(nil, 'Form1');
ShowMessage(IntToStr(h)); {656180}
{¼ÙÈç²»ÖªµÀ±êÌâÃû}
h := FindWindow('TForm1', nil);
ShowMessage(IntToStr(h)); {656180}
{ÆäʵÕâ¸ö´°¿ÚµÄ¾ä±ú²»¾ÍÊÇ Self.Handle Âð}
ShowMessage(IntToStr(Handle)); {656180}
end;
//²âÊÔ2: ÕÒ¼ÆËãÆ÷´°¿ÚµÄ¾ä±ú(ÏÈ´ò¿ª¼ÆËãÆ÷)
var
h: HWND;
begin
{Èç¹û²»ÊǼòÌåÖÐÎÄϵͳ, ÕâÑù¿ÉÄܲ»Áé}
h := FindWindow(nil, '¼ÆËãÆ÷');
ShowMessage(IntToStr(h)); {1508334}
{×îºÃÕâÑù, µ«ÄãµÃÌáǰ֪µÀ¼ÆËãÆ÷´°¿ÚµÄÀàÃûÊÇ: SciCalc}
h := FindWindow('SciCalc', nil);
ShowMessage(IntToStr(h)); {1508334}
end;


Ïà¹ØÎĵµ£º

DELPHI TXMLDocument¶ÁÈ¡XML³öÏÖÂÒÂëµÄÎÊÌâ

XMLÎļþ
<?xml version="1.0" encoding="utf-8"?>
.......
ÒòΪԭÒòºÜ¶à£¬ËùÒÔÕâ¸ö·½·¨²»Ò»¶¨Äܽâ¾öÎÊÌâ
XMLDocument1.LoadfromFile('test.XML');
XMLDocument1.Active:=TRUE;
XMLDocument1.Encoding:='gb2312';
memo1.Text:=XMLDocument1.XML.Text; ......

Wma ¸ñʽ¸èÇúÐÅÏ¢Îļþ½á¹¹£¬¸½¶ÁдÀࣨDelphi£©

Wma ¸ñʽ¸èÇúÐÅÏ¢Îļþ½á¹¹£¬¸½¶ÁдÀࣨDelphi£©
linle @ 2006-05-01 13:10
ÒÔǰµÄÒ»µãÑо¿£¬¹«¿ªºÃÁË£¬ÓÐʲôÒÉÎÊ¿ÉÒÔºÍÎÒÌÖÂÛ
Èý¸ö¶àÔÂǰµÄ´úÂ룬£¬±È½ÏÓ×ÖÉ£¬´ó¼Ò½«¾ÍһϰÉ
Îļþ½á¹¹Ê¾Òâͼ
¸ñʽµÄ¼òµ¥ËµÃ÷£º
        Èçͼ1£¬Ã¿Ò»¸öWMAÎļþ£¬ËüµÄÍ·16¸ö×Ö½ÚÊǹ̶¨µÄ£¬ÎªÊ®Áù½øÖ ......

delphi±£´æ¶ÁÈ¡utf 8µÄÎı¾Îļþ

delphi±£´æ¶ÁÈ¡utf-8µÄÎı¾Îļþ
¸ø¿Í»§×öÁËÒ»¸öÅúÁ¿Ê¶±ðͼÏñ²¢ºÏ³ÉË«²ãpdfµÄ³ÌÐò£¬×îºó¿Í»§ÐèÒªÉú³ÉµÄͬʱ¸½´øÒ»·Ý¼Çʱ¾Îļþ£¬¾ÍÊÇOCR¹ýºóµÄÎı¾£¬²¢Ö¸¶¨utf-8¸ñʽµÄ¡£ÔÚ´¦Àíutf-8ʱ³öÏÖÁ˵ãСÎÊÌ⣬ÏÖÔÚ×ܽáÈçÏÂ
Ê×ÏÈ ÀûÓÃdelphi×Ô´øµÄUTF8Encodeº¯Êý£¬½«ÆÕͨ×Ö·ûת»»Îªutf-8±àÂë
´´½¨Ò»¸öÁ÷£¬MemoryStream»òFileStr ......

Windows API µÄÊý¾ÝÀàÐÍÓë Delphi Êý¾ÝÀàÐͶÔÕÕ±í

Windows API µÄÊý¾ÝÀàÐÍÓë Delphi Êý¾ÝÀàÐͶÔÕÕ±í
×÷Õߣºadmin À´Ô´£ºÎ´Öª ÈÕÆÚ£º2010-1-28 13:10:56 ÈËÆø£º43 ±êÇ©£ºAPI
µ¼¶Á£ºWindowsAPIµÄÊý¾ÝÀàÐÍÓëDelphiÊý¾ÝÀàÐͶÔÕÕ±í
Windows Êý¾ÝÀàÐÍ 
 Delphi Êý¾ÝÀàÐÍ 
ÃèÊö
LPSTR
PAnsiChar
×Ö·û´®Ö¸Õë
LPCSTR
PAnsiChar
×Ö·û´®Ö¸Õë
DWORD
LongWo ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ