Arsip: menjumlahkan suatu field
more 19 years ago
goodday
mas2 gmn cara menjumlahkan suatu field didalam suatu tabel.konensi ke databasenya pake ADO Conecction????
more 19 years ago
EkoIndri
biasa aja koq....
ADOStoredProc.parameter[1].values := TabelNilaiX.value + tabelNilaiY.values
ADOStoredProc.exeProc;
more 19 years ago
goodday
maksud saya itu mau menjumlahkan satu feild aja.misal menjumlahkan field pemasukan pada tabel saldo truz hasilnya ditaruh ke edittext.
makasih yaa mas ekoindri nih uda bnyak ngebimbing aku thanxss yaaa bravoo
more 19 years ago
cyber_hecker
banyak cara yang bisa digunakan. tapi kalo diriku biasanya menggunakan query untuk men-total-kan nilai pada satu field. sebagai contoh saya menggunakan tabel dengan nama 'TBarang', dan ingin menjumlahkan field 'QTY'. dengan menambahkan kode dibawah ini pada event AfterOpen-nya ADOTable1 :
yup begitu cara yang biasa ku gunakan. mungkin temen yang lain punya ide yang lebih baik
procedure TForm1.ADOTable1AfterOpen(DataSet: TDataSet);
begin
with ADOQuery1 do begin
SQL.Clear;
SQL.Append('SELECT SUM(QTY) AS TOTAL FROM TBarang');
Open;
Edit1.Text := FormatFloat('#,##0.##',FieldByName('TOTAL').AsFloat);
Close;
end;
end;
setelah itu, pada event onAfterDelete, dan onAfterPost - nya ADOTabel, eventnya pun diarahkan pada prosedure di atas, karena jika terjadi penyimpanan (baik edit, maupun tambah) maka data QTY harus dihitung kembali, demikian juga kalo terjadi penghapusan data.
yup begitu cara yang biasa ku gunakan. mungkin temen yang lain punya ide yang lebih baik 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 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
- fungsi count
by novicute in Paradox more 19 years ago - Non Aktifkan MEnu
by Nira in Hal umum tentang Pascal Indonesia more 19 years ago - [tips]: membuka file pdf menggunakan activeX control
by light_cc80 in Tip n Trik Pemrograman more 20 years ago - Cara Install crystal report di delphi ?
by dakocan in Reporting more 17 years ago - (Ask) Otomatis pindah ke form edit berikutnya ?
by diko_male in Hal umum tentang Pascal Indonesia more 16 years ago - Custom Thread Error?
by ir1keren in OOT more 16 years ago - tanyaaa Barcode absensi,,biar absen ga double??
by antrouzz in Hal umum tentang Pascal Indonesia more 17 years ago - [?] Dimana Mendefinisikan Variabel di FastReport BeforePrint
by babypigs in Bedah Kasus more 18 years ago - report yg sesuai keinginan kita
by goodday in Reporting more 19 years ago - FPC/Laz, Firebird, dan MacOS X
by simba in onLinux more 17 years ago