Arsip: Filter Input TEdit

more 16 years ago
trisis
Dear All Dephi'er
saya mo tanya gima sih caranya kalo kita ingin memfilter inputan di TEdit agar hanya bisa di isi oleh ANGKA (1.2.3.....) saja dan tidak bisa di isi dengan huruf (a,b,c,...) ??
ditunggu pencerahannya yah
Thank's b4
salam
Trisis

more 16 years ago
budihermanto
on keypress
if (key in )Then
Begin
...
End
else
if key=#13 Then ....
coba dech

more 16 years ago
jayadi888
Kalau script/codenya dikit, jgn suruh orang mencari di postingan lain lah, bantu dikit napa gitu ???
di procedure on keypress [Tedit]
if not (key in ['a'..'z','A'..'Z',#13,#10,#8]) then
begin
showmessage('salah input tau');
key :=#0;
end;

more 16 years ago
jayadi888
@jayadi888: Kalau script/codenya dikit, jgn suruh orang mencari di postingan lain lah, bantu dikit napa gitu ??? di procedure on keypress [Tedit]sorry itu untuk huruf kalau angkaif not (key in ['a'..'z','A'..'Z',#13,#10,#8]) then begin showmessage('salah input tau'); key :=#0; end;
if not (key in ['0'..'9',#13,#10,#8]) then
begin
showmessage('salah input tau');
key :=#0;
end;

more 16 years ago
n3o_cybertech
Kalau script/codenya dikit, jgn suruh orang mencari di postingan lain lah, bantu dikit napa gitu ???walaupun itu hanya kode sederhana, tetap disiplin harus ditegakkan. bagaimana bisa maju kalo gak ada niat untuk mencari??? kode seperti ini sebenarnya mbah google pun bisa menyelesaikannya...lagian aq dulu juga dapetnya gak dari forum ini tapi dari mbah google koq...coba kalo hal ini terjadi terus menerus, gak sayang tuh space forum ini hanya untuk menjawab hal2 yang telah sering ditanyakan???
more ...
- Pages:
- 1
reply |
Report Obsolete
AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago
Random Topic
- buat button di dalam kolom grid??????
by fat_279 in Tutorial & Community Project more 16 years ago - DownLoad Delphi 3
by kangiwan in Hal umum tentang Pascal Indonesia more 15 years ago - penambahan
by ags606 in Hal umum tentang Pascal Indonesia more 18 years ago - nge-set date
by nurez in Hal umum tentang Pascal Indonesia more 17 years ago - Create Form
by coacoac in Tip n Trik Pemrograman more 17 years ago - coonect report wizard dari access ??
by nurez in Tip n Trik Pemrograman more 19 years ago - insufficient memory
by Rogeb_Shewrite in Paradox more 18 years ago - Tolong...caranya sampling data file mp3 ?
by shanders in Multimedia & Graphic Enhancement more 17 years ago - bagaimana cara Auto submit form ke wesite iklan
by kusqus in Tip n Trik Pemrograman more 15 years ago - Tolong dong mas jelasin maksud coding ini.....
by kepiss in Tutorial & Community Project more 12 years ago