ternyata ada juga yg namanya class friend, baru tau saya gan..:malu: tapi kalo dipikir" agak terbantu juga dengan class friend ini.. walopun agak melenceng dari arti enkapsulasi yg saya baca.. :D saya juga baru tau strict private :malu: :malu: :malu:, strict private di lazarus maupun delphi ...
halo gan agan... Permisi mau tanya tentang oop di delphi/lazarus :malu: gini gan saya agak bingung dengan enkapsulasi, kalo variable di taruh di bagian "Private" yang bisa akses kan class itu sendiri ya gan dengan kta lain gak bs di akses class lain.. gitu? tapi kok kalau 2 class yg ber...
Menarik itu relatif, jelek itu absolut :ngakaks Buat form login yang menarik tidak harus selalu pake skin alpha ato sejenisnya. Coba buat login form windows, dari mulai xp sampe win7 itu juga menarik kok :hammer:, masih kurang .... ? Kembangkan kreativitas dan majinasinya dong .... :p susah kalo ...
selamat siang semua.. :) nubie mo tanya nih, gmn ya cara ngasi thread di on query closed event, jadi aplikasi baru closed setelah thread selesai . jadi nunggu thread selesai baru CanClose true. untuk threadnya ane gunain TThread. coba baca ini gan http://www.delphicorner.f9.co.uk/articles/op1.htm...
itu si bayar TEdit apa Float?apa ada TEdit yg namanya bayar? begini kali procedure TFr_Prac5.Button4Click(Sender: TObject); var bayar : Extended; begin If edisct.text = '5%' then begin Discount := 0.05 ; bayar := grandtotal - (grandtotal * discount) ; bayar.Text := floattostr(bayar) ; ...
ga ada gan AsString nya...:hammer: knp yah koq ga bisa.... ParamCheck di ilangin ? btw pake apaan ,ADO,DBExpress ato yg laen?
udah di coba.. keluar error, cannot perform this operation on a closed dataset..:bingungs ga ada event di querynya, cuman di button aja.... coba ParamByName('a').value nya diganti ParamByName('a').AsString gan
Beneran die nih si Borland? :( pertanyaannya, kl si borland die, mengapa delphi masih di ajarkan di kampus? nasibnya 5 tahun ke depan gimana yah :ngacir: emg kenapa kalo borland die? biarin aja borland mau die,mau gnt nama,mau jungkir balik jga kan udah ane bilang skrng delphi milik nya embarcade...
^ pada gak tau apa pura2 gk tau sih??Borland kan emg udah bangkrut.. taon 2008 product development tools nya Borland(semacem delphi,CBuilder,JBuilder etc) di akuisisi sama embarcadero jadi sekarang delphi diurus/didevelop sama embarcadero soedah lupakan borland,biar dikenang dihati sadja :D
ane baru seminggu gabung grup ini, tapi ane udah sepakat banget ama ts. ane empet juga kalo ngikutin 1 trit yang nongol orang itu-itu aja. dikit-dikit post, nanya "gan, gimana bikin ini", "gan, gimana bikin itu", ga ada upaya lain selain nanya, padahal yang dia tanya banyak ja...
Ada yg bisa bantu jawab ? apanya yg mau dibantu??mdichild kok mau di showmodal:gila: kalo mau, rubah property FormStyle dari form yg agan mau di ShowModal-in itu jadi fsNormal
saat build berpengaruh kah? soalnya ane pake build with runtime package supaya jadi kecil aja exe delphi nya nya ngerti maksud dari "build with runtime package" kan? artinya kalo agan build pake cara itu maka runtime package(*.bpl) nya harus ngikut di deploy juga. ukuran exe lebih keci...
^atas combobox itu kan punya index yg dimulai dari 0, jd misal ABSEN,SISWA,NILAI berarti si ABSEN itu index 0 SIWA 1 dst case ComboBox1.ItemIndex of 0 : begin // <==ABSEN Edit1.Visible:=True; //code ente terserah dah end; 1 : begin //..... end; end;
nek nggo program cilik opo non-team sih yo gampang nganggo sik terstruktur gan, soale luwih cepet nggawe-ne nggo Delphi... :Peace: ooh ora iso ngono :think:
kalo reflection di delphi gimana yak? Reflection == RTTI ? kalo iya googling pls,cuma beda nama doank
btw, fungsi PRED itu apa gan. . . singkatan dari apa? kalo mau ampe 200 berarti harus dikasih PRED(201) ya. . . beda dengan for to do biasa. . . pred = predecessor dikamus artinya "predecessor kb. 1 pendahulu. He was my p. Dialah yang mendahului saya. 2 leluhur." yang berarti nilai seb...
gan, agar angkanya tampil satu persatu gimana ya. . . secara bergantian gitu. . . dari 1 ampe 200. kalo yg di atas yg nongol langsung angka 200nya. uses crt; var iloop:byte; //iloop , jloop ,kloop etc better than i,j,k begin clrscr; for iloop:=0 to Pred(200) do // begin gotoxy(5,10); writeln(il...