beranda

Senin, 12 November 2012

cara membuat database dari delphi

gagambar dibawah ini adalah aplikasi database yang disambungkan dengan delphi 
berikut gambar nya

 
setelah itu kalau di klik mabna akan muncul data-data anak-anak pkpba kelas d4 permabnanya masing-masing

 gambar dibawah ini adalah data anak ibnu rusdi yang dikelas

 gambar dibawah ini  adalah data anak anak mabna al-ghazali

 dan gambar dibawah ini adalah data anak anak mabna kholdun

 dan gambar dibawah ini adalah data anak anak al-farabi

 dan gambar dibawah ini adalah data anak anak mabna ibnu sina


cara memutar musik




Pada pertemuan ke lima kemaren kami belajar tentang component mediaplayer untuk memutar file music.

Untuk memutar sebuah musi di Delphi kita membutuhkan komponen MediaPlayer.

berikut langkah-langkahnya :

Pertama buat project delphi baru

dalam Form1 tambahkan komponen Mediaplayer dengan pada bagian menu toolbar component pilih System => tambahkan komponen media player dengan memilih icon media player.



Berikut gambarnya :



Pada bagian Properties pada komponen mediaplayer1 masukkan file *.mp3 yang akan di putar dengan cara memilih FileName dan masukkan filenya.




 
Berikut gambarnya



Masih pada menu properties pada bagian AutoOpen rubah value menjadi tipe True

Berikut gamabarnya :




Selanjutnya Buat component mediaplayer1 menjadi tersembunyi dengan cara merubah value visible mediaplayer1 menjadi False

berikut langkahnya :



Dan tambahkan component button1 seperti pada gambar berikut ini :


Untuk codenya sebagai berikut


pada bagian Var tambahkan variabel button dengan tipe boolean dan set nilainya menjadi False.

  tombol:boolean=false;

Pada prosedur button1 ketikkan code berikut ini ;


procedure TForm1.Button1Click(Sender: TObject);
begin
  tombol:= not tombol;
  if tombol = true then

    begin

      button1.Caption := 'Music stop';

      mediaplayer1.Play;

    end

  else

    begin

      button1.Caption := 'Music play';

      mediaplayer1.Stop;

   end
end;                  
end.

Keterangan :
  tombol:= not tombol;
// Untuk mengganti nilai variabel tombol menjadi True dan False bergantian
  mediaplayer1.Play;
// Untuk memutar file music
  mediaplayer1.Stop;
// Untuk mematikan file music

Berikut catatan singkat saya tentang cara memutar file music menggunakan component mediaplayer pada delphi. semoga bermanfaat.

pengenalan aplikasi web

-->

            pada pertemuan ke 4  tentang mata kuliah IMK kemarin ( Interaksi Manusia dan Komputer), mulai pengenalan tentang aplikasi. Secara global dijelaskan bahwa aplikasi dibagi menjadi 3, yaitu aplikasi yang berbasis WEB, Desktop maupun yang berjalan pada perangkat mobile. Macam-macam aplikasi tersebut terdapat perbedaan antara satu dengan yang lain dan mempunyai kekurangan dan kelebihan .
                  pada pertemuan kemaren baru dikenalkan tentang aplipkasi yang berbasis web. Maka Untuk membuat sebuah aplikasi web seorang programmer harus menguasai beberapa bahasa pemrograman seperti HTML, JavaScript, PHP, SQL, CSS dan lain-lainya. Kita bisa belajar membuat sebuah aplikasi web sederhana, mungkin buat seorang pemula seperti saya ini bisa memanfaatkan sebuah CMS (Content Management System).
                        Aplikasi jenis web juga sering digunakan sebagai sarana untuk berkomunikasi , media pembelajaran,  mencari teman dan lain-lainya. Sebagai contoh jejaring sosial yang cukup terkenal adalah facebook, twitter dan friendster. Ketiga jejaring sosial tersebut sangatlah ramai sampai-sampai setiap detiknya pasti ada yang meng-akses dan membukanya. Untuk facebook sendiri sampai saat ini merupakan website urutan peringkat kedua stelah google yang paling banyak di kunjungi oleh para pengguna internet.