Arsip: bedain nomor dan abjad

more 19 years ago
adokonax
gimana caranya mbedain nomor dan abjad
cth : 12378abcde
hasil
num :5 digit
abjad :5 digit
mohon pencerahan???
thanks

more 19 years ago
EkoIndri
var
data : string;
indek,num,abjad : integer;
begin
num := 0;
abjad := 0;
for indek := 1 to length(data) do
begin
if copy(Data,indek,1) in <kumpulan karakter angka> then
num := num + 1
else
abjad:= bajad +1;
end;
MessageDlg('hasil proses identifikasi abjad'+Inttostr(abjad)+' dan angka '+inttostr(num),MtInformation,[mbOK],0);
end;

more 19 years ago
EkoIndri
kan pilihannya 2 mas..... kalau g abjad ya num... he.......2x
sebenarnya itu bisa dikategorikan sebagai operator....
sekarang yang buat thread gimana nih?
apakah untuk inputnya dah divalidasi kalau yang boleh masuk hanya huruf dan angka saja......
semangat bro./.....

more 19 years ago
adokonax
untuk menentuin kode akun.gini critanya, aq kan lagi coba2 buat aplikasi buat BPR. di BPR itu punya kode akun 0.100.2.01a,
nah klo kode sperti itu masuk ke jurnal kas.begono...

more 19 years ago
adokonax
ehh..bos eko,klo mo ikutan ngegarap gak papa?ntar kita bagi hasil sistem trustworthy...
gimana?

more 19 years ago
EkoIndri
saya dulu juga pernah buat aplikasi accounting
dimana untuk menentukan nomor rekeningnya mengalami kesulitan untuk master detailnya.
btw, boleh juga kalau kita kerjakan bersama.
mas posisi dimana?
more ...
- Pages:
- 1
- 2
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 5 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 5 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 5 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 13 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 13 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 13 years ago
Random Topic
- cari tutorial Quick Report
by budi_sleman in Tip n Trik Pemrograman more 15 years ago - cara memindahkan kursor ADOTable
by shindo in Tip n Trik Pemrograman more 18 years ago - [ASK] Bongkar kompresi file MP3
by suncen in Tip n Trik Pemrograman more 18 years ago - Download ms SQL Server 2000 Dimana ?
by hyde in MsSQL more 17 years ago - HARGA USER ATAU PROGRAMMER???
by n3o_cybertech in Tip n Trik Pemrograman more 18 years ago - menghitung objek
by birienz in Multimedia & Graphic Enhancement more 15 years ago - program multi user
by gito in Lain-lain more 18 years ago - menampilkan jpg pada TImage supaya bisa stretch
by shindo in Hal umum tentang Pascal Indonesia more 18 years ago - cara memasukkan data ke program......
by yulizar in Tip n Trik Pemrograman more 18 years ago - tampilan form transparan
by elektra_3328 in Hal umum tentang Pascal Indonesia more 14 years ago