Tampilkan postingan dengan label Properties. Tampilkan semua postingan
Tampilkan postingan dengan label Properties. Tampilkan semua postingan

Sabtu, 12 Desember 2015

Width



//Width

{
Width adalah Properties yang ada pada setiap komponen yang memiliki visual

Width berguna untuk mengatur lebar komponen tersebut

COntohh

}

procedure TForm3.Button1Click(Sender: TObject);
Begin
form1.width := screen.width ;
end ;

Visible



//Visible

{
Visible adalah Properties yang ada pada setiap Komponen yang memiliki visual

Visible berguna untuk Menampilkan/tidak menampilkan Komponen tersebut


Jika  True = Tampil
Jika  False = Tidak tampil
}

TransparentColor



//TransparentColor + Value

{
TransparentColor + Value adalah Properties yang ada pada form
Transparent color berguna untuk membuat warna tertentu menjadi hilan , atau transparant dalam form tersebut

Misalkan Warna yang ingin dihilankan Putih ...

}

procedure TForm1.Button1Click(Sender: TObject);
begin
form1.transparantcolorvalue := clwhite ;
form1.transparentcolor := true ;
end;

Top



//Top

{
Top adalah Properties yang ada pada semua komponen yang memiliki visual

Top berguna untuk mengatur jarak pada sisi atas

COntoh
}


procedure TForm3.Button1Click(Sender: TObject);
Begin
form1.top := 0 ;     // Sisi atas mentok atas
end ;


//yang lain
procedure TForm3.Button1Click(Sender: TObject);
Begin
form1.top := screen.height - form1.height ;     // Sisi atas mentok bawah
end ;

Text Hint



//TextHint

{
Texthint adalah Properties yang ada pada Komponen Tedit
Text hint berguna untuk menampilkan teks yang transparant pada saat edittext kosong ...

dan saat kita klik atau menginput teks itu akan hilang ..
itu adalah pengaturan Text Hint

Contohnya

Edit1.texthint := 'Isikan nama anda' ;
}

Text



//Text

{
Text adalah Properties yang ada pada Komponen TEdit ...
text berguna untuk Memberikan isi pada Komponen Tedit ...

text Bertype data String ..

Contohnya Edit1.text := 'ISI' ;
}

TabOrder



//TabOrder

{
Tab Order adalah Properties yang ada pada semua komponen yang dapat difokuskan

seperti button , edit , memo , dll

Taborder berguna untuk membuat urutan pada saat kita menjalankan program
dan saat kita menekan "TAB" , maka ada urutan komponen yang fokus ... itu diatur melalu taborder

}

ScroolBars



//Scroolbars

{
Scroolbars adalah Properties yang ada pada komponen yang memiliki Lines
Scroolbars Berguna untuk mengatur Scroollbar apa yang ingin ditampilkan ..

Isi List pada properties Scroolbar adalah

-ssNone       = tidak menampilkan
-ssHorizontal = Hanya Horizontal
-ssVertical = Hanya Vertical
-ssboth = Semua

Contoh

Memo1.scroolbar := ssboth ;

}

ReadOnly



//ReadOnly

{
ReadOnly adalah Properties yang ada pada semua komponen penginputan atau yang dapat diubah isinya

Readonly Berguna untuk Menonaktifkan perubahan pada Komponen tersebut ,
Atau dengan kata lain hanya dapat dibaca.

Contohnya pada memo ...

Memo1.readonly := true ;

Jadi isi memo1 tidak dapat diubah2
}

Numbers Only



//Numbersonly

{
NumbersOnly Adalah properties yang ada pada edit text ...
NumbersOnly Berguna untuk Memfilter Teks pada saat penginputan berlangsung ...

Numbersonly hanya mengambil (1..9)

contoh
edit1.numbersonly:=true ;

}

Name



//name

{
Name adalah Properties yang dimiliki semua komponen
Name Berguna Sebagai nama pemanggil ...

Jika Name Berubah maka name pada code juga harus berubah ...
Misalkan Nama Button kita adalah "Button1" . ..

Kemudian anda ubah menjadi jadi "TOMBOL1"

Maka dalam pengisian kode anda juga harus ubah
Seperti

TOMBOL1.caption := 'Bla bla' ;

}

Min,Max,Position



//Max,min,Position

{
Max,Min,Position adalah properties yang ada pada komponen yang memiliki nilai minimal dan maksimal
seperti , Progressbar , Trackbar ,Scroolbar , DLL

Min = Minimal
max = Maximal
position = Posisi


adapun contohnya
}

procedure TForm1.Button1Click(Sender: TObject);
var i: integer ;
begin
Progressbar.min := 0 ;
progressbar.max := 1000 ;
progressbar.positon := 500 ;


end;

Lines



//Lines

{
Lines adalah properties yang ada pada komponen yang meimiliki paragraf yang lebih dari 1
seperti Memo dan richedit

Lines Bertype data Tstringlist ;

Adapun contoh untuk Lines

}

procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.lines.add('Isi paragraf 1') ;
memo1.lines.add('Isi paragraf 2') ;
end;

// dan yang lain
procedure TForm1.Button1Click(Sender: TObject);
var a:tstringlist;
begin
a:= tstringlist.create ;
a.loadfromfile('D:\tess.txt') ;
memo1.lines := a;
end;


Left



//Left

{
Left adalah properties pada semua form dan semua komponen yang memiliki visual

Left berguna untuk mengatur jarak kiri Sebuah komponen
Left memiliki type data integer

contohnya

form1.left := 0 ;                               // jadi dia akan mentok ke kiri
form1.left := screen.width - form1.width        // maka akan mentok ke kanan
}

Items



//items .

{
Items adalah properties yang ada pada setiap komponen yang memiliki list
Seperti listbox , combobox , DLL

Kemudian Items Berguna untuk Memberikan Item2 atau List2 pada komponen Tersebut ..

Contohnya saat Run time
}

procedure TForm1.Button1Click(Sender: TObject);
begin
listbox1.items.add('Isinya') ;
end;

//atau

procedure TForm1.Button1Click(Sender: TObject);
var a:tstringlist;
begin
a:=tstringlist.create;
a.loadfromfile('d:\note.txt') ;
listbox1.items := a ;
end;

Itemindex



//itemindex

{
Itemindex adalah properties pada komponen yang memiliki items seperti listbox dan combobox , dll

itemindex berguna sebagai pengenal bahwa items yang dipilih saat ini urutan sekian ...

itemindex artinya URUTAN , tetapi itemindex selalu diawali dengan 0 ..
Jadi jika ingin mengetahui urutan sesungguhnya Harus + 1 ....

Contoh
Isi dulu listbox anda dengan item ...

}

procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage('listbox ada pada urutan ' inttostr(listbox1.itemindex + 1)  ) ;

end;

Itemheight



//itemHeight

{
Itemheight adalah properties yang sering kita temukan pada komponen yang memiliki list
Seperti Listbox , COmbobox ,DLL

ItemHeight berguna untuk Mengatur/Mengubah Tinggi LIST/Item pada Komponen tersebut

COntohnya

listbox1.itemheight := 21 ;

}

Images



//images + imageindex

{
Images + Imageindex Adalah Properties yang ada pada button , speedbutton ,dan semua tombol2

Images berguna untuk mengkoneksikan button dengan komponen "TImagelist"
Sedangkan
Imageindex Memberikan image ke button berdasarkan index pada "Timagelist"


Sebelumnya anda buat komponen Timagelist
Lalu double klik , dan isikan image2 kedalam imagelist , dan atur resolusinya ...

setelah itu koneksikan pada button anda... dengan cara klik1 kali pada images .
maka timagelist anda sudah terdaftar pada button anda


kemudian ganti imageindex.nya sesuai dengan URUTAN image anda (Dikurangi 1)

}

Icon



//Icon

{
Icon adalah properties yang ada form , Berguna untuk menggantikan/memberikan icon pada form

Contohnya
}

Begin
form1.icon.loadfromfile('D:/Delphi.ico');
end;

//Lokasi penyimpanan icon  ,  anda sesuaikan dengan milik anda

Hint



//Hint + Showhint

{
Hint adalah properties yang dimiliki semua komponen yang memiliki visual
seperti form , edit , panel , dll

Hint berguna untuk menampilkan pesan2 singkat saat cursor tidak bergerak pada komponen tersebut

Contoh hint

}

procedure TForm1.Button1Click(Sender: TObject);
begin
form1.hint := 'Ini adalah form1';
form1.showhint := true;
end;