delphi 写的程序报cannot open clipboard错误，直接上代码，希望大家帮忙看一下

Posted 2023-03-19

ctrl+A
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),0,0);
keybd_event(Ord('A'),MapVirtualKey(Ord('A'),0),0,0);
keybd_event(Ord('A'),MapVirtualKey(Ord('A'),0),KEYEVENTF_KEYUP,0);
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),KEYEVENTF_KEYUP,0);
ctrl+C
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),0,0);
keybd_event(Ord('C'),MapVirtualKey(Ord('C'),0),0,0);
keybd_event(Ord('C'),MapVirtualKey(Ord('C'),0),KEYEVENTF_KEYUP,0);
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),KEYEVENTF_KEYUP,0);

Form1.RichEdit1.Clear;
Form1.RichEdit1.PasteFromClipboard;

m:=Form1.subStr(str); //得到的是一个字符串 比如“你好”
Clipboard.AsText:=m;
SetForeGroundWindow(hwnd);
sendMessage(hwnd,messages.WM_LBUTTONDOWN,VK_LBUTTON, MakeLParam(50,r.Bottom-60));
sendMessage(hwnd,messages.WM_LBUTTONUP,VK_LBUTTON, MakeLParam(50,r.Bottom-60));
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),0,0);
keybd_event(Ord('V'),MapVirtualKey(Ord('V'),0),0,0);
keybd_event(Ord('V'),MapVirtualKey(Ord('V'),0),KEYEVENTF_KEYUP,0);
keybd_event(VK_CONTROL,MapVirtualKey(VK_CONTROL,0),KEYEVENTF_KEYUP,0);

参考技术A Clipboard单元引用了吗追问

不引用，编译就过不去，我这是在运行的过程中出现的问题

PHP: PhpStorm单元测试报错：PHPUnit Cannot open file

问题描述

版本： PhpStorm 2019.3.4

PhpStorm单元测试报错

PHPUnit Cannot open file

问题分析

PhpStorm 2019.3.3 不支持 PHPUnit9、需要使用 PHPUnit 8.*

问题解决

composer.json

    "require-dev": 
        phpunit/phpunit": "^9.5.0
    

替换为

    "require-dev": 
        phpunit/phpunit": "^8.5.0
    

参考

• PHPUnit Cannot open file "XXXTest"