Jannah Theme License is not validated, Go to the theme options page to validate the license, You need a single license for each domain name.
DelphiPemrograman

Animasi Form Horizontal Delphi #159

Jika kamu kesetrum maka kamu ada kontak dengan listrik

andrypein.net : sama seperti kemarin, tentang meng-animasikan form lagi, sekarang bagian animasi kemunculan form secara horizontal dari kiri ke kanan, bisa dilihat dari gambar gif dibawah ini :

animasi form horizontal delphi
lmao

Yang kita butuhkan hanya dua buah form, form pertama sebagai pemanggil form yang dianimasikan, dan form kedua sebagai tumbal.

Untuk form kedua bisa dipasang apa aja bebas terserah mau itu label mau itu gambar bebas lah ya.

Lalu pada kode nya tinggal seperti ini :

procedure TForm1.Button1Click(Sender: TObject);
begin
  form2.Hide;
  animatewindow(form2.Handle,2000,AW_HOR_POSITIVE);
  form2.Show;
end;

Untuk button close/exit.

procedure TForm1.Button2Click(Sender: TObject);
begin
  application.Terminate;
end;
Silahken donlod mini apps animasi form horizontal delphi nya disini gan.

Download

*AFK

Related Articles

2 Comments

Tinggalkan Balasan

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *

Back to top button