第ä¸ä¸ªé®é¢å车å®ç°ä¸æï¼
procedure TForm1.DateTimePicker1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #13 then begin
SendMessage(DateTimePicker1.Handle, WM_LBUTTONDOWN, MK_LBUTTON, DateTimePicker1.WIDTH-5);
end;
end;
第äºä¸ªé®é¢
模æé¼ æ çå·¦å³é®ï¼
Mouse_Event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,0,0,0,0);
Mouse_Event(MOUSEEVENTF_RIGHTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_RIGHTUP,0,0,0,0);
模æé®ççæ¹åé®ï¼
keybd_event(VK_LEFT,0,0,0);
keybd_event(VK_RIGHT,0,0,0);
keybd_event(VK_UP,0,0,0);
keybd_event(VK_DOWN,0,0,0);
ä½ å¯ä»¥åèä¸ä¸ã
温馨提示:内容为网友见解,仅供参考