Masukkan pada Textbox Harus Berupa Huruf Besar(Kapital)

17 11 2010

Tip berikut ini bisa Anda pergunakan bila dalam pembuatan aplikasi Anda membutuhkan suatu masukkan pada textbox yang harus berisi huruf kapital semua. Berikut contoh listing programnya.

procedure TForm1.Edit1Change(Sender: TObject);
var
  i:integer;
begin
  Edit1.Text:=uppercase(Edit1.text);
  begin
    for i=1 to 100 do
      Edit1.SelStart:=Edit1.SelStart+1;
  end;
end;

Selamat mencoba..


Aksi

Information

One response

10 11 2013
Chocolatess

Makasih banyak, artikelnya bermanfaat😀

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s




%d blogger menyukai ini: