各位GGJJ看看我的两次模拟Ctrl+V，有什么问题？~~~~~~~~急，在线等

[vickly]

keybd_event(VK_INSERT ,mapvirtualkey(VK_INSERT ,0),0,0);//Insert
keybd_event(VK_INSERT ,mapvirtualkey(VK_INSERT ,0),keyeventf_keyup,0);
ClipBoard.Open;
Clipboard.AsText:='123';
keybd_event( VK_Control, MapVirtualKey( VK_Control, 0 ), 0, 0 ); //CTRL+V
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 );
Clipboard.Clear;
Clipboard.Close;

keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), 0, 0 ); //Alt+N
keybd_event( ord( 'N' ), MapVirtualKey( ord( 'N' ), 0 ), 0, 0 );
keybd_event( ord( 'N' ), MapVirtualKey( ord( 'N' ), 0 ), KEYEVENTF_KEYUP, 0 );
keybd_event( VK_MENU, MapVirtualKey( VK_MENU, 0 ), KEYEVENTF_KEYUP, 0 );

Sleep(1000);
Clipboard.Open;
Clipboard.AsText:='456';
keybd_event( VK_Control, MapVirtualKey( VK_Control, 0 ), 0, 0 ); //CTRL+V
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 );
Clipboard.Clear;
Clipboard.Close;

现在的情况是都没有贴上去啊~~~help me!

[vickly]

大家帮忙顶一下嘛~~~求求你们了~~~急啊~~

[zobo]

友情UP

[vickly]

Clipboard.Open;
Clipboard.AsText:='456';
keybd_event( VK_Control, MapVirtualKey( VK_Control, 0 ), 0, 0 ); //CTRL+V
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 );


为什么第二次模拟的Ctrl+V就是粘贴不上去?

[vickly]

各位帮忙看看嘛~~