Cara Memakai Skin AlphaSkin Delphi

Kali ini saya akan menyajikan Tutorial...
*TADA* 👏 TUNGGUUU...! 💤
Tunggu dulu, tadi apayah judulnya? 🙏 eee, anu, ahha!
Cara Memakai Skin AlphaSkin yang BENAR ( TANPA "Baik dan" ) ✋ Untuk penjelasannya nanti sajalah. 💢
Yang jelas Delphi sudah terbuka dan AlphaSkin harus sudah terinstall.

Baca juga: Cara membuat form transparan saat diDRAG atau diMOVE

CARA PERTAMA :

1. Tambahkan komponen sSkinManager yang berada tab Alphatools.

2. Di sSkinManager1 > Object Inspector > Properties
Pada SkinName pilih salah satu nama skin yang akan digunakan dan pastikan Active berada pada posisi True.

3. Selesai! Run Project. (F9)

Cara pertama sudah benar, namun skin alphaskin hanya akan muncul di komputer anda. Itu dikarenakan directorie "c:\Skins" beserta file skin didalamnya belum tentu ada disetiap komputer. Apalagi komputer yang tidak terinstall delphi & alphaskin. Itu sebabnya cara kedua ada untuk membuat cara petama menjadi lebih baik.

CARA KEDUA, MENGGUNAKAN INTERNAL SKIN :

1. Gunakan langkah CARA PERTAMA Nomer 1.

2. Klik kiri 2 kali di sSkinManager1.
Maka munculah window "internal skin", yang berfungi untuk mengatur skin internal.
- Add new untuk menambahkan skin kedalam project.
- Rename untuk mengubah nama skin.
- Extract untuk mengextract file internal skin.
- Delete untuk menghapus skin.
- Clear untuk membersihkan list internal skin.

3. Klik Add new, pilih salah satu skin yang ingin dimasukan kedalam project/program yang sedang dibuat.

4. Selanjutnya, Klik Close.

5. Pada sSkinManager1 > Object Inspector > Properties
Di SkinName pilih salah satu nama skin yang akan digunakan, tapi yang sesuai dengan nama yang ada di internal skin dan pastikan Active berada pada posisi True. Biasanya internal skin terdapat tambahan nama yang dikurung. Contoh : Beijing (Internal Skin)

6. Run Project. (F9)

CARA MENGGUNAKAN EXTERNAL SKIN :

1. Extract file skin yang berada di intenal skin atau copy paste file skin (*.asz) ke directory project.
Contoh, Extarct/Paste di: C:\Program Files (x86)\Borland\Delphi7\Projects\NAMEPROJECTKAMU

2. Klik dua kali di Form1 yang berada di Object TreeView, atau lebih tepatnya Form1 > Event > OnCreate.

3. Ubah kodenya menjadi seperti ini:

procedure TForm1.FormCreate(Sender: TObject);
begin
sSkinManager1.SkinDirectory:=ExtractFileDir(Application.ExeName);
sSkinManager1.SkinName:='SKINNAME'; 
// Ubah SKINNAME dengan nama file skin tanpa tambahan .asz
sSkinManager1.Active:=True;
end;

4. Sekarang ditest. Run Project. (F9)

Jika terjadi kesalah dipriksa dulu kodenya, kalo tampilan skin tidak mucul silakan diulangi salah satu cara diatas mungkin ada yang kurang atau telewatkan. Masih kurang jelas komen dibawah posting, Saya tunggu dan segera saya bales ! (* jika ada waktu luang )