Fasilitas Cetak Barcode Dengan Delphi

Gimana siiich caranya? Ribet gaaa siiich? Apa saja yang dibutuhkan? tenang3, semuanya bisa diatasi. Membuat aplikasi cetak barcode di delphi semudah klik mouse koooo… loooch kobisa? ya iyaaaalah, karena di delphi sendiri sudah menyediakan fasilitas itu. Pernah denger yang namanya rave report? bagi anda yang pernah dan suka memakai QuickReport alangkah baiknya anda mencoba fasilitas rave report ini. Caranya mudah, hampir sama dengan Quick Report. Cuma untuk mengkoneksikan dengan database sudah ada fasilitas sendiri di Rave Report, begitu juga dengan Cetak Barcodenya tinggal anda pilih di Rave Reportnya dan anda sambungkan dengan database. Ketika di preview otomatis langsung jadi. Ga perlu library khusus kooo. Oh yaaa di Rave Report sendiri menyediakan berbagai macam Type Barcode, dari EAN, UPC, 39,128 dan lain2, sebaiknya anda memakai yang type 128 karena type ini bebas dipakai dan tidak terikat aturan2 tertentu. Selamat mencoba

Iklan

Tutorial Java Meload Tahun di JComboBox

ekedar OOT yaaa, ini ada source untuk meload Tahun do JComboBox. Maaf jika temen2 sduah pada tahu, ini cuma sharing aja kooo

Langsung saja buat procedure baru LoadTahun, niiich hasilnya :

public void LoadTahun(JComboBox cmb){

Calendar now = Calendar.getInstance();

int year=now.get(Calendar.YEAR);

cmb.removeAllItems();       //diremove dulu semua item yang ada

for(int i = 1950;i<=year;i++){

cmb.addItem(i);       //ini proses load tahunnya

}

cmb.setSelectedItem(year);

}

naaach jika sudah cukup dipanggil dari kontruktornya misalnya

LoadTahun(CmbTahun);

Load Data dari mysql ke ComboBox pada Delphi

Yups, ada yang masih belum faham? niiich scriptnya :

procedure TfrmPerintah.LoadCombo(combo:TComboBox;namaquery:TZQuery;isitable:TStringField);

var

i:integer;

begin

combo.Clear;

namaquery.Active:=true;

namaquery.First;

for i:=1 to namaquery.RecordCount do

begin

combo.Items.Add(isitable.Value);

namaquery.Next;

end;

end;

cara penggunaan :

1. buatlah sebuah unit tersendiri untuk menyimpan berbagai perintah yang akan digunakan disemua form yang ada. Dalam hal ini saya memakai nama frmPerintah, kemudian copykan secript diatas di unit tersebut.

2. Untuk menggunakan silahkan import terlebih dahulu di form baru yang anda mau loadkan datanya.

3. Pilih event OnShow pada properties delphi dan masukkan perintah procedure frmPerintah.LoadCombo(nmComboBox,NamaZeosQuery,FieldDariNamaZeosQuery);

4. Sebelumnya jangan lupa menginstall ZEOS Di Delphi anda, karena untuk koneksi ke database saya menggunakan ZEOS, terus bagaimana jika saya memakai ADO atau yang lainnya? Tentu saja anda dapat menyesuaikannya dengan sedikit mengedit scrip diatas, TZQuery gabti aja dengan ADOQuery atau yang lainnya

Table Warna-warni pada Java Desktop

Pernah ga berpikir untuk membuat table pada java desktop anda menjadi warna-warni? niiich saya kasih classnya :

nama classnya : WarnaTable.Java

/*

* To change this template, choose Tools | Templates

* and open the template in the editor.

*/

package inventorymarket.fungsi;

import java.awt.Color;

import java.awt.Component;

import javax.swing.JTable;

import javax.swing.table.DefaultTableCellRenderer;

/**

*

* @author Owner

*/

public class WarnaTable extends DefaultTableCellRenderer {

private Color ganjil;

private Color genap;

public WarnaTable(Color ganjil,Color genap){

this.ganjil=ganjil;

this.genap=genap;

}

@Override

public Component getTableCellRendererComponent(JTable table, Object value, boolean isSelected, boolean hasFocus, int row, int column){

Component component = super.getTableCellRendererComponent(table, value, isSelected, hasFocus, row, column);

if (row % 2 == 1){

component.setBackground(ganjil);

}else{

component.setBackground(genap);

}

return component;

}

}

eeeetsss, jangan terburu2 coding diatas hanya merupakan class yang dbuat agar qita tidak perlu berulang2 ulang melakukan coding. Untuk penggunaanya silahkan anda sisipkan contoh coding

Jtable.setDefaultRenderer(Object.class, new WarnaTable(jPanel1.getBackground(),tbSatuan.getBackground()));

dibawah initComponents();dan tentunya setelah tablenya dipanggil yaaa

loooch ko mas ada JPanelnya di dalam fungsinya??? tenang2, disitu kan ada functon getBackground() yang digunakan untuk mengambil warna dari JPanel. Bisa ko diganti dengan warna kesukaan kalian.

Tutorial Java, Meload data dari MySQL Ke JComboBox

Bagi yg baru belajar java(Sama seperti saya) dan belum tahu cara meload data dari mysql ke JComboBox, ini ada potongan functionnya

koneksiDB koneksi=new koneksiDB();

public void loadCombo(JComboBox cmb,String field,String table){

cmb.removeAllItems();

try{

java.sql.Connection connect=new koneksiDB().condb();

java.sql.Statement stat=connect.createStatement();

ResultSet rs=stat.executeQuery(“select “+field+” from “+table);

while(rs.next()){

String item=rs.getString(1);

cmb.addItem(item);

a++;

}

stat.close();

}catch(SQLException e){

System.out.println(“Error : “+e);

}

}

sedangkan koneksiDB koneksi=new koneksiDB(); pada potongan program diatas merupakan deklarasi fungsi yang saya ambil dari pakage class lain yaitu dari klas koneksiDB yang bisa dipakai berulang2 di class lain, agar qita tidak melulu menuliskan coding yang sama. naach ini isi classnya, silahkan buatkan package sendiri :

/*

* To change this template, choose Tools | Templates

* and open the template in the editor.

*/

package inventorymarket.fungsi;

/**

*

* @author Owner

*/

import java.sql.Connection;

import java.sql.DriverManager;

import java.sql.SQLException;

/**

*

* @author Owner

*/

public class koneksiDB {

public koneksiDB(){}

Connection con;

public void panggilDriver(){

try{

String driver=”com.mysql.jdbc.Driver”;

Class.forName(driver);

System.out.println(“Memanggil driver sukses”);

}catch(ClassNotFoundException cnfe){

System.out.println(“Pesan Error : “+cnfe);

}

}

public Connection condb() throws SQLException{

Connection koneksi=null;

try{

String url=”jdbc:mysql://localhost:3306/panti_db?zeroDateTimeBehavior=convertToNull”;

String user=”root”;

String pass=”bismillah”;

koneksi=DriverManager.getConnection(url,user,pass);

System.out.println(“Koneksi Database Sukses”);

}catch(SQLException e){

System.out.println(“gagal di : “+e);

}

return koneksi;

}

}