关于richedit富文本控件的问题
本帖最后由 zhybxyz 于 2013-10-17 17:41 编辑由于人事方面工作需要，每天通过QQ传递很多1，2寸照片，想写个小程序批量处理，刚开始就遇到了问题。
信息管理中心 李倩 工号：202089210
格式就是上面这样的，寸照+说明文字，我把数据存放在一个富文本框中临时收集起来，够十个一起发送到工作接收的QQ上去。
Global $RichEdit =_GUICtrlRichEdit_Create($WinMain, "", 650, 500, 300, 140, BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))
创建好这个富文本框，别的啥还没开始写呢，手动按照我要的格式去粘贴到$RichEdit里面，之后手动复制出来到QQ对话框，图片不显示，丢了，只剩下文字，不知道是为什么？有做过相关的么？求助！ 进来看图片滴！没尝试过在富文本装载图片，楼下继续！ 图片很养眼啊。 pp不错…… 。。。各位大侠咱能不能言归正传，帮忙解决下问题嘛，早知道换个别的同事照片就好了保证你们看完就跑，>_< 翻遍了论坛和相关资料，关于富文本编辑器的资料不太多，就连UDF也是英文还没翻译过来。这才开帖求助，并非伸手拿来主义的，大家帮帮忙吧。刚才用旺旺也测试了一下，效果一样，富文本框里的图文混合数据粘贴进旺旺也是只有文字，图片丢失，看来AU3富文本框和他们不是一个类型的？ 求关注、求帮忙，卡在这里了。 回复 6# zhybxyz
蛋神的UDF汉化你没有下载么？需要联系我！
QQ:172285682 冲图片来的 是太难还是太简单？没有人帮忙呢？{:face (189):} 富文本中，你直接copy时，图片应该是没装进剪贴版的.
看一下示例中，有 富文本 - 右键菜单 - 有剪贴，复制，删除，撤消 功能的示例。
我也是昨天才开始看这个。以上纯属暂时的理解 直接复制图片到剪切板，sendmessage粘贴 参考：Local $sImage = @ScriptDir & "\1.jpg"
_Clipboard_SetImage($sImage)
_SendMessageA($hChat, $WM_PASTE, 0, 0)
Func _Clipboard_SetImage($sImage, $hWnd = 0)
_GDIPlus_Startup()
Local $hImage = _GDIPlus_BitmapCreateFromFile($sImage)
Local $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)
Local $aRet = DllCall('user32.dll', 'ptr', 'CopyImage', 'ptr', $hBitmap, 'int', 0, 'int', 0, 'int', 0, 'int', 0x8 + 0x4)
Local $hBitmapCopy =$aRet
_ClipBoard_Open($hWnd)
_ClipBoard_Empty()
_ClipBoard_SetDataEx($hBitmapCopy, $CF_BITMAP)
_ClipBoard_Close()
_WinAPI_DeleteObject($hBitmapCopy)
_GDIPlus_BitmapDispose($hImage)
_GDIPlus_ShutDown ()
EndFunc ;==>_Clipboard_SetImage
回复 12# komaau3
直接复制图片到剪切板的话，文字就得再复制一次发送，图片下面还有文字的，本想是富文本框收集好图文之后，能和QQ对话框格式对应上，一起复制粘贴过去。 本帖最后由 zhybxyz 于 2013-10-19 14:55 编辑
回复 11# 绿色风
我也去看一下，不知道能不能像网页编辑器那样就好了。有没有写过类似代码的大侠给予指点。{:face (52):} 可以做网页编辑器的
页:
[1]
2