CODING BUAT DELPHI

CODING BUAT TPE DATA INTEGER
(+) edit3.Text:=IntToStr(StrToInt(Edit1.Text)+StrToInt(Edit2.Text));
(/) edit3.Text:=IntToStr(StrToInt(Edit1.Text)div StrToInt(Edit2.Text));
(*) edit3.Text:=IntToStr(StrToInt(Edit1.Text)*StrToInt(Edit2.Text));
(-) edit3.Text:=IntToStr(StrToInt(Edit1.Text)-StrToInt(Edit2.Text));

CODING BUAT TIPE DATA FLOAT
(+) edit3.Text:=FloatToStr(StrToFloat(Edit1.Text)+StrToFloat(Edit2.Text));
(-) edit3.Text:=FloatToStr(StrToFloat(Edit1.Text)-StrToFloat(Edit2.Text));
(/) edit3.Text:=FloatToStr(StrToFloat(Edit1.Text)div StrToFloat(Edit2.Text));
(*) edit3.Text:=FloatToStr(StrToFloat(Edit1.Text)*StrToFloat(Edit2.Text));

CODING
1. Close : If (application.MessageBox('Keluar?','Calclator',mb_yesno))=idyes then
close;
2.Hapus/Reset : Edit1.Clear;
                      Edit2.Clear;
                      Edit3.Clear;

d'Masiv Diminta MTV Asia Bikin Lagu tentang Human Trafficking

Band asal Jakarta d'Masiv mendapatkan kesempatan spesial saat diminta MTV Asia untuk membuat lagu dengan tema human trafficking. Menurut Rian Ekky Pradipta sang vokalis, mereka juga sudah beberapa kali ditawari jadi duta lingkungan hidup.

"Alhamdulillah ini berkah Ramadan. MTV Asia mempercayakan kita buat lagu tentang perdagangan manusia. Mereka lihat karakter d'Masiv pas buat itu," ujarnya.

 

Lagu tersebut berbahasa Indonesia dengan judul 'Masih Bisa'. Nantinya, lagu itu akan diedarkan ke beberapa negara tetangga dan ditayangkan di Malaysia.

 

Menurut Rian, selain bermusik ia juga memiliki visi sosial. Maka ketika kesempatan itu datang, Rian langsung menyetujuinya.

 

"Katanya ini akan ditawarin di beberapa negara. Ini kerjasama sama pemerintah juga. Kita menyuarakan itu agar orang-orang nggak menjual orang lain," serunya.

 

Bagi Rian, lagu itu akan menjadi langkah awalnya untuk menjadi musisi yang bisa memberikan pengaruh postif. "Ngebayangin kan kalo legend itu bikin gerakan yang dikenal, kayak John Lennon," ujarnya menyebut contoh.