ÎÒ°ÑÒôÀÖµØÖ·ÓüÇʱ¾Ð´ÔÚtxtÎĵµÀȻºóÎÒÔÚÓÃdelphiµÄMediaPlayer¿Ø¼þ²¥·ÅËü£¬¿ÉÊÇÎÒÊÔÁ˺öà±ä£¬¾ÍÊÇËü²»ÄÜʶ±ð£¿ÎÒÓÖ°ÑtxtÎĵµ¸Ä³Ém3uÎļþ£¬µ«ÊÇËü²¢²»Äܲ¥·Å£¡ÎÒÏëÎÊÏ£¬Ôõô¶ÁÈ¡txtÎĵµÀïµÄÒôÀÖµØÖ·£¬²¢ÈÃËü²¥·ÅÄØ£¿
¹Ø×¢Ìù¡£
×Ô¼º°Ñ¸èÇú·¾¶´ÓÎı¾ÎļþÀï¶Á³öÀ´£¬Ôٷֱ𲥷Å
ÏÈҪȷ¶¨Ôõô¶ÁÈ¡txt
Delphi(Pascal) code:
procedure TForm1.btn1Click(Sender: TObject);
var
a:TStringList;
i:integer;
begin
a:=TStringList.create;
a.LoadfromFile('ÄãÎļþµÄ·¾¶');
for i:=0 to a.count-1 do
begin
showmessage(a.strings[i]);
end;
end;
mark
ÎÒ¾õµÃÓ¦¸ÃÕâÑù£º
1.·ÖÎöÎļþÖеĵØÖ·
2.ÏÂÔØµØÖ·ËùÖ¸ÏòµÄµÚÒ»¸öÒôÀÖÎļþµ½±¾»ú£¨Ã»ÓùýMediaPlayer¿Ø¼þ£¬²»ÖªµÀÄܲ»ÄÜÖ±½Ó²¥·ÅÍøÂçµØÖ·ÏµÄÒôÀÖ£¬±¾²½ÖèµÄǰÌáÊÇÖ¸¿Ø¼þ²»Äܲ¥·ÅµÄÇé¿öÏ£©
3.´ò¿ªÒôÀÖÎļþ£¬Í¬Ê±¼ì²éÎı¾ÎļþÖÐÓÐûÓÐÆäËüÎļþ£¬Èç¹ûÓУ¬Í¬Ê±Æô¶¯ÏÂÔØµÚ¶þ¸öÎļþ¡£
4.Èç¹ûÒôÀÖÎļþ²¥·ÅÍê±Ï£¬¼ì²éÊÇ·ñÓÐеÄÎļþÒÑÏÂÔØÍê±Ï£¬Èç¹ûÓУ¬²¥·Å£¬Èç¹ûûÓУ¬µÈ´ýÏÂÔØÍê±Ï
5.Ñ»·²½Öè3,4
·Ç³£¸Ðл,µ«ÊÇÎÒÓÃÁËÄãÕâ¸ö·½·¨,ÔÚÓÃmediaplayer´ò¿ªÊ¼ÖÕÀàÐͲ»¼æÈÝ£¿
ÒýÓà ÏÈҪȷ¶¨Ôõô¶ÁÈ¡txt Delphi(Pascal) codeprocedure TForm1.btn1Click(Sender: TObject);var a:TStringList; i:integer;begin a:=TStringList.create;
Ïà¹ØÎÊ´ð£º
ÒÑÖªPython ÖУº s = unicode("²âÊÔ", "gb2312") s = u'\u6d4b\u8bd5' print s ²âÊÔ ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô³ÉGb2312µÄºº×ÖÄØ£¿ ÕÒµ½¸ö·½·¨ ......
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd() ¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book'); ʱÌáʾstradd䶨Òå... Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤! (ÔÚA ......
½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ °´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£ Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£ btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......
ÈçÌ⣺ ÎҵijÌÐò Create µÄʱºò ´´½¨ÁËN ¸öỊ̈߳»ÕâN¸öÏ̲߳»Í£µÄÔÚ ¼àÌýN¸öCOM¿ÚµÄÊý¾Ý£»µ±·ÖÎöÊý¾Ýʱ£¬ÓÐЩʱºòÒªµ¯³öapplication.messagebox ¶Ô»°¿òÅÐ¶Ï ÊÇ·ñ¼ÌÐø Ö´ÐÐỊ̈߳¬»¹ÊÇ¹ÒÆðÏ̡߳£µ±¶à¸öÏß³Ìͬʱ ......
Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿ ÊÕÈëÔõôÑù sohu£¿soho£¿ sohu ¿ÉÄÜÊÇsmall office house unit С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£ È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾ ѧϰѧϰ¡£ ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ×´ ......