Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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ÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

2009ѧϰdelphiµÄǰ¾°

ÎÒ±¾À´ÔÚѧУÊÇŪµÄJ2EE
×òÌìÈ¥Á˳¤É³Ò»¼Ò¹«Ë¾Ó¦Æ¸ ˵ÊÇÓÐÒ»¸öÏîÄ¿ delphiµÄ
ʵϰÆÚÒ»¸öÔ ËÄÌì°ëµÄdelphiÅàѵ ºóÃæ25Ìì¸øÄãÒ»¸öÉè¼ÆÎĵµ×Ô¼º×öÒ»¸öÏîÄ¿
×ߺ󲻾ôòµç»°¹ýÀ´½ÐÎÒÐÇÆÚһȥ±¨µ½ 
¿´µ½delphiµ ......

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

Delphi(Pascal) code:

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

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

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

delphi ÊÓÆµÊÇ·ñ¿ÉÒÔת»»³ÉXML¸ñʽ£¿

ûѧ¹ýDELPHI¡£¡£ÒòΪҪά»¤Ò»¸ödelphiµÄÏîÄ¿£¬´ó¼Ò°ï°ïæ
 ½«±¾µØÊÓÆµÔÚÍøÂçÉÏ´«ËÍ¡£¡£Óõ½µÄÊÇsocket¡£¡£  
ÏëÎÊÏ ¿ÉÒÔ½«ÊÓÆµ×ª»»³ÉʲôÑùµÄ¸ñʽ¡£¡£
µ±È»¿ÉÒÔ¡£±ÈÈç°ÑÊÓÆµÁ÷ת³ÉÊ®Áù½øÖÆÔÙдµ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ