06. Image Viewer
Pada video tutorial ini diperlihatkan bagaimana membuat aplikasi Image Viewer yang bertujuan untuk mempelajari bagaimana menggunakan Komponen File List Box, Drive Combobox, Directory List box: untuk menelusuri struktur file pada harddisk kita, menggunakan komponen TScrollbox untuk operasi scrolling, dan menggunakan komponen TImage untuk meload gambar, serta mempelajari Syntax untuk menghandle event keyboard.
[video]
Langkah Pembuatan
Berikut ini penjelasan tutorial di atas:
|
No |
Action |
||
|
1 |
File->New->Application |
|
Save All … create direktori "image viewer" -> imviewer.dpr, unit1.pas |
|
2 |
Drop component |
Name |
Pallete |
|
EditBox 1 |
Edit1 |
Standard |
|
|
Editbox 2 |
Edit2 |
Standard |
|
|
Label 1 |
Filename |
Standard |
|
|
Label 2 |
Filter |
Standard |
|
|
FileListBox dari |
Win3.1 |
||
|
DriveComboBox |
Win3.1 |
||
|
ScrollBox |
Additional |
||
|
3 |
Add event handler |
Event |
Code Editor |
|
Edit2 |
onKeyUp |
if Key=13 then FileListBox1.Mask := edit2.Text; |
|
|
DriveComboBox1 |
OnChange |
DirectoryListBox1.Drive := DriveComboBox1.Drive; |
|
|
DirectoryListBox1 |
OnChange |
FileListBox1.Directory := DirectoryListBox1.Directory; |
|
|
FileListBox1 |
onDblClick |
Image1.Picture.LoadFromFile(FileListBox1.FileName); ScrollBox1.HorzScrollBar.Range := Image1.Picture.Width; ScrollBox1.VertScrollBar.Range := Image1.Picture.Height; |
|
|
OnClick |
Edit1.Text := FileListBox1.FileName; |
||
|
4 |
Run |
F9 |
|
Penjelasan Source Code Program
Berikut ini penjelasan source code tutorial di atas
Apa yang sudah anda pelajari
- Komponen
- File List Box, Drive Combobox, Directory List box: untuk menelusuri struktur file pada harddisk kita
- Scroll: Menggunakan komponen tscrollbox untuk operasi scrolling
- Image: Menggunakan komponen timage untuk meload gambar
- Syntax
- Menghandle event keyboard
Recent Comments