Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2014.07.13;
Скачать: [xml.tar.bz2];

Вниз

Как сэмулировать нажатие кнопки _ (нижние подчеркивание)   Найти похожие ветки 

 
Wadimka   (2013-09-09 06:29) [0]

Собственно не могу найти код или комбинацию
символ - (минус) посылается через код:
    c:=chr(109);
    Result := Result + c + downkey
                      + c + upkey;

//===хотя по ascii таблице код - (минуса) 45
а в модуле Windows.pas он зарезирвирован как
{$EXTERNALSYM VK_INSERT}
VK_INSERT = 45;

если посылать код 109 с нажатым шифтом, все равно рисуется знак минус

если посылать код 45 с нажатым шифтом, то все само собой комбинация вставки Shft+INS

подскажите плз


 
Wadimka   (2013-09-09 06:35) [1]

из таблицы ascii код _ равен 95, тож не пашет


 
Leonid Troyanovsky ©   (2013-09-09 09:20) [2]


> Wadimka   (09.09.13 06:35) [1]


procedure TForm1.Button1Click(Sender: TObject);
const
 c = Ord("_");
begin
 with Edit1 do
  begin
    Text := IntToStr(c);
    Perform(WM_CHAR, c, 0);
  end;
end;

--
Regards, LVT.


 
Wadimka   (2013-09-09 10:19) [3]

мне нужно именно через keybd_event


 
KilkennyCat ©   (2013-09-09 11:57) [4]


> мне нужно именно через keybd_event

в твоем примере нет похожих букв


 
Wadimka   (2013-09-09 13:35) [5]

мне нужна только комбинация кодов для символа _


 
Wadimka   (2013-09-09 13:53) [6]

Все вопрос решен, не очень корректно, но мне пофик, программа не на вднх
сделал через alt код 095
    Result := Result +
    Chr(VK_MENU)+downkey+
    Chr(VK_NUMPAD0)+downkey+Chr(VK_NUMPAD0)+upkey+
    Chr(VK_NUMPAD9)+downkey+Chr(VK_NUMPAD9)+upkey+
    Chr(VK_NUMPAD5)+downkey+Chr(VK_NUMPAD5)+upkey+
    Chr(VK_MENU)+upkey;



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2014.07.13;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.001 c
2-1379248188
cr@nk
2013-09-15 16:29
2014.07.13
Аварийный выход из программы


2-1378965082
Коля
2013-09-12 09:51
2014.07.13
Создание Tmemo


1-1326368245
Mister_X
2012-01-12 15:37
2014.07.13
IdMessage, Indy 10


15-1387776401
ProgRAMmer Dimonych
2013-12-23 09:26
2014.07.13
Восстановление NTFS без переформатирования из RAW


3-1299765129
stas
2011-03-10 16:52
2014.07.13
синтаксис оракла





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский