定义lisp函数获取登录的QQ号

jun353835273 发表于 2020-3-7 11:07:23

本帖最后由 jun353835273 于 2020-3-7 11:13 编辑

LISP调用方式(ReadTencentqqId)
如果登录的一个qq可以获取，多个qq只能获取最后登录的那个QQ号
代码网上找的，只是定义为LISP函数而已

   //导入库　

   private static extern int FindWindow(string lpClassName, string lpWindowName);


   public static extern int GetWindowText(int hwnd, StringBuilder lpString, int cch);

   public static extern int GetWindow(int hwnd, int wCmd);


   public static extern int GetClassName(int hWnd, StringBuilder lpClassName, int nMaxCount);

   public static string ReadTencentqqId(ResultBuffer rb)
   {
         string str = "";
         int hWin = FindWindow("CTXOPConntion_Class", null);
         if (hWin == 0)
         {
            return null;
         }
         System.Text.StringBuilder sbf = new StringBuilder(256);
         StringBuilder sbfClass = new StringBuilder(256);
         while (hWin > 0)
         {
            GetWindowText(hWin, sbf, sbf.Capacity);
            if (sbf.ToString().Contains("OP_"))
            {
               int index = sbf.ToString().IndexOf('_');
               str = sbf.ToString().Substring(index + 1, sbf.Length - index - 1);
               break;
            }
         }

         return str;

   }

hw8810 发表于 2022-8-8 10:19:51

附件的dll试了下2014版本的CAD成功，低版本的可能要自己编译一下了感谢大佬分享

434939575 发表于 2023-1-29 22:54:44

新手请问下这个还要加什么引用空间错误 1 未能找到类型或命名空间名称“LispFunctionAttribute”(是否缺少 using 指令或程序集引用?)
未能找到类型或命名空间名称“LispFunction”(是否缺少 using 指令或程序集引用?)

未能找到类型或命名空间名称“ResultBuffer”(是否缺少 using 指令或程序集引用?)

vs2013

荣sir 发表于 2023-1-31 05:16:20

434939575 发表于 2023-1-29 22:54
新手请问下这个还要加什么引用空间错误 1 未能找到类型或命名空间名称“LispFunctionAttribute”(是否缺 ...

引用CAD C#二开的dll文件，然后vs就能提示缺少的命名空间了

434939575 发表于 2023-1-31 12:38:42

本帖最后由 434939575 于 2023-1-31 12:53 编辑

荣sir 发表于 2023-1-31 05:16
引用CAD C#二开的dll文件，然后vs就能提示缺少的命名空间了
感谢，我加了acmgdacdbmgdaccormgd三个dll还不行，可能还缺什么，

sieben 发表于 2023-1-31 14:14:53

434939575 发表于 2023-1-31 12:38
感谢，我加了acmgdacdbmgdaccormgd三个dll还不行，可能还缺什么，

using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.Geometry;

这些你加了没？或许还要引用PresentationCore

434939575 发表于 2023-1-31 14:56:13

sieben 发表于 2023-1-31 14:14
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autod ...

感谢，加上这些可以了，调用还要技术。{:1_1:}

yanshengjiang 发表于 2024-10-12 19:33:43

你好，能不能检测有没有加入某个群聊。功能是加入了QQ群的，才可以用插件。

你有种再说一遍 发表于 2024-10-13 17:33:51

yanshengjiang 发表于 2024-10-12 19:33
你好，能不能检测有没有加入某个群聊。功能是加入了QQ群的，才可以用插件。

这种去搜搜C#判断是否加入QQ群
https://cn.bing.com/search?q=C%23%E5%88%A4%E6%96%AD%E6%98%AF%E5%90%A6%E5%8A%A0%E5%85%A5QQ%E7%BE%A4&setmkt=zh-CN&PC=EMMX01&form=LBT003&scope=web

页: [1]

明经CAD社区's Archiver

定义lisp函数获取登录的QQ号