Membuat pesan berjalan dengan Delphi

Beberapa kali saya menerima email yang bertanya bagaimana membuat program yang menampilkan text berjalan (pesan berjalan) seperti di program Shollu. Prinsipnya sederhana, hanya menampilkan text biasa dan setiap waktu posisinya dikurangi atau ditambah dengan nilai tertentu. Untuk mempermudah disediakan download program dan source codenya dalam Delphi

Program ini juga disertakan contoh aplikasinya, sehingga bagi anda yang tidak atau belum bisa pemrograman bisa menggunakan program ini, dan mencobanya sendiri. Selain itu program ini tidak hanya menampilkan text berjalan biasa, tetapi ditambah dengan beberapa fitur lain.

Fitur selengkapnya sebagai berikut :

• Menampilkan text berjalan diatas atau dibagian bawah window
• Dapat menampilkan text dengan warna latar (background), huruf, format Bold, Italic, Underline, dan ukuran font bisa disesuaikan
• Pesan bisa diulang sampai beberapa kali
• Kecepatan pesan bisa diatur
• Contoh pesan dan format Font bisa dilihat langsung
• Animasi ketika menampilkan dan menutup pesan

Selanjutnya jika ingin menambahkan fasilitas-fasilitas lain, silahkan melihat dan mengubah source code program ini. Program ini dibuat dengan Turbo Delphi Explorer 2006. Meskipun begitu, program ini harusnya juga bisa di compile dengan Delphi versi lainnya, misalnya Delphi 5, Delphi 6, Delphi 7 sampai Delphi 2007 atau versi terbaru.

Berikut tampilan Program “Pesan Berjalan”

Untuk Lebih jelasnya kunjungi link berikut:
Sumber: http://ebsoft.web.id/membuat-pesan-berjalan-dengan-delphi/

Program Koneksi Database Access Dari Visual Basic Net 2008

Wah hari sudah menunjukkan pukul 02:30 WIB dini hari. Hemmm sudah pagi toh? heheheh namun saya yakin masih semangat belajar kan? (belajar kehidupan) :D

Menjelang surya terbit nih ada postingan mengenai Program Koneksi Database Access Dari Visual Basic Net 2008
Silahkan anda buat dahulu database access.
Nama Database : BPC.mdb
Nama Table : Barang
Field
1. Kode  type Text
2. Nama type Text
3. Harga type Number
4. Jumlah type Number

Kemudian design form pada VB.NET 2008 dengan hanya satu komponen yaitu DataGridView saja yang ada di bagian Data (pada Toolbox)

Kemudian ketikkan listing Program Koneksi Database Access Dari Visual Basic Net 2008 berikut ini.

Imports System.Data.OleDb
Public Class Form1    Public DB As OleDbConnection
    Public ADP As OleDbDataAdapter
    Public DS As New DataSet

    Public Sub OpenDB()        Dim LOKASI = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source =E:DatabaseBPC.mdb"
        DB = New OleDbConnection(LOKASI)
        If DB.State = ConnectionState.Closed Then
            DB.Open()
        End If
    End Sub
    Sub TampilProduk()
          ' Tambahkan huruf T pada perintah SELEC       ADP = New OleDbDataAdapter("SELEC * FROM BARANG", DB)
        DS = New DataSet
        ADP.Fill(DS, "Barang")
        DataGridView1.DataSource = DS.Tables("Barang")
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load        Call OpenDB()
        Call TampilProduk()
    End Sub
End Class


Sumber: Mesran.net