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

delphiÖÐÈçºÎÈÃÖ÷°å·äÃùÆ÷·¢³öÉùÒô£¿

ÎÒÔÚ×öÒ»¸ö±¨¾¯µÄÈí¼þ£¬ÏëÈÃÖ÷°åµÄ·äÃùÆ÷·¢³öÉùÒôÀ´±¨¾¯£¬ÕâÑù¿ÉÒÔÔÚÈÎÒâµÄµçÄÔÉ϶¼ÄÜÔËÐУ¬²»ÓÃÍâÖõÄÒôÏ䣬ÎÒ´ÓÍøÉϲéÁËһЩ×ÊÁÏ£¬ÈËÃǶ¼ÔÚ˵windows.beep»òÕßmessagebeep¿ÉÒÔ£¬¿ÉÊÇmessagebeepÔÚÁ¬½ÓÍâÖÃÒôÏäµÄ»°ÊÇ¿ÉÒÔ·¢³öÉùÒô£¬¿ÉÊÇÈ´²»ÄÜÈÃÖ÷°å·¢Éù£¬windows.beep¸ù±¾¾ÍûÓÐÈκη´Ó¦£¬Á¬ÉÏÒôÏä»òÕß²»Á¬ÒôÏä¶¼ÊÇÒ»µãÉùÒô¶¼Ã»ÓУ¬ÇëÎÊ´ó¼ÒÓÐûÓÐʲô½â¾öµÄºÃ·½·¨°¡£¿
beep Ó¦¸Ã¿ÉÒÔÖ÷°å·¢ÉùµÄ°¡£¬ÎÒÊÔ¹ý°¡£¬ÊDz»ÊÇÆµÂʲ»¶Ô°¡£¿ÄãÔÙgoogle¿´ÄØ

Delphi(Pascal) code:

procedure TForm1.Button1Click(Sender: TObject);
begin
Windows.Beep(440, 1000); {×¢Òâ: Èç¹ûûÓÐ Windows ǰ׺, µ÷ÓõÄÊÇÁíÒ»¸öº¯Êý}
end;


D6+XP home£¬²âÊÔ£ºÖ÷°å¿É·¢Éù

ÎÒÊÔ¹ýÁË£¬Ã»ÓÐÉùÒô£¬¿ÉÊÇÎÒ¿´ÍøÉϺöàÈ˶¼ÔÚ˵Õâ¸öº¯Êý¿ÉÒÔ£¬¿ÉÊÇÎÒÔõô²âÊÔ¶¼Ã»ÓÐЧ¹û£¬²»ÖªµÀÔõô¸ãµÄ£¿

ÎÒÓÃWindows.Beep(440, 1000);²âÊÔ£¬Ö÷°åûÓз¢³öÉùÒô£¬ÎÒµÄÊÇDELPHI 7

Windows.Beep(440, 1000);
ÎÒD7+XP homeÒ²ÓÐÉùÒô°¡£¬
Ö÷°åÔ­Òò£¿£¿

ÎÒÄÃD2010Ò²ÅÜÁËÏ£¬ÓÐÉùÒô£¬
²»Ã÷Ô­Òò£¬µÈ´ý¸ßÊÖ

beepÓ¦¸ÃÊÇÈÃPC SPEAKERÏìµÄ°É£¬ºÍÒôÏ俪û¿ªÓ¦¸ÃûÓйØÏµµÄ£¡


Beep°É£¬ºÍÒôÏìû¹ØÏµ

¿ÉÄÜÊÇÄãµÄPC SPEAKER»µÁË£¬ËùÒÔ²»·¢Éù

¿ÉÊÇÎÒÔÚ±ðÈ˵ĵçÄÔÉϲâÊÔҲûÓÐÉùÒô°¡£¬ÄѵÀ¶¼»µÁËÂð£¬ÕâÖÖ¸ÅÂÊÓ¦¸Ã²»´ó°É£¿

ÒýÓÃ
¿ÉÊÇÎÒÔÚ±ðÈ˵ĵçÄÔÉϲâÊÔҲûÓÐÉùÒô°¡£¬ÄѵÀ¶¼»µÁËÂð£¬ÕâÖÖ¸ÅÂÊÓ¦¸Ã²»´ó°É£¿


ÔÚcmdÏÂÊäÈëctrl+g£¬»Ø³µ¿´¿´Ïì²»Ïì


Ïà¹ØÎÊ´ð£º

delphi ±¾µØ×°ÔØÇý¶¯ - Delphi / Windows SDK/API

delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......

Ç¿ÁÒ½¨ÒéDELPHI°æ¸ü»»´ó°æ - Delphi / ·Ç¼¼ÊõÇø

hongqi162¡¢windindance
´Ë2È˳¤ÆÚ²»ÔÚÏߣ¬ÌرðÊÇwindindance
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
hongqi162»¹ÊǾ­³£ÉÏÀ´×ª×ªµÄ

ÒýÓÃ
¸ü»»ÓÐÄÜÁ¦µÄÈËÉÏ
ÆäʵҲ²»ÊÇʲôÄÜÁ¦µÄÔ­Òò£¬Ö÷Òª¿ÉÄÜÊÇʱ¼äÎÊÌâ°É
¹¤×÷µÄ»¹ÒªÉÏ°à£¬Ñ§Ï ......

jmp,je,jnzÔÚdelphiÖеÄд·¨

function myfun:integer;
var b:pointer;
begin
b:=pointer($6Bc3C6);
asm
  mov eax,[eax]
  xor eax,[ecx+4]
  cmp eax,0
  je @b
 end;
ÕâÑùд±àÒë²»¹ýÈ¥¡£ÇëÎÊÈçºÎ² ......

delphi 2010 dbgrideh EhLib5.0.13 µ¼³öÎļþ³ö´í

Delphi(Pascal) code:

function DBGridEhToExportFile(dbgrideh:TDBGridEh;filename:string='µ¼³öµÄÎļþ'):boolean ;
var ExpClass:TDBGridEhExportClass;
Ext:String;
savedialog1:tsavedialog;
b ......

delphi ÍøÒ³ÖÐ<option> ±êÇ©µÄ·½·¨

ÎÒÏëдһ¸öÔÚ´ò¿ªÍøÒ³ºó£¬ÆäÖÐÍøÒ³ÖÐÓÐÏÂÀ­Áбí¿òÀïÃæÓм¸¸öÖµ£¬ÎÒÔÚÏëÔÚÊÂÏÈ»¹Ã»Óдò¿ªÍøÒ³Ç°Ñ¡Ò»¸öÖµ£¬ÔÚ´ò¿ªÍøÒ³ºó£¬ÍøÒ³ÖÐÕâ¸öÏÂÀ­Áбí¿ò¾ÍÏÔʾÎÒÊÂÏÈѡȡµÄÖµ¡£Ð¡µÜ²»»á£¬Ï£ÍûÄÄλ´óÏÀ³öÊÖÏàÖúһϣ¿£¿£¿£¿£¿
......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ