Arsip: Sederhana tapi ga tahu ngakalinya....help me?

 
user image
more 12 years ago

johnizzy

wahai shohibun2 delphi, kembali ane datang dengan pertanyaan dan masalah neh.... nah kayak gin, ilustrasi form : ane punya 1 komponen buttom dan 1 komponen Edit (dengan bertuliskan "johnizzy cake'') Nah skenariaonya : waktu ane pencet tombol buttom 1 itu, langsung ke fokus ke komponen edit 1 dan kursor juga fokus pada karakter setelah huruf terakhir. ente tahu kan maksud ane... singkatnya ane tu pengen dengan 1 tekan tombol bisa selain fokus ke komponen edit sekaligus menjalankan fungsi tombol end pada keyboard. gtuuuuu.... buat shohibuan yang mau bantu ane ane ucapin makasih dulu yag.... ___________
user image
more 12 years ago

johnizzy

ane revisi, skenarionya jadi waktu ane tekan tombol 1 langsung ketik huruf "p" ga perlu tekan tombol end atau gerakin kursor untuk melengkapi tulisan yang ada pada komponen edit 1 menjadi bertuliskan "johnizzy cakep". thanks thats all
user image
more 12 years ago

DelphiExpert


procedure TForm1.Button1Click(Sender: TObject);
begin
  Windows.SetFocus(Edit1.Handle);
  Edit1.SelStart := MaxInt;
  SendMessage(Edit1.Handle, WM_CHAR, Ord('p'), 0);
end;
user image
more 12 years ago

johnizzy

wowo keren broooo ilmu baru neh... sip2 sukses terus deh buat mr expert! kikikki
user image
more 12 years ago

johnizzy

ok broo tadi waktu awal ane coba di defoult eror, tapi setelah ane kasih uses "sharemem" baru bisa... ane cari2 dari internet.. dan bisa. gt broo....kekekekek,
user image
more 12 years ago

Tbawor

fungsi alternatif utk input teks, selain dgn Sendmessage (xxx) bisa menggunakan fungsi seltext, ex :
Edit1.seltext := 'Oke'; // bisa input karakter atau teks.
utk selanjutnya silakan pelajari fungsi seltext, selstart dam sellength.
more ...
  • Pages:
  • 1
Share to
Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com