• Proses-proses pembuatan project :

       

      

Pertama yang dilakukan pastinya browsing gambar di internet sesuai yang diinginkan. Setelah itu kita edit dalam photoshop agar background gambarnya transparan, untuk mengatur sizenya juga, dan terakhir kita simpan dengan format png. Lalu kita masukkan di delphi menggunakan Image yang ada di additional. Dalam gambar diatas saya menggunakan 4 timer dan 1 button.

 

Saat diklik Capek Ngejar :

Scipt code secara detailnya :

unit Unit1;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, pngimage, ExtCtrls, StdCtrls, TextAnim, Gradient,

  ButtonWithColor;

type

  TForm1 = class(TForm)

    Image1: TImage;

    Image2: TImage;

    Image3: TImage;

    Image5: TImage;

    Timer1: TTimer;

    Anim1: TTextAnimator;

    Anim2: TTextAnimator;

    Anim3: TTextAnimator;

    Gradient1: TGradient;

    Gradient2: TGradient;

    Image6: TImage;

    Timer2: TTimer;

    Timer3: TTimer;

    Timer4: TTimer;

    TextAnimator1: TTextAnimator;

    Button1: TBitBtnWithColor;

    Gradient3: TGradient;

    procedure Timer1Timer(Sender: TObject);

    procedure Timer2Timer(Sender: TObject);

    procedure Button1Click(Sender: TObject);

    procedure Timer3Timer(Sender: TObject);

    procedure Timer5Timer(Sender: TObject);

    procedure Button2Click(Sender: TObject);

    procedure Timer4Timer(Sender: TObject);

    procedure FormCreate(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

  a,b: Byte;

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);

begin

Image1.Left:=image1.left+5;

end;

procedure TForm1.Timer2Timer(Sender: TObject);

begin

  Image2.Visible:=False;

  TextAnimator1.Visible:=False;

  Image3.Left:=image3.left+4;

  Image6.Left:=image6.left+4;

  Anim1.Left:=Anim1.left+4;

  Anim2.Left:=Anim2.left+4;

  Anim3.Left:=Anim3.left+4;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

Timer3.Enabled:=True;

Timer2.Enabled:=False;

Timer3.Enabled:=True;

Timer4.Enabled:=False;

Image5.Visible:=False;

Gradient1.Visible:=False;

Gradient2.Visible:=False;

Gradient3.Visible:=True;

end;

procedure TForm1.Timer3Timer(Sender: TObject);

begin

Image2.Visible:=True;

TextAnimator1.Visible:=True;

TextAnimator1.Left:=TextAnimator1.Left-1;

Image2.Left:=Image2.Left-1;

end;

procedure TForm1.Timer5Timer(Sender: TObject);

begin

if      Image5.Left > 550 then b:=3

else if Image5.Left < 2   then b:=0;

if b=0 then Image5.Left:=Image5.Left+3

else Image5.Left:=Image5.Left-3;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Timer1.Enabled:=True;

Timer2.Enabled:=True;

Image1.Visible:=True;

end;

procedure TForm1.Timer4Timer(Sender: TObject);

begin

if Image1.Left=-253 then Image1.left:=696;

  Image1.Left:=image1.left+5;

Image2.Visible:=False;

  TextAnimator1.Visible:=False;

  Image3.Left:=Image3.left+5;

  Image6.Left:=Image6.left+5;

  Anim1.Left:=Anim1.left+5;

  Anim2.Left:=Anim2.left+5;

  Anim3.Left:=Anim3.left+5; 

end;

end.

          Tulisan ini saya tujukan untuk memenuhi tugas mata kuliah teknik multimedia. . .

• TEKNIK MULTIMEDIA

          Menurutku multimedia itu adalah sebuah ilmu yang mempelajari cara menggabungkan text, audio, grafik, animasi, dan video. Beberapa elemen tersebut digabungkan untuk menghasilkan sebuah karya seni yang membantu proses informasi, edukasi dan hiburan lebih berwarna. Pokoknya multimedia ini berhubungan dengan semua yang ada dipikiran kita untuk menghasilkan sebuah karya yang dapat menghibur juga mendidik dan kita dapat berkreasi dan berinovasi sesuai dengan imajinasi yang ada dikepala kita. Dengan adanya teknik multimedia sebuah karya seni tidak akan menjadi basi, dan para desain-desain grafis lainnya akan terus dan terus memunculkan sebuah karya seni lainnya yang membuat orang terkesima dan mulai tertarik untuk belajar teknik multimedia..

• MATKUL TEKNIK MULTIMEDIA

         Saya mengambil mata kuliah ini karena saya lebih suka desain daripada pemrograman yang sulit untuk dicerna otakku. . Bisa lebih mendalami lagi cara membuat sebuah karya seni sesuai dengan kreasi kita. Belajar multimedia pasti sangat menyenangkan daripada belajar pemrograman.

• TENTANG TEKNIK MULTIMEDIA

        Yang ingin saya pelajari yaitu cara membuat sebuah karya seni yang mengungkapkan kreasi-kreasi yang ada dan ingin aku ungkapkan dalam sebuah mahakarya. Bisa membuat animasi yang lucu dan keren.

• PERKULIAHAN TEKNIK MULTIMEDIA

      Teknik perkuliahan yang saya inginkan untuk matkul teknik multimedia ini lebih kearah praktek daripada teori. Karena praktek lebih sesuai dengan pelajaran-pelajaran yang lebih banyak harus berinteraksi dengan program. Jadi mahasiswa yang membawa laptop dapat langsung mempraktekan yang telah dijelaskan oleh dosen dan lebih baik lagi perkuliahan ini di laksanakan di Lab  Informatika daripada di kelas. Setelah diberi contoh sekilas tentang kreasi-kreasi dari program-program multimedia, mahasiswa langsung disuruh mengkreasikan dan mengembangkan yang telah dipelajari saat itu juga. Mengenalkan berbagai macam program-program yang sering dipakai user dalam kalangan luas.

Cara kerja pemrograman web

<html>

<head>

<title>Contoh</title>

</head>

<body>

<?php

   echo date("d/m/Y");

?>

</body>

</html> 

Apa yang dapat dilakukan dengan pemrograman web

1. Pemrograman web memungkinkan kita dapat membuat halaman web yang dinamis dengan perintah-perintah yang cukup sederhana tapi dapat menghasilkan informasi yang beragam.
2. Pemrograman web dapat melakukan interaksi sehingga pengguna dapat memperoleh informasi yang sesuai/relevan seperti pencarian, pengiriman data dll.
3. Pemrograman web dapat dihubungkan dengan berbagai macam basis data/database seperti mysql, oracle, sql server dll

Bahasa pemrograman apa saja yang dapat digunakan untuk pemrograman web