Soal KKPI Database

Soal KKPI download disini

Materi Java Tentang Tipe Data

Download aja materinya untuk pertemuan ke 2 di Sini Untuk Setting nya juga sudah saya sediakan di Sini

Materi Power Point

Untuk Materi pembelajaran khususnya KKPI kelas XI RPL saya lampirkan materinya di Link di bawah ini

Modul Perakitan Komputer 2

Untuk pertemuan yang ke2 materi perakitan komputer bisa di download di link berikut Sini

Soal Essay KKPI kelas XI

Soal Ujian Essay di KKPI kelas 2 bisa di download di sini

Daftar Ulang

DAFTAR ULANG

Download ajah yach di SINI segera dan secepatnya.... ok

Print Screen Dengan aplikasi Buatan

Uantuk latihan Selanjutnya saya coba shara membuat aplikasi print Scren menggunakan delphi.
langsung ajah yach dah g sabar nech...

Untuk Komponen nya mudah k....

1. 3 buah Button
2. 1 buah image

Untuk Design lihat designnya di bawah ini :

Untuk Image nya di taruh aja di bawah komponen itu :

Sekarang tinggal aja Atur propertiesnya

Form Autoscrol : False trus Tinggal tulis ajah source code nya di bawah ini :

function GetScreenShot: TBitmap;

var

  Desktop: HDC;

begin

  Result  := TBitmap.Create;

  Desktop := GetDC(0);

  try

    try

      Result.PixelFormat := pf32bit;

      Result.Width := Screen.Width;

      Result.Height := Screen.Height;

      BitBlt(Result.Canvas.Handle, 0,0, Result.Width, Result.Height, Desktop, 0,0, SRCCOPY);

      Result.Modified := True;

    finally

      ReleaseDC(0, Desktop);

    end;

  except

    Result.Free;

    Result := nil;

  end;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

Image1.Picture.Bitmap := GetScreenShot;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Image1.Picture:=nil;

WindowState:=wsNormal;

end;

procedure TForm1.Button3Click(Sender: TObject);

begin

WindowState:=wsMaximized;

end;

end.

Untuk lebih detailnya Download ajah Source code nya di bawah ini :

.: Disini :.