Delphi Fonksiyonu: DizidekiYeriniBul

Bir string ifadenin, string bir dizi içinde kaçıncı sırada olduğunu bulan fonksiyon. deneme

//Aşağıdaki fonksiyonda kullanılan bilgi dizi değişkeni global tanımlanmıştır.
function DizidekiYeriniBul(aranan: string):integer;
var
i: integer;
begin
//Aranan kelimenin, dizide olup olmadığına, varsa kaçıncı sırada olduğunu buluyor
for i:=1 to 24 do
if aranan=bilgi[1,i] then
begin
result:=i;
exit;
end;
result:=-1;
end;

13.11.2008 10:33:03

Yorumlar

Bu yazıya henüz yorum yapılmamış.

Yazı hakkında yorum yapmak için, buraya tıklayın.

Kategoriler :

Arşiv :

Etiketler :

Bağlantılar :