Showing posts with label COMPUTER - Programming Delphi. Show all posts
Showing posts with label COMPUTER - Programming Delphi. Show all posts

Monday, October 19, 2009

Delphi 2010 Touch Hello Word Step by Step

I want to try demo simple touch application in Delphi 2010. This application is just using the down left touch to close the form. Here is the step by step:

1. Run Delphi 2010.

2. Create New VCL Form Application

3. Save it for precaution.

4. Add TGestureManager and TActionManager to the Form1.

5. Select Touch properties of the Form 1.

6. Drill down. Select GestureManager1 in the Gesture Manager.

7. Go Back to the properties of Form1. Drill down to Gesture – Standard.

8. Check the Down Right.

9. Click the right of the Down Right in no 9. Choose New Standard Actions. This choice is only available if you add the TActionManager in Step 4.

10. Choose File – Exit.

11. Compile Project.

12. Done.

Try to hold your right mouse button and then go down and right. The program will be close. It just as simple as that :).

Friday, July 25, 2008

Belajar Delphi : Apakah Sender Itu?

Pada event handler, parameter “sender” menunjukkan pada komponen yang menerima event tersebut (OnKeyPress, OnDblClick, OnMouseDown, dan event lainnya).

Terkadang kita memerlukan penanganan event handler sama untuk beberapa komponen. Contoh kasus: setiap editbox yang aktif akan kita beri warna aqua. Akan sangat merepotkan bila kita harus mengisi event OnEnter pada setiap edit. Kita dapat memanfaatkan parameter sender ini.

procedure TForm1.Edit1Enter(Sender: TObject);
begin
tedit(sender).Color:=claqua;
end;

Supaya event OnEnter pada edit1 ini berlaku untuk semua editbox yang ada, arahkan semua event OnEnter setiap setiap editbox pada event Edit1Enter.

Caranya: buka tab events untuk edit yang bersangkutan pada Object Inspector. Klik pada event OnEnter, pilih Edit1Enter.

Begitu pula jika event yang kita tangani melakukan pekerjaan yang hampir sama pada beberapa komponen dengan perbedaan terletak hanya pada komponen pemanggilnya saja, kita dapat menanganinya dengan meletakkan coding pada satu event handler saja, selanjutnya kita gunakan pernyataan if…then…else sebagai pembeda. Sebagai contoh, segmen progam dibawah ini menampilkan caption label1 antara Button1, Button2 dan Button3.

procedure TMainForm.Button1Click(Sender: TObject);
begin
if sender = Button1 then
Label1.Caption := ‘Button1 ditekan’
else
if sender = Button2 then
Label1.Caption := ‘Button2 ditekan’
else
if sender = Button3 then
Label1.Caption := ‘Button3 ditekan’
end;

Selamat mencoba :)

Tuesday, July 15, 2008

InputBox Pada Delphi Untuk Pemula

Ada suatu cara mudah untuk meminta inputan kepada user. Kita bisa menggunakan InputBox.

Function InputBox(const ACaption, APromp, ADefault: String): String;

Contoh:

Uses Dialogs;
procedure TForm1.Button1Click(Sender: TObject);
var
InputMasukan: String;
begin
InputMasukan:=InputBox(‘Ini adalah caption’,'dan ini
adalah
prompt’,’sedangkan ini adalah default input’);
end;

clip_image002

Bila user menekan tombol OK, maka nilai yang tersimpan pada InputMasukan adalah teks pada editbox yang tertampil dalam inputBox. Jika User menekan tombol Cancel atau menekan tombol Esc pada keyboard, maka nilai yang tersimpan pada InputMasukan adalah teks Default (dalam hal ini tekx defaultnya adalah ‘sedangkan ini adalah default input’).

Jadi dalam InputBox ini kita tidak dapat mengetahui tombol mana yang di tekan oleh user. Yang dapat diketahui hanyalah hasil keluarannya berupa string. Bila kita perlu ubtuk mengetahui tombol apa yang di tekan oleh User, gunakan InputQuery. Tampilan yang dihasilkan oleh InputQuery sama dengan tampilan InputBox. Syntax :

function InputQuery(const ACaption, Aprompt: string; var Value: String):Boolean;

Contoh:

procedure TForml.Button1Click(Sender: TObject);
var
NewString: string’;
ClickedOK: Boolean;
begin
NewString := ‘Default String’;
Label1.Caption := Newstring;
ClickedOK := InputQuery(‘Input Box’, ‘Prompt’, NewString);
If ClickedOK then { Newstring contain new input String }
Label1.Caption := ‘The new string is ’’’ + Newstring + ’’’’;
End;

Selamat Mencoba.

Apakah DialogBox Delphi Itu?

Untuk aplikasi program yang kompleks, program dituntut untuk menampilkan pesan peringatan atau pesan informasi atau pesan pernyataan bagi user bila user melakukan kesalahan ataupun ketika sistem hendak memberikan peringatan atau hanya sekedar info kepada user. Untuk keperluan seperti itu Delphi sudah menyediakan dua (2) macam cara yaitu dengan mengunakan class TApplication dan MessageDialog.

Class TApplication menyediakan function MessageBox. Syntaxnya adalah sebagai berikut:

Application.MessageBox (const Text, Caption: PChar; Flags: Longint): Integer;

  1. Text merupakan text yang akan ditampilkan di form MessageBox.
  2. Caption merupakan caption pada MessageBox
  3. Flags merupakan jenis atribut yang disertakan, misalnya : ButtonOK atau Button YesNoCancel dan icon yang akan ditampilkan

Jenis-jenis Flag yang umum digunakan : (yang lain dapat dilihat pada Delphi Help)

Gunakan flag-flag ini rntuk menentukan icon yang akan mencul pada dialog box (silahkan pilih yang sesuai keperluan):

  • MB_ICONEXCLAMATION, MB_ICONWARNING
  • MB_ICONINFORMATION, MB_ICONASTERISK
  • MB_ICONQUESTION
  • MB_ICONSTOP, MB_ICONERROR, MB_ICONHAND

Contoh:

If Application.MessageBox(‘Config file not found’, Pchar(‘Error Reading file’),
MB_RETRYCANCEL or MB_DEFBUTTON1 or MB_ICONSTOP)=IDRETRY then
showmessage(‘anda telah memilih tombol retry’);

Nilai kembali dari fungsi ini adalah :

  • mrNone
  • mrAbort
  • mrYes
  • mrOk
  • mrRetry
  • mrNo
  • mrCancel
  • mrIgnore
  • mrAll

Monday, July 14, 2008

Latihan Membuat Aplikasi Sederhana Delphi

Ikuti langkah-langkah berikut ini (Studi kasus menggunakan Delphi 7.0)

  • Pilih menu File| New Project untuk membuat suatu Proyek baru.
  • Klik komponen edit pada komponen pallet bagian standard. Setelah itu klik satu tempat pada form untuk meletakkan komponen tersebut.
  • Carilah property text pada object inspector. Value dari property tersebut samula adalah ‘Edit1’, hapuslah value tersebut sehingga menhadi kosong (perhatikan pula perubahan yang terjadi pada form).
  • Click komponen ListBox pada komponen pallet dan letakkan komponen tersebut pada form.
  • Carilah property Sorted pada object inspector. Value dari property tersebut semula adalah ‘False’, ubahlah value tersebut menjadi ‘True’ (dapat dilakukan dengan double-click pada bagian value).
  • Click komponen Button pada komponen pallet dan letakkan komponen tersebut pada form.
  • Carilah property Caption pada object inspector. Value dari property tersebut semula adalah ‘Button1’, ubahlah value tersebut menjadi ‘Add’.
  • Pilihlah tab page Events pada bagian bawah object inspector. Lakukan Doeble-click pada value dari event OnClick. Delphi akan memberikan nama default pada value tersebut, yaitu Button1Click.
  • Delphi akan menampilkan editor dimana terdapat procedure dengan nama Button1click. Pada baris pada baris diantara begin dan End, tuliskan perintah listBox.items.add (edit1.text);
  • Jalankan project yang telah dibuat ini. Terdapat tiga buah cara, yaitu dengan memilih menu Run| Run, menekan tombol F9, atau dengan click icon image pada SpeedBar.

Komponen Yang Sering Digunakan Dalam Borland Delphi

1. Komponen Standard

clip_image002

· MainMenu : untuk menampilkan menu bar yang terletak pada bagian atas sebuah form. 90% aplikasi yang ada di seluruh dunia memiliki Menu Bar.

· PopUpMenu : untuk menampilkan suatu popup menu dengan koordinat tertentu pada form, biasanya menu ini muncul dengan penekanan tombol kanan mouse. Untuk menampilkannya dapat digunakan method popup (x, y:integer).

· Button : digunakan proses apa yang harus dilakukan apabila tombol ini di tekan

Property yang biasa digunakan :
> Caption -> untuk mengubah teks button
> Enabled -> untuk mengubah enabled button.
Event yang biasa digunakan :
> Onclick -> dijalankan ketika tombol diklik/ditekan.

· Label : untuk menampilkan suatu teks pada form. Property yang digunakan adalah untuk menyimpan teks tersebut adalah Caption.

· Edit : untuk menerima input berupa teks dari user.

Property yang biasa digunakan :
> Text -> untuk menampung isi teks inputan dari User.
> MaxLength -> untuk menentukan panjang karakter yang dapat diinputkan.
> Password Char -> apabila diisi dengan suatu karakter, maka setiap huruf yang di Ketikkan akan digantikan dengan karakter tersebut. Nilai defaultnya adalah #0 (teks akan ditulis apa adanya).
> Enabled -> TRUE, pemakai dapat menginputkan teks. FALSE, tidak dapat diinputkan apapun.

  • RadioButton dan RadioGroup : Untuk memberikan option-option yang harus dipilih oleh pemakai secara eksklusif (hanya satu Option saja).
  • CheckBox : untuk memilih kondisi On/Of (check atau Uncheck).
    Property yang diggunakan adalah checked yang bertipe Boolean (true -> On)
  • GroupBox dan Panel : merupakan komponen yang disebut juga sebagai objek container, gunanya untuk mempermudah pengaturan dan pengelompokan objek-objek yang ada. Sebenarnya form juga suatu objek container yang dapat menampung banyak komponen lainnya.
  • ListBox dan ComboBox : untuk menampung kumpulan string yang dapat dipilih dengan menggunakan mouse ataupun keyboard. Khusus untuk ComboBox, selain dapat dipilih pemakai juga dapat mengetikkan string yang diinginkan, sehingga dapat memberikan fasilitas auto complete. Property yang digunakan untuk memanipulasi string pada komponen ini adalah Item.

2. Komponen Additional

image

  • BitBtn dan SpeedButton : merupakan tombol yang dapat menampilkan gambar bitmap (glyph) didalamnya.
  • MaskEdit : berfungsi sama dengan Edit, lebih cocok untuk digunakan untuk pengisian password, tanggal, nomor telpon, waktu dimana outputnya mempunyai karakter dan format tertentu.
  • StringGrid : untuk menampilkan kumpulan string dalam bentuk array dua dimensi (baris dan kolom). Untuk memanipulasi string yang ada digunakan property cell

Semoga bermanfaat

Dasar / Intro Pembuatan Aplikasi Delphi

Setiap aplikasi yang akan dibuat dengan menggunakan program Delphi dianggap sebagai sebuah proyek yang dalam bahasa Inggrisnya adalah Project. Untuk membuat sebuah proyek baru dapat dilakukan dengan memilih menu file|New Application. Setelah menu ini dijalankan akan tampil sebuah form kosong. Form sendiri adalah komponen dasar dari pembuatan suatu aplikasi dengan menggunakan Borland Delphi. Suatu aplikasi dapat terdiri dari satu atau banyak form, tepatnya, sesuai dengan kebutuhan. Pada bagian berikut akan dijelaskan dua elemen panting yang harus diketahui dalam penggunaan Delphi, yaitu komponen dan event.

Komponen

Form sendiri adalah termasuk salah satu komponen yang terdapat dalam Delphi. Selain form, Delphi juga menyediakan kumpulan komponen lainnya yang dikenal dengan nama Visual Componen Library (VCL). Komponen ini merupakan objek-objek yang banyak dipakai dalam pembuatan tampilan, misalnya

  • button,
  • scroll bar,
  • menu,
  • edit box,
  • dan lain-lain.
Dari namanya sendiri, VCL berarti komponen yang akan nampak pada layar, sehingga komponen tersebut, dipastikan memiliki properti VISIBLE

Dengan memanfaatkan komponen ini, programmer dapat membuat suatu tampilan (user interface) dengan mudah tanpa harus mengetikkan perintah apapun, yaitu cukup dengan beberapa klik. Programmer dapat memilih komponen yang diinginkan dan mengubah property dari komponen tersebut sesuai dengan kebutuhan.komponen-komponen ini dapat dipilih dari komponen Pallete, kemudian diletakkan pada form sehingga terbentuk tampilan sesuai dengan keinginan. Pada saat aplikasi dijalankan, tampilan yang muncul adalah form beserta komponen-komponen yang telah diletakkan pada form tersebut sesuai dengan desain yang telah dilakukan, yaitu pada saat design time.

Dalam Delphi juga terdapat komponen yang tidak akan tampil pada saat aplikasi dijalankan, komponen ini disebut dengan nama Non-visual Komponen. Contoh dari komponen ini adalah

  1. TDialogBox (harus menjalankan method execute),
  2. TTable (berfungsi untuk penyimpanan data) dan
  3. TQuery (berfungsi untuk menyeleksi data yang akan ditampilkan).

Event

Event merupakan procedure (method) yang dijalankan apabila user melakukan aksi tertentu terhadap suatu komponen, misalnya:

  • OnKeyPress (saat user menekan tombol keybord),
  • OnClick (saat user melakukan klik mouse).

Dalam pembuatan Event ini dibutuhkan pengetahuan tentang pemrograman. Disini programmer harus mengetikkan perintah-perintah agar aplikasi berjalan sesuai keinginan, yaitu sesuai pada saat ataupun event tertentu.

File Extension Delphi

Beberapa extension file yang dihasilkan oleh Borland Delphi antara lain :

  • .DPR (Delphi Project) : Program utama dari suatu projek, disimpan dalam bentuk file teks. Untuk melihat source proyek pada IDE Delphi, dapat dipilih menu View /Project source. Backup dari DPR berupa extension ~DP. Apabila ingin melihat lewat textviewer lain, juga dapat dilakukan, misalnya notepad.
  • .DFM (Delphi Form) : merupakan file Form dalam format binary file. Backup dari file ini dalam adalah file dengan extension ~DF.
  • .DCU (Delphi Compiled Unit) : merupakan file dari unit yang telah di compile
  • .OPT (Option) : merupakan file yang berisi konfigurasi compiler, linker, directory dari suatu proyek dalam bentuk file teks, Pada Delphi 2 Extension file ini diganti menjadi .DOF.
  • .RES (Resource) : file yang berisi deskripsi menu, icon, bitmap dan cursor.
  • .EXE atau .DLL : file hasil compile program.