- Tomasz72: Ventilátor upgrade
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- sziku69: Szólánc.
- Brogyi: CTEK akkumulátor töltő és másolatai
- MasterDeeJay: H110-es lapban 10.gen Comet Lake működhet?
- eBay-es kütyük kis pénzért
- Parci: Milyen mosógépet vegyek?
- Mr. Y: Motoros sztorik #06
Új hozzászólás Aktív témák
-
Hani
aktív tag
válasz
Sixkiller6 #576 üzenetére
A PostMessage körül kell keresgélned.
Ha már úgyis benne vagyunk az ablakoknak küldött üzenetekben, küldjük el ezt a bill-leütést pl. a Notepad-nak.
Procedure TForm1.Button1Click(Sender: TObject);
Var
wnd : HWND;
i : Integer;
s : String;
Begin
//Megkeressük a notepadot
wnd := FindWindow('notepad',nil);
If wnd <> 0 then
Begin
wnd := FindWindowEx(wnd,0,'Edit',nil);
// Ha már úgyis megtaláltuk, beleírunk jól:
s := 'NoMijaFene,NemisNyútama Billyenjtyúkho';
For i := 1 to Length(s) do
SendMessage(wnd, WM_CHAR, Word(s), 0);
// nyomunk utána egy [ENTER]-t, hogy szép legyen
PostMessage(wnd, WM_KEYDOWN , VK_RETURN, 0);
// vagy [SPACE]-t, vagy... ezeket megtalálod a helpben.
PostMessage(wnd, WM_KEYDOWN , VK_SPACE, 0);
End;
End;
Szerk: Hinye, de szépen megformázta...
[Szerkesztve]
Új hozzászólás Aktív témák
Hirdetés
- Asztali PC , i7 11700KF , RTX 3070 Ti , 32GB DDR4 , 512GB NVME , 2TB HDD
- Asztali PC , R5 5500 , RX 5700 XT , 16GB RAM , 256GB NVME , 1TB HDD
- ASUS TUF Gaming F15 gamer laptop
- X1 Yoga 8th 2-in-1 14" FHD+ IPS érintő i5-1335U 16GB 256GB NVMe ujjolv IR kam aktív toll gar
- Lenovo / SK Hynix 512GB M.2 NVME SSD 0 perces
- Bomba ár! Dell Latitude 7390 2in1 - i7-8G I 16GB I 256SSD I 13,3"FHD Touch I HDMI I Cam I W11 I Gar
- AKCIÓ! Apple Macbook Pro 16" 2019 i9 9980HK 64GB 500GB Radeon Pro 5500M hibátlan működéssel
- Bomba ár! HP Elitebook 850 G3 - i7-6GEN I 16GB I 256GB SSD I RadeonI 15,6" FHD I Cam I W11 I Gari!
- ÁRGARANCIA! Épített KomPhone Ryzen 7 5800X 16/32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- 130+131+132+133 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4080
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Promenade Publishing House Kft.
Város: Budapest