Dephide Klavyeden Kac Numaralı Tusa Basıldıgını hex ve int olarak verir - AKDENİZ FORUM

AKDENİZ FORUM

Benim Konularim

Benim Mesajlarim

		AKDENİZ FORUM > Bilgisayar Merkezi > İşletim Sistemleri > Dökümanlar
Dephide Klavyeden Kac Numaralı Tusa Basıldıgını hex ve int olarak verir

Bugünki Mesajlar

Bütün Forumları okunmuş kabul et

Cevapla

05-16-2007	#1
quant£S® Se®ve® Administ®ato® Türkiyenin En Kaliteli Bilgi Paylasim Mekani AKdenizForum.. Kullanıcı Bilgileri Üyelik Tarihi: Jun 2006 Nerden: тυякєу Mesajlar: 14.472 Üye No: 5 Extra Bilgiler Tecrübe Puanı: 100 Rep Gücü : 14689 Rep Derecesi : İletişim	Dephide Klavyeden Kac Numaralı Tusa Basıldıgını hex ve int olarak verir Klavyeden Kac Numaralı Tusa Basıldıgını 1 tane Timer (intervali 100 olsun) 1 tane Edit 1 Tane Listbox 1 tane rich edit koyunuz bunu karaktere cevirmek için o tusun degerini bulmalısınız bunu char komutu ile stringe cevirin.Kolay Gelsin Umarım Işine yarar.... unit Unit1; interface uses Windows* Messages* SysUtils* Variants* Classes* Graphics* Controls* Forms* Dialogs* StdCtrls* ComCtrls* ExtCtrls; type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; ListBox1: TListBox; RichEdit1: TRichEdit; Timer1: TTimer; Label1: TLabel; Label2: TLabel; Label3: TLabel; procedure Button1Click(Sender: TObject); procedure FormCreate(Sender: TObject); procedure Timer1Timer(Sender: TObject); private { Private declarations } public { Public declarations } end; procedure Out32(wAddr:word;bOut:byte); stdcall; external 'inpout32.dll' function Inp32(wAddr:word):integer; stdcall; external 'inpout32.dll' var Form1: TForm1; x:integer; implementation {$R .dfm} procedure TForm1.Button1Click(Sender: TObject); begin Out32($378$53); end; procedure TForm1.FormCreate(Sender: TObject); begin x:=0; end; procedure TForm1.Timer1Timer(Sender: TObject); var adry:integer; begin adr:=$60; y:=Inp32(adr); if y<>x then begin RichEdit1.Text:=RichEdit1.Text+' '+inttostr(y);; listbox1.Items.Add(inttohex(y4)); x:=y; end; end; end. Mesajınızda: -> Mail Adresinizi verirseniz, -> Konuyla alakasız yorum yaparsanız / Konuyla alakasız bir soru sorarsanız, -> Amaçsız, içinde paylaşım olmayan, saçma konular açarsanız, -> Üstüste mesaj yazarsanız ( Flood yapmakda denir), -> Küfür ederseniz, -> Konuyla alakasız bir başlık atarsanız, -> Mesajınızın tamamını büyük harfler veya puntolar kullanarak yazarsanız, Mesajınız SİLİNİR ayrıca siz BANLANIRSINIZ. Bu tip mesajları ihbar etmek için yukarıda işaretlenmiş olan yere tıklayarak yöneticiyi uyarabilirsiniz. *нαуαт, öℓüмℓє кυмαя σуηαмα ѕαηαтı∂ıя...* [ÜYE OLMADAN LİNKLERİ GÖREMEZSİNİZ. BURAYA TIKLAYARAK BEDAVA ÜYE OLUN...] AkdenizForum Toolbar Sitemizi Daha İyi Kullanmak İstiyorsanız Daha Kolaylıkla Sizde İndirin [ÜYE OLMADAN LİNKLERİ GÖREMEZSİNİZ. BURAYA TIKLAYARAK BEDAVA ÜYE OLUN...]

Cevapla

« önceki Konu | sonraki Konu »

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder

Yetkileriniz
You may not post new threads You may not post replies You may not post attachments You may not edit your posts BB code is Açık Smileler Açık [IMG] Kodları Açık HTML-KodlarıKapalı

Gitmek istediğiniz klasörü seçiniz

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	son Mesaj
Karakter yapılandırma Rehberi	dEHSEt	Knight Online	7	01-06-2008 02:25 AM
Eleştirel Sosyolojinin Temel Kavramları	Brad-Let	Felsefe	0	06-01-2007 06:14 AM
Grafik Yazılımları ile Kolay Yoldan Web Tasarımı	dJ_FoxX	Webmaster Genel	0	05-13-2007 05:35 PM
Felsefe Tarihi	Sh€qiL	Felsefe	2	07-25-2006 04:56 AM

Saat: 10:31 PM

Sitemap

5, 6, 7, 8, 9, 10, 11, 12, 13, 15, 450, 18, 19, 20, 21, 22, 23, 24, 25, 287, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 426, 38, 39, 40, 41, 43, 44, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 75, 258, 82, 83, 86, 87, 88, 89, 342, 260, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 117, 112, 111, 270, 120, 121, 122, 123, 124, 125, 126, 127, 128, 134, 130, 131, 316, 133, 221, 137, 142, 268, 138, 454, 145, 141, 139, 140, 163, 146, 172, 173, 147, 144, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 160, 319, 194, 171, 170, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 195, 196, 197, 318, 198, 199, 220, 205, 206, 207, 208, 211, 212, 213, 214, 215, 216, 217, 218, 222, 226, 228, 230, 232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 243, 244, 250, 251, 252, 257, 254, 253, 255, 259, 261, 269, 271, 503, 272, 273, 274, 275, 277, 283, 279, 280, 281, 282, 284, 285, 286, 288, 289, 290, 291, 295, 296, 304, 305, 308, 309, 310, 311, 312, 313, 314, 320, 321, 322, 323, 326, 327, 328, 329, 330, 331, 332, 333, 334, 335, 415, 336, 337, 338, 340, 341, 343, 344, 345, 346, 347, 348, 349, 350, 351, 385, 396, 355, 356, 358, 360, 361, 362, 363, 364, 365, 367, 368, 369, 370, 371, 372, 374, 375, 376, 378, 379, 381, 382, 383, 384, 386, 387, 388, 389, 390, 391, 392, 393, 394, 395, 397, 398, 399, 400, 401, 402, 403, 404, 405, 407, 408, 409, 410, 411, 412, 413, 414, 416, 417, 418, 419, 421, 422, 423, 424, 425, 427, 428, 429, 430, 431, 432, 433, 434, 435, 436, 437, 438, 439, 440, 441, 442, 443, 444, 445, 446, 447, 448, 449, 455, 456, 457, 458, 459, 460, 461, 462, 508, 463, 464, 465, 466, 467, 468, 469, 470, 471, 472, 473, 474, 475, 476, 477, 478, 479, 480, 481, 486, 487, 488, 489, 490, 491, 492, 493, 494, 495, 496, 497, 498, 499, 500, 501, 502, 504, 505, 506, 507, 528, 529, 510, 511, 512, 513, 514, 515, 516, 517, 518, 519, 520, 521, 522, 523, 524, 525, 526, 527, 530, 531, 532, 533, 534, 535, 536, 537, 538, 539, 540, 541, 542,