Arsip: MaskEdit

more 16 years ago
syntax_error
kakak master semuanya, q mo nanya nich tentang maskedit..
misal gini edit mask di set huruf pertama M trus sisanya 7 karakter angka semua...
na misalkan klo kita ngetik character trus karakternya lom komplit 7 akan munculin pesen di status bar gitu gimana yach? trus misalkan klo karakternya udah 7 akan langsung munculin pesen gitu giman yach?
mohon bantunannya...coz binun ni..

more 16 years ago
betamax
Pada Event OnKeyPress, Deteksi Jumlah Karakter Di Object Edit, Gunakan Fungsi Length(Edit1.Text) balikan nya berupa jumlah angka. lalu tangkap dengan fungsi If,
If Length(Edit1.text) < 7 then label1.caption := 'Karakter belum lengkap' else ShowMessage('Horeee.. udah lengkap');

more 16 years ago
syntax_error
wew...langsung dijawab..oh ya sekalian nanya kakak...di edit mask tu yang character for blank khan tu harus disi khan? na khan kliatanya nggak enak dipandang klo misalnya jadi nanti tampilannya jadi M______ bisa nggak ya yang character for blank nya kosong ajah...and maksimal 7 char?

more 16 years ago
DelphiExpert
wew...langsung dijawab..oh ya sekalian nanya kakak...di edit mask tu yang character for blank khan tu harus disi khan? na khan kliatanya nggak enak dipandang klo misalnya jadi nanti tampilannya jadi M______ bisa nggak ya yang character for blank nya kosong ajah...and maksimal 7 char?klik tombol "..." di property EditMask, pada Input Mask Editor, set "Character for Blanks" dng spasi

more 16 years ago
syntax_error
@DelphiExpert: klik tombol "..." di property EditMask, pada Input Mask Editor, set "Character for Blanks" dng spasikak DE, klo aku kaci editmask maka script ini nggak jalan
If Length(EditMask1.text) < 7 then label1.caption := 'Karakter belum lengkap' else ShowMessage('Horeee.. udah lengkap');
coz yang keluar messageboxnya trus....gimana yach.....klo akal2an pake component edit bisa nggak yach....coz misalkan format editnya tu diawalnya harus ada huruf M
jadi edit1.txt := M ; na character M nya ni nggak bisa diapus and karakter selanjutnya harus number 7 biji....gimana yach kk?
more 16 years ago
n3o_cybertech
masknya sama dengan yang @mas_kofa kasih tapi kodenya coba yang ini :
if Length(Trim(MaskEdit1.Text)) < 7 then
Label1.Caption:='Belom lengkap coy!!!'
else
ShowMessage('Akhirnya...lengkap juga!!!');
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
- Cek duplikasi record
by jajang in Tip n Trik Pemrograman more 16 years ago - Membuat report untuk kertas continous, gimana caranya ya?
by ecka in Tutorial & Community Project more 18 years ago - help my
by kaka in Paradox more 17 years ago - membuat komponen
by peucang in Hal umum tentang Pascal Indonesia more 17 years ago - tolong aku (biner to image - image to biner)
by sketsa in Tip n Trik Pemrograman more 17 years ago - Delphi Web Base Application
by belajaraja in Web Programming more 18 years ago - metode pencarian dengan TableADO
by saysansay in Hal umum tentang Pascal Indonesia more 19 years ago - Desain Table
by ichan29 in MsSQL more 17 years ago - [Ask] Scanner LJK
by kick_ky in Tutorial & Community Project more 16 years ago - Decompose file jpg dan bmp
by dannytux in Tip n Trik Pemrograman more 17 years ago