Metin İçerisinden Bir Karakter Silmek

Reklam Alanı

Function DeleteCharacterInString(InputCharacter,InputString: String): String;
Var
CharPos : Integer;
Begin
Result := InputString;
While True Do
Begin
CharPos := Pos(InputCharacter,InputString);
If Not (CharPos = 0) Then
Begin
Delete(InputString,CharPos,1);
End
Else
Begin
Break;
End;
End;
Result := InputString;
End;

Benzer Yazılar:

  1. Tüm Dosya ve Klasörlerin Listesini Almak
  2. ASCII Kodlarını Bulmak
  3. Delphi ile Mp3 dosya çalmak çaldırmak
  4. Bilgisayardaki Sürücü Listesini Almak
  5. Dosya Kopyalama
  6. Ekran Klavyesi
  7. Aglaya Aglaya Video Klip izle Neslihan Demirtas
Etiketler:

Eğer yazıyı beğendiyseniz ya da ekleyecekleriniz varsa, lütfen yorumunuz yazın veya RSS aboneliği ile yeni yazılardan anında haberdar olun.

Yorum yapın

*

Gizlilik Politikası