Pencarian String Menggunakan Delphi
بسم الله الرحمن الرحيم
Alhamdulillah, segala puji bagi Allah yang memberi izin saya untuk kembali berbagi. Kali ini saya akan mengulas tentang pencarian string pada suatu string dengan delphi.
Tidak perlu berlama-lama, berikut langkah-langkahnya :
- Misal kita akan mencari kata "sehat" pada suatu string
- Logikanya, kita akan mencocokkan kata setiap karakter dari kata "sehat", yaitu s-e-h-a-t dengan string yang ada, misal disediakan string "Mari jaga tubuh agar sehat"
- Dari string yang ada, tentu kita akan mulai membandingkan kata yang awal karakternya huruf "s", karena awal karakter "sehat" adalah s
- Jika sudah ketemu huruf "s", kemudian bandingkan karakter selanjutnya hingga akhir karakter kata "sehat" dengan string yang telah ditemukan awal karakter adalah huruf "s"
- Jika semua perbandingan tiap-tiap karakter hasilnya sama hingga panjang dari kata "sehat", maka berhenti membandingkan
1. Tambahkan variabel sama : integer;
2. Beri variabel pada procedure Button Click
4. Berikut Coding pencarian
5. Pada Form Create, deklarasikan variabel sama := 0;
6. Sudah selesai, berikut source code lengkap di sini
7. Agar lebih bagus, kata yang ditemukan diberi tanda. Cukup menambahkan kode berikut
Memo1.SetFocus;
Memo1.SelStart:=k;
Memo1.SelLength := length(Edit1.Text);
Untuk lebih jelas, silikan unduh source code-nya di sini
Memo1.SelStart:=k;
Memo1.SelLength := length(Edit1.Text);
Untuk lebih jelas, silikan unduh source code-nya di sini
bang, klo kata yang dicari ketemu truz langsung diganti dengan kata baru, listing kodex gmna yaa??
ReplyDeletesama kaya fungsi replace di ms.word
makasih sebelumnya.
insya Allah mudah saja, anda tinggal tambahkan
DeleteMemo1.SelText := 'teksbaru'
terima kasih atas komentarnya
assalammualaikum
ReplyDeleteselamat malam mas
saya mau tanya ni
bagaimana ya cara melakukan pemenggalan suku kata pada kalimat menggunakan delphi?
misalnya saya buat kalimat:
"aku makan bersama anggun dan syukur atas kenikmatannya"
lalu akan menjadi
a-ku ma-kan ber-sa-ma ang-gun dan syu-kur a-tas ke-nik-ma-tan-nya
saya sudah mendeklarasikan variabelnya seperti ini:
v:huruf vokal;
k:konsonan smua
vk: huruf yg trdiri dari 1 vokal dan 1 konsonan
contoh : ba-ta, ba-si, su-ka , nah 'ta', si dan ka merupakan vk
v: trdiri 1 huruf vokal dalam suku kata
contoh : a-ku , a-yam, i-kan, u-dang , nah a dan u dsni v
kvk : contoh ma-kan , nah 'kan' merupakan kvk
dan seterusnya sampai
kkkvk : contohnya struk-tur
, mohon bantuannya
terimakasih :)