gunakan full-text-search apa ini apa itu..., howto, implementasinya pelajari tutorial ini: http://devzone.zend.com/article/1304 goodluck
kalo liat itu problem nya udah lain lagi....(yg diwarna merah) sepertinya type nya beda...... pingin tau field kde&tgl type nya apa? apakah harus menggunakan params?? karena utk solusi banyak jalan menuju roma... kesulitan pake param?? ya jangan pake param-param-an... silahkan dikembangkan lagi....
hah..penyakitnya delphi 7 ...masak sih...?? jadi penasaran... barusan tanya ama si-G , imo..kesimpulan sementara.... bukan penyakitnya delphi 7 setelah saya baca2 info disini (problem dan solusinya..) http://support.microsoft.com/kb/243349 gimana? agree?
hem...list out of bounds ya....... sepertinya ga di detect paramater tsb.... coba gini.. edit lagi querynya ....(hapus tanda %) before SELECT kde AS code, name as nama FROM barang, tgl as tanggal where kde like '%:nis%' and tgl like '%:tgl%' after SELECT kde AS code, name as...
ooo.... query masbro di set secara design... coba query yg tadi di ilanganin tanda + nya before SELECT kde AS code, name as nama FROM barang, tgl as tanggal where kde like '%'+:nis+'%' and tgl like '%'+:tgl+'%' after SELECT kde AS code, name as nama FROM ...
itu query yg terkait tadi ya?? yg kata masbro hasilnya query nya blm benar?? kalo saya pribadi blm isa tau cara penulisan tsb udah bener ato blm... masih ragu bagian yg di merah karena secara penulisan param emang dimulai titik dua : tapi secara sintak spertiny salah... jadi kalo boleh tau masbr...
:Peace: ye..ane juga becanda masbro..... udah nih maksi nya? menunya apa nih? main menu apa pop up menu? wkwkwkwkwk....adoh..... hhehehehe di edit lagi quotenya??.... wah...padahal quotenya readonly loh. bisa ajah nih masbro.... :shakehand2
maap mastah devil.inside, ada yg disensor dikit kata2nya ... kok malah dilempar ke aku? met makan siang mastah ups ada yg disensor lagi kata2nya... ------------------------------------- btw, penjelasannya sebenernya sudah terjawab diantara posting2 yg ada... ane cuman nge-quote ulang... //-----...
kalo pake database mysql, bisa gunakan insert select ex: -- jika struktur table sama persis insert into a_his select * from a; -- per field, utk antisipasi jika field berbeda tiap table insert into a_his(field_a,fieldb,..dst) select field_a,fieldb,..dst from a; -- silahkan variasikan sesuai kebu...
thanks info linknya, ane baru tau malah, ...meluncur ke TKP...... kalo saia..lagi mo donlod...baca2 dulu... hasil nguliknya di share ya gan...., ikut menanti...
itu kenapa? oia beda randomize sama randomizer apa? ups.... randomize --> procedure bawaan delphi, tujuannya biar random nya bener2 acak randomizer --> function bikinan sendiri..... randomizer --> sama saja dengan fungsi unikNomor ( yg ada di @ page#72, post#1426, Point#3 jadi yg tampil...
kalo problem ini... kudu sesepuh yg harus njawab deh, mampus dah gua...kalo pascal... btw, sambil nunggu sesepuh njawab... barusan nyoba searching ama simbah-G... kayaknya problemnya karena:......... kata dr.Bob's delphi, While each unit of a Borland Pascal program can have a Code Segment ...
mestinya bisa...dicoba aja dulu gan.. yg spesifik buat epson/ibm cuman di ESC-Code nya(send command2 tertentu ke printer, misal utk format string/bold/miring..dsb..) kalo buat cetak ja ...mestinya bisa.. alternatif buat test direct printing mode 1. bikin prosedure buat ngeprint //procedure nge...
1. bikin fungsi utk ngecek total Timage //fungsi ini ganda, selain itung juga hide function TForm1.cekTotalImage():Integer; var i :Integer; begin result:=0; for i:= 0 to self.ControlCount-1 do if (Self.Controlsi] is TImage) then begin (Self.Controlsi] as TImage).Hide; Inc(Result); end; end; 2....
tedit utk proses input,lebih condong ke manual ( ada coding2 nya) tdbedit lebih condong ke instan ( no coding ).. cuman maen2 properties udah jadi jadi agan lebih seneng yg mana? kalo gua pribadi lebih seneng pake tedit, alasannya: 1. manual, 2. jadi di aplikasi(keseluruhan yg terkait dg proses ...
hem........,kalo liat tujaun bikin programmnya dari code2 diatas...,coba di button klik nya di modfikasi... jadi gini: procedure TForm1.btn1Click(Sender: TObject); var i,maxRandom:Integer; begin maxRandom := cekTotalForm+1; Randomize; repeat i := Randomizer(maxRandom); list.Add(IntToStr(i)); //s...
ndak toh...maksudnya diabaikan.. sebelum nampilin form di kasih IF dulu.. misal if i>0 .. tampilkan form... gitu ini maksud pertanyaan yg mana ya ? intinya semua prosedur/fungsi diatas....hanya ada di form utama saja yup...gitu toh request kamu..... ok ... dari contoh proses diatas...seben...
