Felony
دوشنبه 30 دی 1387, 18:24 عصر
:لبخندساده:سلام
دوستان من یه متن که رنگی هست رو تو ClipBoard کپی میکنم و میام به وسیله ی کلید ترکیبی Ctrl+v تو RichEdit برنامم Paste میکنمش هیچ مشکلی نداره و رنگها همه درستن و نمایش داده میشن ، ولی وقتی برای paste کردن به جای کلید ترکیبی از کد زیر استفاده میکنم متن سیاه میشه و همه ی سایزهای متن اصلی یکسان میشه !
RC_Code.Lines.Text:=ClipBoard.AsText;
چی کار کنم که متنم به همون صورت اصلی وارد RichEdit شه ؟
متنم هم اینطوری هست :
Run("<Embedded>\project1.exe","TOP")
*****
ScriptTimer("Endtask","1500")
*****
empty$=''
LoadText("EditBox1","empty$")
دوستان من یه متن که رنگی هست رو تو ClipBoard کپی میکنم و میام به وسیله ی کلید ترکیبی Ctrl+v تو RichEdit برنامم Paste میکنمش هیچ مشکلی نداره و رنگها همه درستن و نمایش داده میشن ، ولی وقتی برای paste کردن به جای کلید ترکیبی از کد زیر استفاده میکنم متن سیاه میشه و همه ی سایزهای متن اصلی یکسان میشه !
RC_Code.Lines.Text:=ClipBoard.AsText;
چی کار کنم که متنم به همون صورت اصلی وارد RichEdit شه ؟
متنم هم اینطوری هست :
Run("<Embedded>\project1.exe","TOP")
*****
ScriptTimer("Endtask","1500")
*****
empty$=''
LoadText("EditBox1","empty$")