手机qq我发的消息是系统字体,别人发的消息确实其他的字体,怎样设置

已举报 回答 关注

手机qq我发的消息是系统字体,别人发的消息确实其他的字体,怎样设置

  • 回答数

    9

  • 浏览数

    5,093

9个回答 默认排序
  • 默认排序
  • 按时间排序

已采纳
1、打开手机QQ面板,点击左上角的QQ头像。
2、点击个性装扮后,点击聊天字体,即可进入字体商城来修改字体类型。

取消 评论
那是对方手机的字体设置
取消 评论
在QQ的个性装扮聊天字体里
取消 评论
在qq输入栏上方有一排图标,点最左面的A既可以设置了
取消 评论
原字体应该是这个: Rama Slab Bold (罗马平板体 加粗)再经过设计 中间那个隔断就是一橡皮的事 做旧效果可以用笔刷.
取消 评论
'新建一个abc.txt文件并打开,测试正常Option Explicit
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function SendMessage Lib "user32 " Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Const WM_SETTEXT = &HC
Private Sub Command1_Click()
Dim s As String, myhwnd As Long
s = Text1
myhwnd = FindWindow(vbNullString, "abc.txt - 记事本")
myhwnd = FindWindowEx(myhwnd, 0&, "Edit", vbNullString) '控件名用spy++查看,这里是Edit,特定的软件控件名都是固定的
If myhwnd = 0 Then
MsgBox "!!"
Exit Sub
End If
SendMessage myhwnd, WM_SETTEXT, 0, ByVal s
End Sub
取消 评论
可以在扣扣里该 设置里
取消 评论
手机qq里可以改
取消 评论
加载全部9个答案 加载中...
ZOL问答 > 手机 > 其他分类 > 手机qq我发的消息是系统字体,别人发的消息确实其他的字体,怎样设置

举报

感谢您为社区的和谐贡献力量请选择举报类型

举报成功

经过核实后将会做出处理
感谢您为社区和谐做出贡献

提示

确定要取消此次报名,退出该活动?