Anasayfa > Genel > Case string of

Case string of


Lazarusun güzel bir özelliğini paylaşmak istiyorum artık string değişkenleri case bloğu içerisinde kullanabiliyorsunuz…

Örnek:


procedure TForm1.Button1Click(Sender: TObject);
begin
case Edit1.Text of
'test':begin
ShowMessage(Edit1.Text);
end;
'mest': begin
ShowMessage(Edit1.Text);
end;
end;

end;

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

Görüşlerinizi belirtin

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