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!
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!
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就是粘贴不上去?