[ApxaHGe1]

Уважаемые, подскажите, пожалуйста, почему при отправки в чужое окно виртаульное нажатие кливиш, все нормально отправляется, кроме символов?
Код

Код:

    for i := 1 to length(login) do
    begin
      Sleep(200);
      if login[i] in ['A'..'Z'] then
      begin
        keybd_event(VK_SHIFT, MapVirtualKey(VK_SHIFT, 0), 0, 0);
        keybd_event(Ord(upcase(login[i])), MapVirtualKey(Ord(upcase(login[i])), 0), 0, 0);
        keybd_event(Ord(upcase(login[i])), MapVirtualKey(Ord(upcase(login[i])), 0), KEYEVENTF_KEYUP, 0);
        keybd_event(VK_SHIFT, MapVirtualKey(VK_SHIFT, 0), KEYEVENTF_KEYUP, 0);
      end else begin
        keybd_event(Ord(upcase(login[i])), MapVirtualKey(Ord(upcase(login[i])), 0), 0, 0);
        keybd_event(Ord(upcase(login[i])), MapVirtualKey(Ord(upcase(login[i])), 0), KEYEVENTF_KEYUP, 0);
      end;
    end;

т.е. Символы # $ % он ни как не хочет отправлять

[antikiler]

Ну, наверно потому, что в множестве у тебя прописаны только английские буквы ['A'..'Z'].
Попробуй так - это раз
['A'..'Z','#' ,'$','%']
Второе
При эмуляции нажати клавиш допустим символа '$' нужно соблюдать такую же последовательность как ипри обычном вводе. А именно Shift+4
вот

Код:

keybd_event(VK_LSHIFT, 0, 0, 0);
keybd_event(ord('4'), 0, 0, 0);
keybd_event(ord('4'), 0, KEYEVENTF_KEYUP, 0);
keybd_event(VK_SHIFT, 0, KEYEVENTF_KEYUP, 0);