Chcę przesyłać tekst z okna tekstowego aplikacji delphi do okna tekstowego zewnętrznej aplikacji
symulując klawiaturę numeryczną
(właśnie przez klawiaturę numeryczną a nie kombinacją Alt+Klawisz, ani SendMessage)
Dla podstawowych znaków alfabetu łacińskiego jest to proste i działa poprawnie:
W pętli jeden znak po drugim jest przesyłany do zewnętrznej aplikacji według instrukcji:
-pobranie numeru znaku w ASCI (np. Ord(Edit1.Text[n]) )
-Symulacja wciśnięcie Alt + symulacja wciśnięć kolejnych cyfr z liczby uzyskanej przez funkcję Ord() liczby
Jednakże inaczej jest z polskimi znakami:
np. Ord() ze znaku 'ą' to 261 co po wstawieniu z numerycznej daje znak koniczynki: ♣
tymczasem aby uzyskać 'ą' w symulacji klawiatury numerycznej musi być symulowane wciśnięcia 165
A więc są 2 wyjścia:
- albo zmienić / przekonwertować Ord na właściwą liczbę (dla ą byłoby to 261> 165)
- albo znaleźć/ napisać taką funkcję która z polskiego znaku jako argumentu da adekwatną liczbę (dla ą byłoby to 165)
Jak to można zrobić?