Wma ¸ñʽ¸èÇúÐÅÏ¢Îļþ½á¹¹£¬¸½¶ÁдÀࣨDelphi£©
Wma ¸ñʽ¸èÇúÐÅÏ¢Îļþ½á¹¹£¬¸½¶ÁдÀࣨDelphi£©
linle @ 2006-05-01 13:10
ÒÔǰµÄÒ»µãÑо¿£¬¹«¿ªºÃÁË£¬ÓÐʲôÒÉÎÊ¿ÉÒÔºÍÎÒÌÖÂÛ
Èý¸ö¶àÔÂǰµÄ´úÂ룬£¬±È½ÏÓ×ÖÉ£¬´ó¼Ò½«¾ÍһϰÉ
Îļþ½á¹¹Ê¾Òâͼ
¸ñʽµÄ¼òµ¥ËµÃ÷£º
Èçͼ1£¬Ã¿Ò»¸öWMAÎļþ£¬ËüµÄÍ·16¸ö×Ö½ÚÊǹ̶¨µÄ£¬ÎªÊ®Áù½øÖƵē30 26 B2 75 8E 66 CF 11 A6 D9 00 AA 00 62 CE 6C”£¬ ÓÃÀ´±êʶÕâ¸öÊÇ·ñΪWMAÎļþ¡£½ÓÏÂÀ´µÄ8¸ö×Ö½ÚΪһ¸öÕûÊý£¬±íʾÕû¸öWMAÎļþÍ·²¿µÄ´óС£¬Õâ¸öÍ·²¿ÀïÃæ°üº¬ÁËTagÐÅÏ¢µÈËùÓзÇÒôƵÐÅÏ¢£¬Í·²¿ºóÃæµÄÊÇÒôƵÐÅÏ¢£¬ÎÒÃÇÔÚÕâÀï¾Í²»ÉîÈëÁ˽âÁË¡£ÄǸöÕûÊý½ÓÏÂÀ´µÄ6¸ö×Ö½Ú»¹Ã»¸ãÇå³þÊÇʲôÓõ쬲»¹ý²»Ó°ÏìÎÒÃǶÔTagÐÅÏ¢µÄ¶Áд¡£
Ò²¾ÍÊÇ˵´ÓÎļþ¿ªÊ¼Æ«ÒÆÁ¿Îª31¿ªÊ¼£¬ÀïÃæ´æ·ÅÁ˺ܶàÖ¡£¬ÓÐÎÒÃÇÐèÒªµÄ±ê×¼TagÐÅÏ¢£¬À©Õ¹TagÐÅÏ¢£¬WMAÎļþ¿ØÖÆÐÅÏ¢µÈµÈ¡£Ã¿¸öÖ¡²»Êǵȳ¤µÄ£¬µ«ÊÇÖ¡Í·Êǹ̶¨µÄ24¸ö×Ö½Ú£¬ÆäÖÐǰ16×Ö½ÚÊÇÓÃÀ´±êʶÕâ¸öÖ¡µÄÃû×Ö£¬ºó8¸ö×Ö½ÚÊÇÓÃÀ´±íʾÕâ¸öÖ¡£¨°üÀ¨Ö¡Í·£©µÄ´óС¡£ÕâÒ»µãºÍMP3ÎļþµÄID3V2ÐÅÏ¢±È½ÏÏñ¡£
ÓÉÓÚÎÒÃÇÖ»ÐèÒª¶ÁдTagÐÅÏ¢£¬¶øTagÐÅÏ¢Óֱַ𱣴æÔÚÁ½¸öÖ¡À·Ö±ðΪ±ê×¼TagÖ¡ºÍÀ©Õ¹TagÖ¡£¬ËùÓÐÎÒÃÇÖ»ÐèÒª´¦ÀíÕâÁ½¸öÖ¡£¬ÆäËûÖ¡ÍêÈ«¿ÉÒÔ¸ù¾Ý»ñµÃµÄÖ¡³¤¶ÈÀ´Ìø¹ý¡£
Èçͼ2£¬±ê×¼TagÖ¡Ö»°üº¬¸èÇú±êÌ⣬ÒÕÊõ¼Ò£¬°æÈ¨£¬±¸×¢ËĸöÄÚÈÝ¡£ËüµÄÖ¡ÃûÊÇÊ®Áù½øÖƵē33 26 B2 75 8E 66 CF 11 A6 D9 00 AA 00 62 CE 6C”£¬ÔÚ24¸ö×Ö½ÚµÄÖ¡Í·ºó½ô¸ú×Å5¸ö·Ö±ðΪ2¸ö×Ö½ÚµÄÕûÊý£¬Ç°Ëĸö·Ö±ð±íʾ¸èÇú±êÌ⣬ÒÕÊõ¼Ò£¬°æÈ¨£¬±¸×¢µÄ´óС£¬µÚÎå¸ö»¹²»Çå³þÊÇʲôÓõģ¬´ó²¿·ÖÇé¿öÏÂÊDz»Ê¹Óõ쬼´ËüµÄ´óСΪ0µÄ¡£
ÔÚÕâ10¸ö×Ö½Úºó£¬ÕâËĸöÐÅÏ¢µÄÄÚÈݾͰ´Ë³Ðò´æ·ÅÁË¡£¼Çס£¬ÔÚWMAÎļþÀËùÓеÄÎÄ×Ö¶¼Êǰ´Unicode¿í×Ö·ûµÄ±àÂ뷽ʽ´¢´æµÄ£¬¶øÇÒÿ¸ö×Ö·û´®ºóÃæ¶¼ÓÖÒ»¸ö0½áÊø×Ö·ûµÄ¡£
Èçͼ3£¬ÔÙ¿´À©Õ¹TagÖ¡£¬ÕâÀï¾Í±È½ÏÂé·³ÁË£¬ÀïÃæ°üº¬µÄÐÅÏ¢µÄ¸öÊýÊDz»È·¶¨µÄ£¬Ã¿¸öÐÅÏ¢Ò²Êǰ´ÕÕÏñÖ¡Ò»ÑùµÄ·½Ê½×éÖ¯ÆðÀ´µÄ¡£À©Õ¹TagÖ¡µÄÖ¡ÃûÊÇÊ®Áù½øÖƵē40 A4 D0 D2 07 E3 D2 11 97 F0 00 A0 C9 5E A8 50”£¬ÔÚ24×Ö½ÚµÄÖ¡Í·ºóÏÈÓÐÒ»¸öÁ½¸ö×Ö½ÚµÄÕûÊý±íʾÕâ¸öÖ¡ÀïÒ»¹²ÓеÄÀ©Õ¹ÐÅÏ¢¸öÊý£¨ExNo£©¡£
Ïà¹ØÎĵµ£º
DelphiÖÐΪDBGrid¿Ø¼þÌí¼ÓÉ«²Ê
2005-08-08 09:13×÷ÕߣºÐ¡µ¶ÇáÎè³ö´¦£ºÌì¼«ÍøÔðÈα༣º·½ÖÛ
¡¡¡¡Ìí¼Ó²»Í¬ÑÕÉ«µ½TDBGrid×é¼þÖн«»áÔöÇ¿×é¼þµÄÏÔʾÍâ¹ÛºÍÇø±ðÊý¾Ý¿âÖв»Í¬ÄÚÈݵÄÐлòÁС£
¡¡¡¡TDBGrid×é¼þÊÇÒ»Öַdz£°ôµÄÓÃÀ´ÏÔʾÊý¾ÝÄÚÈݵÄ×é¼þ£¬±¾ÎĵÄÖØµã½«ÓÃÀ´½âÊÍ---ÈçºÎÔÚTDB ......
Õâ¸ö±¾À´ÎÒÎÒÔÚDELPHIºÐ×Ó¿´µ½µÄ£¬ºóÀ´ÎÒ¶ÔÆä×÷ÁËÒ»µãÐ޸ģ¬ÕâÀïÉÏÈ«²¿´úÂ룬¿ÉÒÔÖ±½ÓÓÃ
Ê×ÏÈÓÐÁ½¸ö×Ô¶¨µÄת»»º¯Êý£º
function myStrToHex(s:string):string; //×Ö´®×ª16½øÖÆ
var
TmpStr:string;
i:integer;
begin
TmpStr:='';
for i:=1 to Length(s)do
TmpStr:=TmpStr+IntToHex(ord(s[i]),2);
Res ......
XMLÎļþ
<?xml version="1.0" encoding="utf-8"?>
.......
ÒòΪÔÒòºÜ¶à£¬ËùÒÔÕâ¸ö·½·¨²»Ò»¶¨Äܽâ¾öÎÊÌâ
XMLDocument1.LoadfromFile('test.XML');
XMLDocument1.Active:=TRUE;
XMLDocument1.Encoding:='gb2312';
memo1.Text:=XMLDocument1.XML.Text; ......
Delphiͨ¹ýÏòµ¼¿ÉÒԷdz£Ñ¸Ëٺͷ½±ãµÄÖ±½Ó½¨Á¢ÊµÏÖCOM¶ÔÏóµÄ´úÂ룬µ«ÊÇÕû¸öCOMʵÏֵĹý³Ì±»ÍêÈ«µÄ·â×°£¬ÉõÖÁûÓÐVCLÄÇô½á¹¹ÇåÎú¿É¼û¡£Ò»¸öûÓÐC++ÏÂCOM¿ª·¢¾ÑéÉõÖÁûÓнӴ¥¹ýCOM¿ª·¢µÄDelphi³ÌÐòÔ±£¬Ò²Äܹ»ºÜÈÝÒ׵İ´Õս̳ÌÉè¼ÆÒ»¸ö½Ó¿Ú£¬µ«ÊÇ£¬¿ÖÅÂÉîÈëÒ»Ï룬Á¬Éú³ÉµÄ´úÂë´ú±íºÎÖÖÒâÒ壬ÄÄЩÄܹ»¶¨Öƶ¼²»Çå³þ¡£Ç°¼¸ÆÚ &ld ......
1£¬¹æ·¶¼ò½é
¡¡¡¡±¾¹æ·¶Ö÷Òª¹æ¶¨DelphiÔ´³ÌÐòÔÚÊéд¹ý³ÌÖÐËùÓ¦×ñѵĹæÔò¼°×¢ÒâÊÂÏî¡£±àд¸Ã¹æ·¶µÄÄ¿µÄÊÇʹ¹«Ë¾Èí¼þ¿ª·¢ÈËÔ±µÄÔ´´úÂëÊéдϰ¹ß±£³ÖÒ»Ö¡£ÕâÑù×ö¿ÉÒÔʹÿһ¸ö×éÔ±¶¼¿ÉÒÔÀí½âÆäËü×éÔ±µÄ´úÂ룬ÒÔ±ãÓÚÔ´´úÂëµÄ¶þ´Î¿ª·¢¼ÇÒäϵͳµÄά»¤¡£
2£¬Ò»°ã¸ñʽ¹æ·¶
2.1 Ëõ½ø
¡¡¡¡Ëõ½ø¾ÍÊÇÔÚµ±Ô´³ÌÐòµÄ¼¶¸Ä±äʱΪÔö¼ ......