Skip to main content

Me-filter input pada EditBox dengan Delphi 7

Agar EditBox hanya bisa menerima input karakter tertentu saja. Sebagai contoh agar EditBox hanya bisa diisi dengan bilangan, bukan karakter huruf.

Program berikut menunjukkan cara agar EditBox hanya bisa diisi dengan bilangan heksadesimal, yakini (0..9) , (A..F) , atau (a..f).

Procedure TFrom1.Edit1KeyPress (sender: TObject; Var Key: Char);
begin
if not(((Key>#48) and (key<=#57)) 0r ((key>=#65) and (key<=#70)) or (key>=#97) and (key<=#102)) or (key=#8)) then key:= #0; end;



Labels:

Comments

Post a Comment

Popular posts from this blog

Optimalkan Koneksi Internet Dengan "FULL SPEED"

Bagi kita ‘penjelajah internet’ pasti mendambakan koneksi internet yang cepat, sehingga kita dapat membuka halaman web dengan lancar dan mendownload data-data yang kita perlukan di dunia maya. Bayangkan saja, kalau kita berhadapan dengan koneksi yang lelet, padahal kita harus segera menyelesaikan pekerjaan dan apa yang kita butuhkan sebenernya sudah tersedia di internet, ditanggung pasti !
30 comments
Read more

Menghitung Volume Bangun Ruang Dengan PHP

Dalam kesempatan kedua ini saya akan sharing tugas saya yang kedua. yaitu pemrograman PHP, Di dalam tugas ini mahasiswa disuruh menampilkan Volume Bola, kerucut dan kubus.Dengan ketentuan jari-jari,tinggi,sisi yang sudah ditentukan. Untuk lebih jelasnya silahkan lihat dan pelajari program dan outputanya dibawah ini : <? $phi=3.14; $r=7; $t=14; $s=10; $volbola=(4/3)*$phi*$r*$r*$r; $volkerucut=(1/3)*$phi*$r*$r*$t; $volkubus=$s*$s*$s; echo"========================================="; echo"<br/>"; echo"Nama = Fauzan Vega Saputra"; echo"<br/>"; echo"Kelas = TI_B"; echo"<br/>"; echo"NIM = 3085111136"; echo"<br/>"; echo"========================================="; echo"<br/>"; echo"| Menghitung Volume Bola, Kerucut dan Kubus |"; echo"<br/>"; echo"========================================="; echo"<br/>"; echo"
5 comments
Read more

Program java Menghitung Bangun Kerucut & Tabung

Didalam program ini user menginputkan tinggi dan jari - jari untuk bangun A dan bangun B. kemudian program mengeksekusinya sehingga akan di ketahui luas permukaan dan volume bangun A maupun bangun B, sesuai tinggi dan jari - jari yang telah di inputkan. Berikut contoh programnya : import java.io.*; class fauyan {     double r,s,t;     double phi = 3.14;     double volumekerucut, volumetabung;     double luaskerucut, luastabung; /* Email  : f_zan.hack@yahoo.com Web   : fzan-aquana.blogspot.com             fauzanvs.blogspot.com */     void hitung() {         luaskerucut = (phi * r) * (s + r);         luastabung = (phi* r * 2) * (t + r);         System.out.println(" ");         System.out.println("  Luas Permukaan Kerucut : " +luaskerucut +" cm^2");         System.out.println("  Luas Permukaan Tabung : " +luastabung +" cm^2");         System.out.println(" ");         volumekerucut = (phi * r * r * t) / 3;
1 comment
Read more