Menggabungkan Perangkap Kesalahan Try .. Except Dengan Try .. Finally, Untuk Mendapatkan Tampilan Pesan Kesalahan, Sekaligus Menjalankan Instruksi Penting Yang Wajib Tetap Berjalan Meski Ada Error (Kesalahan)

Niguru.com | Minggu, 30 Jun 2019 | Secara berturut-turut sejak posting pada website Niguru.com dua hari yang lalu kemudian disusul dengan posting kemarin, Niguru.com membahas mengenai cara untuk mengatasi kesalahan yang mungkin saja terjadi pada saat penggunaan aplikasi dengan memanfaatkan instruksi Try ..

Pada posting kali ini Niguru.com akan menjelaskan cara pemanfaatan instruksi Try .. Except dengan instruksi Try .. Finally secara bersamaan. Sehingga user bisa mendapatkan dua manfaat sekaligus, yaitu tampilnya pesan kesalahan yang saat itu sedang terjadi, dan instruksi penting yang tetap harus berjalan atau menampilkan data, tidak terganggu oleh kesalahan yang terjadi.



Untuk lebih jelasnya silakan lihat contoh script berikut ini:

var a,b,c:integer;
begin
try
try
    write('isikan nilai a: ');readln(a);
    write('isikan nilai b: ');readln(b);
    c:=a+b;
    writeln('hasil a + b = ',c);
finally
    writeln('penjumlahan sudah dilakukan');
    readln;
end;
except
    writeln('tetapi input salah, maka hasil tidak keluar!');
    readln;
end;
end.

Bila input data benar maka instruksi yang dijalankan adalah:

write('isikan nilai a: ');readln(a);
write('isikan nilai b: ');readln(b);
c:=a+b;
writeln('hasil a + b = ',c);
writeln('penjumlahan sudah dilakukan');
readln;

Hasilnya:

Bila input data salah /keliru maka instruksi yang dijalankan adalah:

writeln('penjumlahan sudah dilakukan');
readln;
writeln('tetapi input salah, maka hasil tidak keluar!');
readln;

Hasilnya:

Demikianlah penjelasan dan contoh script, penggabungan instruksi Try .. Except dan Try Finally.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Inilah Cara Pemanfaatan Instruksi Try .. Finally Sebagai Penerus Perintah Untuk Menjalankan Instruksi Saat Kesalahan Terjadi Pada Pemrograman Delphi

Niguru.com | Sabtu, 29 Jun 2019 | Pada posting sehari sebelumnya, Niguru.com sudah menjelaskan mengenai pemanfaatan instruksi Try .. Except sebagai perangkap kesalahan dalam aplikasi yang dibuat dengan bahasa pemrograman Delphi.

Maka pada posting kali ini Niguru.com akan menjelaskan satu lagi instruksi yang juga dipakai sebagai antisipasi apabila terjadi kesalahan dalam penggunaan aplikasi. Instruksi yang dijelaskan pada posting kali ini adalah Try .. Finally.



Seringkali dalam sebuah aplikasi diperlukan kepastian bahwa sebuah deretan instruksi tertentu tetap dijalankan, meski saat itu sedang terjadi kesalahan (misalnya kesalahan input data). Misalnya saja, sebuah pemberitahuan bahwa proses sudah berakhir, atau proses pengosongan memory, atau proses pengembalian nilai awal dari suatu variabel, dan lain sebagainya.

Untuk keperluan tersebut Delphi sudah menyediakan instruksi Try .. Finally. Format penulisannya adalah sebagai berikut:

try
{deretan instruksi}
finally
{instruksi yang wajib dijalankan meski terjadi kesalahan}
end;

Untuk lebih jelasnya lihat contoh script berikut ini:

var a,b,c:integer;
begin
try
    write('isikan nilai a: ');readln(a);
    write('isikan nilai b: ');readln(b);
    c:=a+b;
    writeln('hasil a + b = ',c);
finally
    writeln('proses penjumlahan selesai');
    readln;
end;
end.

Dari script diatas itu, saat aplikasi dijalankan (running), bila user mengisikan data yang benar, maka instruksi berikut ini dijalankan oleh system:

write('isikan nilai a: ');readln(a);
write('isikan nilai b: ');readln(b);
c:=a+b;
writeln('hasil a + b = ',c);
writeln('proses penjumlahan selesai');
readln;

Namun bisa, terjadi kesalahan input yang dilakukan oleh user (misalnya a = 10 dan b = huruf k), maka instruksi ini tetap dijalankan:

writeln('proses penjumlahan selesai');
readln;

Tanpa adanya instruksi Try .. Finally, bila sebuah kesalahan terjadi maka system akan mengabaikan seluruh instruksi yang ada hingga akhir program. Dalam aplikasi besar dan memiliki fungsi krusial, kondisi dimana seluruh instruksi yang tersisa diabaikan oleh system, kadang bisa membuat system lain yang masih berkorelasi dengan aplikasi yang sedang dijalankan menjadi ikut terganggu.

Dalam sebuah project yang besar, ketersediaan instruksi Try .. Finally ini sangat membantu, misalnya dalam project pengontrolan robot industri, yang ditangani oleh team Niguru.com, berkat ketersediaan instruksi ini, pada saat terjadi kesalahan dalam pemberian input pada robot, maka gerakan robot untuk kembali ke posisi awal, tetap dilakukan.

Demikianlah penjelasan mengenai instruksi Try .. Finally pada bahasa pemrograman Delphi.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Inilah Cara Penggunaan Instruksi Try .. Except Sebagai Perangkap Kesalahan Pada Pemrograman Delphi

Niguru.com | Jumat, 28 Jun 2019 | Dalam pembuatan program, tentunya seorang programmer tahu bahwa selain kesalahan script, kesalahan bisa juga terjadi akibat user meng-input data yang keliru.

Untuk mengatasi masalah semacam ini setiap bahasa pemrograman menyediakan instruksi yang dapat digunakan untuk menampilkan hasil dari instruksi "back up" yang akan dijalankan (running) saat sebuah kesalahan terjadi.


Delphi menyediakan perangkap kesalahan berupa instruksi Try .. Except, yang format penulisannya adalah:

try
{instruksi yang sesungguhnya akan dijalankan (normal condition)};
except
{instruksi back up, yang akan dijalankan saat kesalahan /error terjadi (error condition)};
end;

Contoh script:

var a,b,c:integer;
begin
try
    write('isikan nilai a: ');readln(a);
    write('isikan nilai b: ');readln(b);
    c:=a+b;
    writeln('hasil a + b = ',c);
    readln;
except
    writeln('salah input!');
    readln;
end;
end.

Bila nilai yang diisikan benar:

Bila nilai yang diisikan salah (misalnya: 10 ditambah dengan huruf k), tampil pesan kesalahan:

Demikianlah contoh penggunaan instruksi Try .. Except, yang dapat digunakan sebagai perangkap kesalahan.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Membaca QR Code Atau Barcode Yang Sudah Tersimpan Pada Library Handphone Dengan Menggunakan Aplikasi Google Lens

Niguru.com | Kamis, 27 Jun 2019 | Pada posting bulan lalu, Niguru.com pernah membahas mengenai QR code, yaitu kode matriks yang merupakan pengembangan dari barcode, yang semula digunakan untuk identifikasi unit pada pabrik otomatif di Jepang, kemudian berkembang ke berbagai bidang hingga seperti sekarang ini, dimana penggunaan QR code sudah sedemikian umum.

Aplikasi untuk membaca QR code untuk di-install di HP (handphone) ber-OS Android, cukup banyak. Namun aplikasi untuk membaca QR code yang sudah tersimpan pada HP (bukan membaca dari QR code yang tertangkap oleh kamera HP) tidak banyak.

Salah satu aplikasi yang dapat membaca QR code yang sudah tersimpan pada library, adalah Google Lens. Aplikasi ini adalah pengembangan dari aplikasi Goggle (penulisan ini tidak salah, menggunakan satu “o” dan dua “g”) yang penggunaannya sudah dihentikan pada 2018 lalu.

Buka aplikasi Google Lens, untuk memilih gambar yang ada pada library klik icon “library” di bagian atas agak kekanan.

Pada library, pilih QR code yang akan dibaca.

Hasil pembacaan QR code akan ditampilkan di bawah QR code.

Demikianlah penjelasan mengenai aplikasi Google Lens untuk OS Android.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Inilah Cara Agar Sumber Komentar Yang Ada Pada Halaman Website Anda Tercatat

Niguru.com | Rabu, 26 Jun 2019 | Bila anda adalah pemilik website atau blog yang konten dan artikel yang ada didalamnya anda update secara reguler, kemungkinan besar website atau blog yang anda miliki memiliki kolom komentar, sebagai sarana bagi para pembaca untuk menuliskan komentar mengenai artikel atau konten dari website atau blog anda.

Pada posting kali ini Niguru.com akan menjelaskan cara untuk mengaktifkan setting pada kolom komentar pada blogger (blogspot), untuk mengaktifkan fungsi untuk “memaksa” penulis komentar untuk mencantumkan email atau Google account. Dengan cara demikian maka sumber dari komentar yang ada dapat ditelusuri berdasarkan email dari penulis komentar.



Buka blogger anda dan pilih side menu Settings > Post, comments and sharing
Pada Who can comment? Pilih opsi User with Google Accounts, klik Save settings setelah selesai

Hasilnya setiap pengunjung yang menuliskan komentar harus login pada account Google terlebih dahulu.

Demikianlah penjelasan mengenai cara untuk mengatur setting pada kolom komentar.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Promosikan File PDF Atau Power Point Dengan Konten Yang Menjual Pada Slide Share

Niguru.com | Selasa, 25 Jun 2019 | Bila anda berkecimpung di dunia pemasaran online, dan anda memiliki katalog, buku panduan, buku promosi, yang dapat digunakan untuk menarik customer agar bersedia bertransaksi dengan anda, maka cobalah untuk mempromosikannya lewat SlideShare.

SlideShare adalah layanan yang disediakan oleh sosial media LinkedIn sebagai sarana untuk menampung materi presentasi dari pada anggota (member) dari LinkedIn. Banyak mentor, eksekutif, penulis, pengajar, dan juga individu dari berbagai bidang menyumbangkan pengetahuannya lewat SlideShare.



Saat tulisan ini ditulis anggota SlideShare sudah lebih dari 70 juta, dan anggota LinkedIn sudah lebih dari setengah miliar, dan berasal dari lebih dari 200 negara di dunia dan tentunya ini merupakan pasar yang potensial bila anda berkecimpung di dunia pemasaran online.
Maka menempatkan slide yang anda buat pada SlideShare adalah salah satu cara yang cocok untuk meningkatkan jumlah customer anda.

Karena SlideShare adalah milik LinkedIn, maka untuk dapat mengakses SlideShare anda harus mendaftarkan diri pada LinkedIn. Bila anda sudah menjadi anggota (member) LinkedIn, maka account yang sama dengan account LinkedIn, dapat anda gunakan untuk login pada halaman SlideShare.

Kunjungi SlideShare dengan mengetikkan URL: https://www.slideshare.net/ pada browser anda.
SlideShare dapat menampilkan file PDF, Power Point, File video (MP4, FLV, AVI, dan lain sebagainya) pada halaman displaynya. Anda dapat meng-upload file pada halaman upload, dan kemudian menentukan kategori dari konten file tersebut.

SlideShare juga merupakan tempat dimana para investor sering berselancar untuk mencari perusahaan baru sebagai tempat mereka menempatkan investasi mereka di kemudian hari. Maka bila anda adalah pengusaha yang sedang membutuhkan tambahan dana segar untuk pengembangan perusahaan, tuliskanlah gagasan anda, visi dan misi perusahaan yang anda bangun dalam bentuk presentasi, dan upload ke SlideShare.

Demikianlah sekelumit penjelasan mengenai SlideShare dan manfaatnya bagi usaha anda.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Inilah VBA Untuk Membuat Shutdown OS Windows

Niguru.com | Senin, 24 Jun 2019 | Pada beberapa aplikasi tertentu, kadangkala diperlukan fasilitas untuk keluar dari OS dan mematikan komputer. Biasa programmer membutuhkan fungsi ini untuk aplikasi yang bersifat “utilities” (pengaturan kinerja OS).

Misalnya saja aplikasi yang berfungsi untuk menjalankan suatu hardware, dimana bersamaan dengan di-copy-nya file untuk membantu jalannya hardware, di-instal juga beberapa file library yang didaftarkan pada registry. Maka untuk memastikan seluruh library dijalankan oleh system, biasanya diperlukan restart.



Atau bisa juga suatu aplikasi yang setelah waktu tertentu akan stop dengan sendirinya dan untuk menghemat pemakaian listrik dan memperpanjang usia komputer maka komputer dimatikan saat tidak dipakai.

Berikut ini procedure untuk mematikan Windows:

Sub ShutdownWin()
Dim OpsiKu As String

OpsiKu = "/s" 'opsi untuk shut down
' pilihan opsi lainnya:
' opsi untuk restart /r
' opsi untuk log off /l
' opsi untuk hibernate /h

OpsiKu = "Shutdown.EXE " & OpsiKu
Shell OpsiKu, vbNormalFocus

End Sub

Demikianlah VBA untuk membuat PC mati atau restart, dimana instruksi harus disesuaikan dengan opsi yang dipilih (ikuti keterangan diatas, yang disisipkan pada script).
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Mengelompokkan Sekumpulan Deklarasi Variabel Menjadi Sebuah Deklarasi RECORD Pada Delphi

Niguru.com | Minggu, 23 Jun 2019 | Pada Delphi terdapat fasilitas untuk mendeklarasikan sekaligus sekelompok variabel, dengan tujuan untuk memudahkan programmer dalam membuat dan mengedit program yang dibuatnya. Sekelompok variabel dapat dikelompokkan dan dideklarasikan sebagai sebuah variabel baru yang mempunyai tipe data RECORD.

Pada aplikasi berukuran besar seringkali terdapat sekolompok data yang saling berkorelasi, namun kadang mempunyai variabel yang mirip dengan kelompok data lainnya.
Misalnya: kelompok data karyawan, mempunyai variabel: Nama, Alamat, NoPhone, IDKaryawan, dan Email
Sementara kelompok data customer, mempunyai variabel: Nama, Alamat, NamaPerusahaan, NoPhone, IDCustomer, dan Email.



Agar tidak tercampur maka konversi variabel umum menjadi variabel record menjadi salah satu solusi.
Berikut ini contoh script Delphi yang menggunakan RECORD sebagai variabelnya:

type
GKaryawan =record
Nama, Alamat, NoPhone, IDKaryawan, Email:string;
end;
GCustomer=record
Nama, Alamat, NamaPerusahaan, NoPhone, IDCustomer, Email:string;
end;

var
GroupKaryawan:GKaryawan;
GroupCustomer:GCustomer;

begin
writeln('ujicoba mengisi data: ');
write('Nama Karyawan: ');readln(GroupKaryawan.Nama);
write('Nama Customer: ');readln(GroupCustomer.Nama);
writeln(GroupKaryawan.Nama, ' : ', GroupCustomer.Nama);
readln;
end.

 Hasilnya:

Demikianlah penjelasan mengenai tipe data RECORD pada aplikasi pemrograman Delphi.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Function Untuk Mencetak File Teks (.TXT) Pada Delphi

Niguru.com | Sabtu, 22 Jun 2019 | File jenis text only (file yang didalamnya hanya memiliki konten teks), merupakan file yang sering dipilih sebagai interface antara 2 atau beberapa aplikasi yang berbeda.

Itulah sebabnya function untuk mencetak file teks (biasanya berekstensi /extension .TXT) biasanya diperlukan oleh seorang programmer, sebagai salah satu kelengkapan pembuatan aplikasi.



Berikut ini function-nya:

Function TXTPrint(InputFile:textfile):boolean;
TXTPrint:=false;
begin
FileName:=InputFile;
Assignfile(InputFile,FileName);
Reset(InputFile);
While not eof(InputFile) do
 assignprn(InputFile);
 rewrite(InputFile);
 writeln(InputFile,'Sedang mencetak'  + FileName);
 closefile(InputFile);
end;
TXTPrint:=true;
end;

Contoh penggunaan:
HasilCetak:=TXTPrint('MyTextFile.txt');

Untuk menggunakan function ini pada uses harus mendeklarasikan printers.
Bila sukses mencetak, maka nilai dari TXTPrint = TRUE, dan bila gagal mencetak nilai TXTPrint = FALSE.
Demikianlah function untuk mencetak file berformat teks pada Delphi.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Function Untuk Mengambil Nama File Dengan Cara Browsing Pada Windows Explorer

Niguru.com | Jumat, 21 Jun 2019 | Dalam sebuah aplikasi tertentu kadangkala diperlukan pengisian text box dengan nama file (file name), dengan path yang lengkap, berarti termasuk nama drive dan lokasi folder dimana file tersebut berada.

Misalnya: C:\Windows\System\Uji.dll berarti menunjukkan file Uji.dll yang berada pada drive C: dan berada pada folder: \Windows\System\

Mengetikkan nama file berikut path, beresiko terjadi kesalahan dalam pengetikkan. Melakukan copy - paste dengan browsing pada Windows Explorer, kemudian meng-copy path yang tampil pada sisi atas Windows Explorer tidak praktis.



Pada posting kali ini, Niguru.com akan menjelaskan function untuk meng-copy nama file dengan cara browsing  dan meng-klik file yang terpilih, dan secara otomatis nama file, lengkap dengan path-nya langsung ter-copy.

Function ini asalnya adalah sebuah procedure dari file sampel dari Microsoft bernama: Northwind.mdb, yang kemudian oleh Niguru.com diedit dan diubah menjadi Function.

Berikut ini function-nya:

Function GetFileName() As String
GetFileName = ""
Dim result As Integer
With Application.FileDialog(msoFileDialogFilePicker)
 .Title = "Select File"
 .Filters.Add "All Files", "*.*"
 .FilterIndex = 1
 .AllowMultiSelect = False
 .InitialFileName = CurrentProject.Path
 result = .Show
 If (result <> 0) Then GetFileName = Trim(.SelectedItems.Item(1))
End With
End Function
'--------------------------------------------------------------------------------------
Contoh penggunaannya:

Text0 = GetFileName()
'--------------------------------------------------------------------------------------

Demikianlah cara untuk membuat function untuk meng-copy nama file.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Pointer, Tipe Data Paling Fleksibel Pada Bahasa Pemrograman Delphi

Niguru.com |Kamis, 20 Jun 2019 | Ada sebuah tipe data spesial /khusus yang ada di Delphi yaitu tipe data pointer, tipe data jenis ini unik karena sebenarnya pointer adalah PELENGKAP sebuah tipe data, jadi bukanlah tipe data yang sebenarnya.

Pada aplikasi Delphi tipe data pointer digunakan untuk menyatakan sebuah tipe data yang pada saat operasi berlangsung bisa dibuat menjadi ada /aktif dan bisa juga dibuat menjadi tidak ada /non aktif.



Borland sebagai produsen Delphi menyediakan pointer ini untuk membantu programmer dalam membuat aplikasi yang membutuhkan variabel dalam jumlah banyak. Dengan menggunakan pointer, programmer cukup mendeklarasikan beberapa variabel saja kemudian dibuat aktif atau non aktif sesuai dengan keperluan.

Untuk mengaktifkan pointer digunakan instruksi NEW, dan untuk me-non aktif-kan digunakan instruksi DISPOSE. Ciri khas dari pointer adalah ada tambahan karakter ^ diawal deklarasi dan karakter ^ mendampingi variabel bertipe data pointer, pada saat variabel tersebut digunakan dalam operasi.
Agar lebih jelas, ikuti contoh dan penjelasan berikut ini:

Ketikkan instruksi berikut ini pada halaman Project Source:

Type
pelengkapinteger = ^Integer;

var
a,b,c :pelengkapinteger;
begin
new(a);write('a = ');readln(a^);
new(b);write('b = ');readln(b^);
new(c);
c^:=a^+b^;
writeln('hasil penjumlahan a + b adalah: ', c^);
dispose(a);dispose(b);dispose(c);
readln;
end.

Hasilnya:

Demikianlah penjelasan mengenai pointer. Semoga penjelasan pada posting kali ini dapat menambah wawasan dan pengetahuan bagi para pembaca sekalian.
Selamat beraktivitas .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Membuat Text Editor Sederhana (Dasar) Dengan Menggunakan Bahasa Pemrograman Delphi

Niguru.com | Rabu, 19 Jun 2019 | Pengolahan data yang ada pada file berformat text, seringkali diperlukan oleh programmer dalam membangun sebuah aplikasi. File berformat teks yang berukuran kecil seringkali dipilih sebagai media untuk mentransfer data dari sebuah aplikasi ke aplikasi lainnya.

Pada posting kali ini Niguru.com akan menjelaskan langkah-langkah untuk membuat aplikasi TEXT EDITOR sederhana yang hanya dilengkapi dengan sebuah canvas kecil sebagai halaman editor, sebuah tombol untuk memuat file (tanpa ada opsi dialog) dan sebuah tombol untuk menyimpan file (juga tanpa opsi dialog).



Script sengaja dibuat sederhana agar pembaca dapat memahami secara persis instruksi apa saja yang merupakan instruksi inti untuk mengolah data pada file berformat teks.

Buat file berformat teks (.TXT) dengan aplikasi Notepad, beri nama MyTextFile.txt (boleh menggunakan nama lain, asalkan tahu cara merubah script program):

Buka Delphi, pada Form Canvas tempatkan komponen Memo dan 2 buah Button /tombol:

Ubah nama Button1 menjadi LoadFileText:

Ubah nama Button2 menjadi SaveFileText:

Pada event click pada LoadFileText, ketikkan script:
Var
InputFile:textfile;
FileName,FileContent:string;
Begin
FileName:='MyTextFile.txt';
Assignfile(InputFile,FileName);
Reset(InputFile);
While not eof(InputFile) do
Begin
Readln(InputFile,FileContent);
Memo1.lines.add(FileContent);
End;
Closefile(InputFile);

Pada event click pada SaveFileText, ketikkan script:
Var
OutputFile:textfile;
FileName,FileContent:string;
Begin
FileName:='MyTextFile.txt';
Assignfile(OutputFile,FileName);
Rewrite(OutputFile);
Writeln(OutputFile,memo1.text);
Closefile(OutputFile);
Showmessage('File Content Edited And Saved!');

Hasilnya:

www.Niguru.com (Nino Guevara Ruwano)

Inilah Trik Untuk Membuat Kartu Atau Video Ucapan Selamat Yang Bagus Dengan Cara Yang Mudah

Niguru.com | Selasa, 18 Jun 2019 | Sebagai makhluk sosial, dalam pergaulan sudah menjadi kebiasaan bahwa sebagai sesama manusia kita akan saling mengucapkan salam dan memberikan selamat kepada orang-orang yang dekat kepada kita, baik itu teman, famili atau kolega kerja.

Untuk keperluan tersebut ada sebuah website yang menyediakan sarana bagi para pengunjungnya untuk membuat kartu ucapan selamat atau sekedar ucapan “good morning” untuk dibagikan. Disana sudah tersedia berbagai gambar menarik dan juga berbagai template untuk memudahkan pengunjung dalam membuat kartu ucapan selamat.



Kunjungi URL: www.123Greetings.com , disana anda akan disuguhi berbagai fasilitas untuk membuat kartu ucapan selamat atau ucapan salam:

Di website ini juga tersedia berbagai pilihan ucapan dalam bentuk VIDEO:

Anda bisa memilih sendiri slide yang ingin ditampilkan, kata-kata yang ingin ditampilkan pada slide dan juga dapat memilih sendiri musik pengiring slide-nya sesuai dengan keinginan.

Dan bagi pengguna smarphone /handphone dengan OS Android, tersedia juga aplikasi untuk keperluan serupa yang dapat di-download di playstore:

Jadi tunggu apa lagi? Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Membuat Non Aktif Maximize Button Pada Form Microsoft Access

Niguru.com | Senin, 17 Jun 2019 | Form pada aplikasi biasanya memiliki banyak object yang posisinya sudah diatur tata letaknya agar tampilan form dapat memberikan kenyamanan dan kemudahan bagi user untuk menggunakan form tersebut. Biasanya pada form terdapat tombol Minimize dan Maximize yang biasanya ditempatkan di bagian pojok kanan atas dari form.

Banyak user yang tidak mengetahui bahwa membuat maximize form dari suatu aplikasi tidak akan memperbesar ukuran object didalamnya, yang membesar hanyalah ukuran canvas dari form yang bersangkutan. Untuk menghindari user meng-klik tombol maximize tersebut maka sebaiknya pada form aplikasi tombol maximize di buat non aktif (dimatikan fungsinya).



Berikut ini langkah-langkah untuk membuat non aktif tombol maximize:
Perhatikan posisi dari control box yang terdiri dari tombol, Minimize, Maximize dan Close:

Buka form tersebut pada mode Design View.
Pada tab Format, ubah nilai dari Min Max Button = Min Enabled:

Hasilnya, tombol maximize memang masih tampak pada form, namun tidak berfungsi apabila di-klik:

Demikianlah langkah-langkah untuk membuat non aktif tombol maximize, dan hanya menyisakan tombol minimize dan close saja.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Inilah Trik Untuk Menampilkan Detail Dari Sebuah Form List (Sejumlah Record Yang Ditampilkan Dalam Tampilan Datasheet)

Niguru.com | Minggu, 16 Jun 2019 | Pada beberapa pertemuan sebelumnya Niguru.com sudah membahas mengenai langkah-langkah untuk membuat Form Product, yang hasilnya ditampilkan dalam bentuk record-record yang tersusun pada datasheet.

Mengisi data pada datasheet kadangkala dirasakan kurang nyaman bagi sebagian user. Maka pada posting kali ini Niguru.com akan menjelaskan cara untuk menampilkan detail dari record, yang bersesuaian dengan record yang sedang dipilih pada datasheet.


Berikut ini langkah-langkahnya:

Buat form dengan nama f_detail_form (boleh menggunakan nama lainnya), dengan sumber dari tabel t_product:

Note:
Penjelasan mengenai pembuatan tabel t_product bisa dibaca pada posting berjudul: Membuat Form Produk Dengan Menggunakan Aplikasi Microsoft Access yang sudah diposting pada 13 Juni lalu.

Hasilnya:

Buka form f_product dan tambahkan sebuah text box dengan nama IDPro dan sebuah button /tombol dengan nama OpenDetails:

Set data source IDPro = [f_sub_product].[Form]![IDPro]

Aktifkan Event Procedure pada Event On Click dari button /tombol OpenDetails:

Ketikkan instruksi pada event on click tersebut, sebagai berikut:
If Not IsNull(IDPro) Then DoCmd.OpenForm "f_detail_product", , , "idpro=" & IDPro

Sembunyikan IDPro berikut labelnya dengan mengatur Format Visible = No:

Hasilnya:

Form f_detail_product akan menampilkan record yang sama dengan record yang terpilih pada datasheet yang ada pada f_product.

Demikianlah langkah-langkah untuk menampilkan detail dari sebuah form list.
Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)