Arsip: buat spy didelphi mohon bantuannya

more 9 years ago
yufan
master delphi saya boleh diajarin tidak ...source code buat capture keyboard
jadi intinya saat aplikasi di jalankan bila kita tekan (huruf abjad di keyboard) bisa keluar aplikasinya,,,,mirip spy
mohon dung bantu saya ,,,, suhu delphi ??

more 9 years ago
elva_ivana
sy gak ngerti tentang spy euy ....
mungkin maksud dikau Virtual Key yah :?:

more 9 years ago
xerion
jadi intinya saat aplikasi di jalankan bila kita tekan (huruf abjad di keyboard) bisa keluar aplikasinyaingin buat semacam hot key kah? semacam shortcut tapi system wide ? jadi ketika aplikasi kita minimized lalu tekan kunci misalnya CTRL+SHIFT+F11 munculnya deh formnya :D tambahkan deklarasi ini pada form bagian private
private
Procedure WMHotkey(var Msg: TWMHotkey); message WM_HOTKEY;
...
dan ini procedure untuk handle key
procedure TForm1.WMHotkey(var Msg: TWMHotkey);
begin
If msg.hotkey = 1 Then
begin
If IsIconic( Application.Handle ) Then Application.Restore;
BringToFront;
end;
end;
untuk register pada OnCreate :
RegisterHotkey(Handle, 1, MOD_CONTROL or MOD_SHIFT, VK_F11)
untuk menghilangkan pada saat form ditutup OnFree
UnRegisterHotkey(Handle, 1);
jalankan aplikasinya, minimize ke tray, lalu tekan the magic key :twisted:
hmm... jgn bermaksud bikin yg aneh-aneh :roll:
more 9 years ago
yufan
wah iyah mirip seperti itu mas,,,
trus cara hiden formnya seperti bagaimana ya mas??
trus kalau kita klik restart di windows kita tapi bukan malah restart tapi meg-run aplikasi yang kita buat tadi bagaiman ya ??
saya biung mencari registry restartnya ??
more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
- Project Group dalam Lazarus
- FastPlaz Database Explorer
- Release: FastPlaz Super Mom v0.12.22
- PascalClass #3: Web Development with Free Pascal
- Makna Pascal di Pascal Indonesia
- Kulgram : Instalasi Lazarus di Perangkat Berbasis ARM
- PascalClass #1: Analisa Database dan Machine Learning
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
- Mengenal OXYGENE – Pascal For .NET
- PascalTalk #5: UX: Research, Design and Engineer
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 months ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 5 months ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 5 months ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 5 months ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 5 months ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 5 months ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 1 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 8 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 8 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 8 years ago
Random Topic
- nanya buat function wait event
by Tiramitzu in Tip n Trik Pemrograman more 14 years ago - cross tab tanggal
by delphi1st in Tip n Trik Pemrograman more 14 years ago - ada yang ngerti coding vb g?
by fafa in Hal umum tentang Pascal Indonesia more 13 years ago - Aplikasi Yahoo Voice Chat
by edi2004 in Network, Files, I/O & System more 12 years ago - backup database ACCESS dari Delphi
by ganang in Tutorial & Community Project more 13 years ago - [release] PooLander!
by ZeAL in Games more 15 years ago - (ask)mengubah font style pada memo
by pribowo26 in Hal umum tentang Pascal Indonesia more 12 years ago - cari file sms.DLL
by nurez in Network, Files, I/O & System more 13 years ago - Download QuickReport
by n3o_cybertech in Tip n Trik Pemrograman more 13 years ago - tolong donk algoritma permutasi dan substitusi
by woko in Tip n Trik Pemrograman more 12 years ago