Dear Delphindo,

Saya buat suatu program sederhana untuk memapilkan semua kombinasi huruf seperti di 
bawah,

misal untuk tiga huruf AB dengan lebar data 3
kombinasi yang mungkin
   AAA
   AAB
   ABA
   ....
   BBB
saya gunakan program pengulangan dan dan satu functions untuk mengubah angka menjadi 
huruf
seperti ini

  for i:=1 to jumlahdata do
  for j:=1 to jumlahdata do
  for k:=1 to jumlahdata do
   stringgrid1.cell[I,J]:=huruf(i)+huruf(j)+huruf(k);
   
program bisa berjalan dengan baik, tapi waktu lebar data dan jumlah data saya tambah,
program jadi Running dan tidak selesai-selesai.
data yang saya gunakan mulai A...Z, lebar data 9
  program yang saya gunakan jadi seperti ini


  for i:=1 to jumlahdata do
  for j:=1 to jumlahdata do
  for k:=1 to jumlahdata do
  for l:=1 to jumlahdata do
  for m:=1 to jumlahdata do
  for n:=1 to jumlahdata do
  for o:=1 to jumlahdata do
  for p:=1 to jumlahdata do
  for q:=1 to jumlahdata do
  
   
stringgrid1.cell[I,J]:=huruf(i)+huruf(j)+huruf(k)+huruf(l)+huruf(m)+huruf(n)+huruf(o)+huruf(p)+huruf(q);
   
apakah cara yang saya gunakan ini salah, atau mungkin dari rekan-rekan mempunyai cara 
yang lebih baik.

Terima kasih Atas pencerahannya

 
  




------------------------ Yahoo! Groups Sponsor ---------------------~-->
Upgrade to 128-Bit SSL Security!
http://us.click.yahoo.com/p7cEmB/s7qGAA/yigFAA/i7folB/TM
---------------------------------------------------------------------~->

Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/ 


Kirim email ke