Anasayfa > Kodlar > Delphi ile length fonksiyonu

Delphi ile length fonksiyonu


Length komutu ve kullanım alanları

lenght fonksiyonu ile girilen karaker sayısı alma

girilen bir metnin karakter sayısını neden almalıyım?
eğer programımda girilen bazı alanlarda karakter sınırlaması yapmam gerekiyorsa bunu denetim için kullanırım.

length fonksiyonunun söz dizimi nasıldır?
length(string)
burada string
a)sabit bir metin olabilir
b)bir deişken olabilir.

örnek
amacımız bir edit'e girilien metnin sayısını almak
eğer sayı 6'dan küçükse uyarı versin ve metin kutusunu temizlesin.
forma
1adet label
1adet edit
1adet buton

kontrolü ekliyelim
*labelin caption'u 'kullanıcı adı'
*butonun captionu 'tamam' olsun
*şimdi butonun on click olayına aşağıdaki kodu girelim

procedure TForm1.Button1Click(Sender: TObject);
var
sy:integer  ;
begin
sy:=length(edit1.Text ); //edite giren textin uzunluğunu al
if sy < 6 then //uzunluğu kontrol et ve
begin
showmessage('kullanıcı adınız en az 6 karakter olmalı'); //mesajı ver
edit1.text:="; // editi temizle
form1.ActiveControl :=Edit1 ; //editin üstüne git
end;

end;

end.

iyi çalışmalar

Barış BARIŞ


TD Software


  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: