dear all master delphi saya mau tanya nih bagaimana cara mengubah fungsi tombol enter menjadi tab? maksudnya ketika kita mau pindah dari suatu textbox ke textbox yang lain ketika kita tekan tombol enter maka cursor berpindah posisi ke textbox yang lain! dan ada yang bisa membagi ilmunya, saya ingin menanyakan kode untuk tombol2 di keyboard klo g salah ada nomor2nya ya? mohon bantuannya ya!

Untuk kode2 pada keybord. Silahkan download di http://www.4shared.com/file/33941466/3c9ea509/Number_Keyboard.html?dirPwdVerified=16354bdb Semoga bermamfaat.

Untuk kode2 pada keybord. Silahkan download di http://www.4shared.com/file/33941466/3c9ea509/Number_Keyboard.html?dirPwdVerified=16354bdb Semoga bermamfaat.

Mungkin ini bisa membantu @teru2bozo

uses windows..dst
   procedure TabEnter(Sender : TObject, var Key : Char);
   private
   public
{...}
Procedure TForm1.TabEnter(Sender : TObject, var Key: Char);
begin
   Perform(CM_DIALOGKEY,VK_TAB,0);
end;

cara penggunaan ubah object inspector pada on even keypress dari tiap textbox yg diinginkan... selamat mencoba...

sorry ada yg salah...xixixixi

Procedure TForm1.TabEnter(Sender : TObject, var Key: Char);
begin
  //jika yg ditekan enter....
  if key =#13then
   Perform(CM_DIALOGKEY,VK_TAB,0);
end;

yup..kalo aku caranya begini...(ga jauh beda sih ama om madi).... ada 2 komponen edit (edit1 dan edit2)..trus di edit1 (awal cursor) kamu buat event OnKeyPress procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key=#13 then edit2.setfocus; end; CMIIW

Mungkin cara diatas sudah bisa mewakili saya hanya akan menambahkan informasi bagi yang belum tahu saja. Untuk komponen Edit pada Raize namanya jadi RzEdit didalam property dari RzEdit itu ada TabOnEnter, dengen memberikan status True saja semua masalah sudah bisa terselesaikan dengan baik dan tidak repot. Kembali lagi, ini sifatnya hanya memberikan informasi, bukan mendidik untuk tidak mau mikir lho ya... Kalau masih belajar sebaiknya menggunakan cara :

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then edit2.setfocus;
end; 

atau cara lain yang masih membutuhkan koding secara langsung. btw, sekarang mulai aktif masuk nih forum, soalnya kemarin g bisa masuk - masuk.... terpaksa banyak ngeblog. He....3x

Menggunakan komponen untuk sebuah keperluan sederhana, kayaknya kok berlebihan banget. Ibarat mau bunuh seekor nyamuk pake buldozer, udah jelas repotnya tapi gak sebanding dgn hasilnya. Apalagi solusi codingnya cuman butuh 2-3 baris aja. Tinggal bikin class turunan TEdit, override handler KeyPress yg menangkap tombol Enter untuk beralih fokus, beres. Untuk memindah fokus, solusi coding yg lebih aman dan elegan adalah menggunakan fungsi SelectNext. Masalah ini udah sering dibahas, silakan search forum untuk informasi lebih lanjut. ;)

:D Udahlah.... berbagi ilmu dan sharing kan sah sah aja... tak usahlah saling ini itu, biarkan pengguna yang menilai kalau anda punya cara apik dan elegan ya baguslah, salut untuk anda

ada 2 komponen edit (edit1 dan edit2)..trus di edit1 (awal cursor) kamu buat event OnKeyPress

cara spt Anda terlalu banyak memakan script yang hanya mengulang2 yg seharusnya dilakukan cukup sekali...tapi spt @eko_indri benar klo masih belajaran cara spt itu bisa diterapkan...

Udahlah.... berbagi ilmu dan sharing kan sah sah aja... tak usahlah saling ini itu, biarkan pengguna yang menilai kalau anda punya cara apik dan elegan ya baguslah, salut untuk anda

benar kt @eko_indri, memang menjadi orang pintar dan bisa menularkan kepintaran kita untuk orang lain jauh lebih susah, daripada menjadi pintar hanya untuk diri sendiri....xixixixi....