Penulis: Gao Sumei
Cara sederhana untuk mengkonfigurasi mesin data (BDE, SQL Link)
Ketika program database didistribusikan, mesin data (BDE, SQL Link) perlu dijalankan, dan setelah program diinstal pada klien, mesin data perlu dikonfigurasi, seperti nama pengguna (username), kata sandi (PassWord) , dll. Jika konfigurasi manual diperlukan, beban kerjanya akan relatif besar. Saat ini, kita dapat menggunakan InstallShield For Delphi untuk mengimplementasikan konfigurasi dengan mudah. Saat menggunakan InstallShield For Delphi untuk membuat program instalasi, terdapat file teks *.iwz di direktori tempat program instalasi dibuat. Anda hanya perlu menambahkannya secara manual ke fragmen [IDAPI Alias]. Misalnya:
[Alias IDAPI]
nama pengguna=SYSDBA
kata sandi=kunci utama
Setelah menginstal program, mesin data dikonfigurasi secara otomatis.
Cara membuat strip kancing cepat
Setiap tombol grafis pada bilah tombol cepat mewakili fungsi yang umum digunakan. Pada saat yang sama, tombol grafis ini berukuran lebih besar daripada ikon biasa. Grafik yang lebih besar dan lebih jelas dapat ditempatkan, dan bahkan dapat membawa petunjuk singkat, yang mana sangat berguna untuk Sangat membantu bagi pengguna untuk menjalankan fungsi yang paling umum digunakan. Berdasarkan alasan di atas, semakin banyak aplikasi Windows yang mengadopsi strip tombol cepat untuk meningkatkan antarmuka aplikasi. Saat memprogram di Delphi, penulis menggunakan dua metode berbeda untuk mengimplementasikan bilah tombol cepat. Artikel ini menggabungkan contoh pembuatan bilah tombol cepat dengan dua kelompok yang terdiri dari enam tombol dan mencantumkan langkah-langkah desain spesifik dari kedua metode ini.
1. Metode pembangkitan kombinasi
(1) Tempatkan objek Panel1 pada formulir sebagai pembawa tombol grafis.
(2) Atur atribut Caption Panel1 ke kosong, atribut Align ke alTop, dan sesuaikan tingginya ke ukuran yang sesuai.
(3) Tempatkan enam tombol SpeedButton pada Panel1 (SpeedButton dipilih karena memiliki karakteristik mengambang).
(4) Tempatkan dua objek Bevel pada Panel1 dan sesuaikan posisi dan ukurannya untuk memisahkan kelompok tombol.
(5) Sesuaikan ukuran dan posisi SpeedButton1 di Panel1.
(6) Pilih SpeedButton1 dan atur propertinya Flat ke True.
(7) Klik tombol elipsis kecil yang sesuai dengan atribut Glyph of SpeedButton1, buka jendela PictureEditor, dan pilih ikon yang melambangkan "query". Setel properti ShowHint ke True dan properti Hint ke "Query".
(8) Ikuti langkah (5) hingga (7) untuk mengatur properti tombol SpeedButton yang tersisa.
Dengan cara ini, strip tombol cepat selesai. Saat dijalankan, tombol cepat ditampilkan dalam bentuk mengambang. Saat mouse digerakkan ke atasnya, garis besar tombol ditampilkan dan prompt kecil ditampilkan.
2. Pinjam metode pembuatan ToolBar
(1) Tempatkan objek ToolBar1 pada formulir.
(2) Atur properti EdgeBorders.ebLeft, ebTop, ebRight, dan ebButtom dari ToolBar1 ke True; properti Flat ke True; sesuaikan ukuran ToolBar1 ke ukuran yang sesuai.
(3) Pilih ToolBar1, klik kanan menu cepat, klik NewButton dan NewSeparator masing-masing untuk menambahkan enam tombol ToolButton dan dua garis pemisah.
(4) Pilih tombol ToolButton mana saja dan sesuaikan ukurannya ke ukuran yang sesuai. Semua ToolButton juga akan disesuaikan secara bersamaan.
(5) Atur properti BorderWidth ToolBar1 ke 3 untuk mengatur posisi ToolButton.
(6) Tempatkan objek ImageList1 pada formulir dan atur nilai properti Tinggi dan Lebarnya untuk mengakomodasi gambar berukuran lebih besar.
(7) Klik dua kali ImageList1 dan muat enam gambar masing-masing melalui tombol "Tambah", sesuai dengan enam ToolButtons di ToolBar1.
(8) Setel properti Gambar ToolBar1 ke ImageList1.
(9) Atur atribut ShowHint dari enam ToolButtons ke True, dan atur atribut prompt kecilnya masing-masing Hint.
(10) Anda juga dapat mengatur HotImages dari ToolBar1 untuk menentukan kumpulan gambar ketika mouse menunjuk ke tombol.
Bilah tombol cepat yang diimplementasikan menggunakan ToolBar memiliki tampilan serupa dengan yang dibuat dengan metode pertama.
Kedua metode di atas dapat mengimplementasikan bilah tombol cepat, namun masing-masing memiliki kelebihannya masing-masing: proses desain pertama relatif sederhana; metode kedua menyediakan lebih banyak fungsi, seperti menggunakan HotImages untuk menentukan kumpulan gambar saat mouse menunjuk ke tombol . Pembaca mungkin ingin memilih salah satu dan terus meningkatkan fungsinya.
Cara membuat tabel sementara
Entri data adalah bagian yang tak terelakkan dalam pengembangan program basis data. Dalam struktur Klien/Server, klien dapat memasukkan sekumpulan data dan kemudian mengirimkannya ke database backend server. Hal ini memerlukan tabel data sementara yang dibuat secara lokal (klien) untuk menyimpan data yang dimasukkan oleh pengguna. itu akan dihapus. Manfaat metode ini adalah: meningkatkan efisiensi input dan mengurangi beban jaringan.
Karena jumlah data yang dimasukkan oleh pengguna pada satu waktu umumnya kecil (tidak lebih dari beberapa ratus catatan), tabel sementara dapat dibuat di memori, sehingga menghasilkan pemrosesan yang lebih cepat. Ada dua cara untuk membuat tabel sementara:
1. Gunakan kontrol kueri untuk membuat tabel sementara
Langkah 1: Tempatkan kontrol kueri (TQuery) pada formulir dan siapkan tabel data yang terhubung.
Langkah 2: Tambahkan pernyataan berikut:
TQuery.CachedUpdates=Benar;
TQuery.RequestLive=Benar.
Langkah 3: Tambahkan sub-pernyataan Where setelah pernyataan SQL asli. Hasil kueri SQL harus kosong setelah menambahkan sub-pernyataan Where ini.
Misalnya:
PILIH Biolife."Nomor Spesies", Kategori, Nama_Umum, Biolife."Nama Spesies", Biolife."Panjang (cm)", Panjang_Dalam, Catatan, Grafik
DARI "biolife.db" Biolife
dimana Biolife.Category=′A′ dan Biolife.Category=′B′
Dengan cara ini, tabel sementara dibuat.
2. Gunakan kode untuk membuat tabel sementara
Kode fungsinya adalah sebagai berikut:
fungsi CreateTableInMemory(const AFieldDefs:TFieldDefs):
Kumpulan Data T;
var TempTable:TClientDataSet;
mulai
Tabel Temp:=nihil;
Hasil:=nihil;
jika AFieldDefs〈〉nihil maka
mulai
mencoba
TempTable:=TClientDataSet.Create(aplikasi);
TempTable.FieldDefs.Assign(AFieldDefs);
TempTable.CreateDataSet;
Hasil:=(TempTable sebagai TDataSet);
Kecuali
jika TempTable〈〉nil maka TempTable.Free;
Hasil:=nihil;
mengangkat;
akhir
akhir
akhir;
Sebut saja dalam program sebagai berikut:
Prosedur TForm1.Button1Click(Pengirim: TObject);
var ADDataSet:TDataSet;
mulai
ADataSet:=TDataSet.Buat(Mandiri);
dengan ADDataSet.FieldDefs lakukan
mulai
Tambahkan(′Nama′,ftString,30,False);
Tambah(′Nilai′,ftBilangan Bulat,0,Salah);
akhir;
dengan DataSource1 lakukan
mulai
DataSet:=CreateTableInMemory(ADataSet.FieldDefs);
Kumpulan Data.Buka;
akhir;
ADDataSet.Gratis;
akhir;
Dengan cara ini, tabel sementara dibuat.
Metode 1 mudah digunakan, tetapi karena penggunaan kontrol kueri, database latar belakang server perlu ditanyakan saat menghapus data, sehingga kecepatannya sedikit lebih lambat, dan tidak cocok untuk situasi di mana setiap bidang dalam tabel sementara adalah terdiri dari field dari beberapa tabel data. Metode 2 memiliki cakupan aplikasi yang luas dan cepat, namun memerlukan penulisan kode.
Menggunakan fungsi dalam database InterBase
Ketika pemrogram menggunakan InterBase sebagai database backend, mereka sering merasa tidak nyaman untuk menggunakannya karena menyediakan terlalu sedikit fungsi (hanya empat), sehingga tidak mungkin untuk menulis prosedur tersimpan yang rumit dengan mudah. InterBase sendiri tidak dapat menulis fungsi, tetapi dapat menggunakan fungsi eksternal (memanggil fungsi di DLL). Contoh berikut menunjukkan cara mendeklarasikan fungsi SUBSTR di InterBase.
MENYATAKAN SUBSTR FUNGSI EKSTERNAL
CSTRING(80), KECIL, KECIL
MENGEMBALIKAN CSTRING(80)
ENTRY_POINT "IB_UDF_substr" MODULE_NAME "ib_udf"
Diantaranya: MODULE_NAME adalah nama DLL, dan ENTRY_POINT adalah nama fungsinya.
Ini dapat digunakan setelah deklarasi, misalnya:
pilih SUBSTR (negara)
dari negara
Contoh ini menggunakan database IBLocal yang disertakan dengan instalasi Delphi. Pengguna juga dapat menulis fungsi mereka sendiri untuk memperluas InterBase.