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

delphiÏòWORDдÈëtext×Ö¶Îֵʱ³öÏÖÂÒÂë

²ÉÓÃAdoquery´ÓÊý¾Ý¿â²éÕÒÊý¾Ý£¬Êý¾Ý¿âÖиÃ×Ö¶ÎΪtextÀàÐÍ£¬ÍùWORDÖÐдÈëʱ³öÏÖÂÒÂë
ʹÓÃÓï¾äÈçÏ£º
TempStr := Adoquery1.FieldValues['Test']);
WordDocument1.Range.InsertAfter(TempStr);//ÏÔʾÂÒÂë

¸Ä³ÉTempStr := Adoquery1.Fields[0].AsString;
»¹ÊÇÂÒÂë

дÈëÓï¾äûÎÊÌ⣬һ°ãµÄstringÀàÐÍ¿ÉÒÔÕý³£ÏÔʾ
ÄãShowmessage(TempStr)¿´ÊDz»ÊÇÂÒÂë¡£

ÎÒÊÔÁËÊÇÕý³£µÄ¡£²»ÖªµÀÄã³öÁËʲôÎÊÌâ¡£

ÏÔʾtempStr»¹ÊÇÂÒÂë,ÎÒ¾õµÃ¿ÉÄÜÊÇÎÒÃÇ´æÈëÊý¾ÝµÄ·½Ê½²»Ò»Ñù
ÎÒÊÇÓÃÁ÷µÄ·½Ê½´æµÄ£¬´úÂëÈçÏ£º
var
TempStream: TMemoryStream;

RichEdit1.Lines.SaveToStream(TempStream);
AdoQuery1.Parameters.ParamByName('Test').LoadfromStream(TempStream,ftString);

ÄãµÄÊý¾ÝÓ¦¸ÃÊÇÖ±½Ó´æÈëµÄ°É£¿

Êǵġ£ÎÒÊÇÖ±½Ó´æµÄ¡£

ʲô°æ±¾µÄ£¬ÊDz»ÊÇ¿í×Ö·ûÎÊÌâ

Õâ¸öºÍ´æ´¢·½Ê½Óйصģ¬Èç3Â¥ËùÊö£¬Äã¸ÄÓÃÁ÷µÄ·½Ê½´æÖüÊÔһϡ£

ÒýÓÃ
Õâ¸öºÍ´æ´¢·½Ê½Óйصģ¬Èç3Â¥ËùÊö£¬Äã¸ÄÓÃÁ÷µÄ·½Ê½´æÖüÊÔһϡ£

°ÝÍУ¬ÈýÂ¥¾ÍÊÇÎÒ×Ô¼º£¬Ö±½Ó´æµÄ»°Ã»ÎÊÌ⣬ÓÃÁ÷µÄ·½Ê½´æ¾Í²»ÄÜÕýÈ·ÏÔʾÁË


ÒýÓÃ
RichEdit1.Lines.SaveToStream(TempStream)ÊÇÖ±½Ó°ÑRichEdit1µÄËùÓÐÄÚÈÝ´æµ½Á÷Öе쬰üÀ¨¿ØÖƺÍ×Ö·û´®£¬Äã¿ÉÒÔÖ±½Ó°ÑRichEdit1.Lines.Textдµ½WordÖÐÊÔÊÔ¡£


֮ǰµÄÊý¾ÝÊÇÕâô´æÈëÊý¾Ý¿âµÄ£¬²»¹ýÏÖÔÚдµ½WORDÀïÃæÊÇÐèÒª´ÓÊý¾Ý¿âÖжÁ³öµÄ
ÎÒÓÃRichEditÀ´½ÓÊÕÊý¾Ý¿âÖеÄÊý¾Ý£¬ÔÙ½«ËüдÈëµ½WORDÀïÃæÕâÖÖ·½·¨ÊÇ¿ÉÒԵ쬲»¹ýÎÒÏëÖªµÀÓÐûÓÐÒ»¸ö·½·¨£¬¿ÉÒÔ²»½èÓÃÕâ¸ö¿Ø¼þ¶


Ïà¹ØÎÊ´ð£º

DELPHIÕâÖÖÇé¿öÔõô°ì£¿ - Delphi / Windows SDK/API

¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......

xml´´½¨ºóÈçºÎÏú»Ù? - Delphi / ÍøÂçͨÐÅ/·Ö²¼Ê½¿ª·¢

xml := CreateOleObject('Microsoft.XMLHTTP');
  xml.Open('GET','http://www.google.com', False);
  xml.Send;
  xml.responseText;
ʹÓÃxml.responseText¿ÉÒÔ»ñÈ¡ÍøÒ³Ô´Âë,µ«ÊÇÔÙ´Î ......

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

ÎÒÏëдһ¸öÔÚ´ò¿ªÍøÒ³ºó£¬ÆäÖÐÍøÒ³ÖÐÓÐÏÂÀ­Áбí¿òÀïÃæÓм¸¸öÖµ£¬ÎÒÔÚÏëÔÚÊÂÏÈ»¹Ã»Óдò¿ªÍøÒ³Ç°Ñ¡Ò»¸öÖµ£¬ÔÚ´ò¿ªÍøÒ³ºó£¬ÍøÒ³ÖÐÕâ¸öÏÂÀ­Áбí¿ò¾ÍÏÔʾÎÒÊÂÏÈѡȡµÄÖµ¡£Ð¡µÜ²»»á£¬Ï£ÍûÄÄλ´óÏÀ³öÊÖÏàÖúһϣ¿£¿£¿£¿£¿
......

RMBÇ󹺡°Ó®ÈýÕÅ¡±ÓÎÏ·DELPHI°æ´úÂë

Ç󹺴øÓÎÏ·´óÌü¼°¡°Ó®ÈýÕÅ¡±ÆË¿ËÓÎÏ·µÄDELPHIÔ´´úÂ룬ÁªÏµQQ£º861973982
¾ßÌåÄÚÈÝQQÏê̸¡£
û¼û¹ý
°ï¶¥

Ó®ÈýÕÅ¡±ÆË¿ËÓÎÏ· ?

ûÌý˵¹ý.ûÌý˵¹ý.

Ó®ÈýÕÅ ÊDz»ÊÇË׳ÆÕ¨¼¦µÄÓÎÏ·°¡

Ã»Íæ¹ýÕâ¸öÓÎÏ· ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ