Clomosy | Forum Ana Sayfa
Forum Anasayfa Forum Anasayfa > Genel Programlama > Genel İşlemler
  Aktif Konular Aktif Konular RSS - String Parçalama
  SSS SSS  Forumu Ara   Etkinlikler   Kayıt Ol Kayıt Ol  Giriş Giriş

Clomosy Resmi Forum Sitesidir. Amacımız kullanıcılarımıza, iş ortaklarımıza, danışmanlara, yazılımcılara programlarımız hakkında destek ve bilgi vermektir.

String Parçalama

 Yanıt Yaz Yanıt Yaz
Yazar
Mesaj
  Konu Arama Konu Arama  Topic Seçenekleri Topic Seçenekleri
Saliha Göçergi Açılır Kutu İzle
Forum Yöneticisi
Forum Yöneticisi
Simge

Kayıt Tarihi: 08 Mayıs 2023
Durum: Aktif Değil
Puanlar: 33
Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı Saliha Göçergi Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Konu: String Parçalama
    Gönderim Zamanı: 30 Mayıs 2023 Saat 16:36
String bir değeri parçalama işlemi yapmak istediğinizde TclStringList sınıfını kullanabilirsiniz. Burada cümle içerisindeki ayırıcı karakteri "Delimiter" özelliği ile belirterek kelimeleri ayırabilirsiniz. "DelimitedText özelliği ile ayrılacak olan string dizesini alabilirsiniz.

Bir örnek vererek kullanmanıza yardımcı olayım.

var

list:tstringlist;

str:String;

begin

  str := 'hello,world,test';

  list := Clomosy.StringListNew;//tstringlist.Create yerine;

 

   List.Delimiter := ',';

  List.DelimitedText := str;

   Str:=Clomosy.StringListItemString(List,0);//0. elemanı getirir

  ShowMessage(str);

end;




Düzenleyen Saliha Göçergi - 30 Mayıs 2023 Saat 16:39
Yukarı Dön
Saliha Göçergi Açılır Kutu İzle
Forum Yöneticisi
Forum Yöneticisi
Simge

Kayıt Tarihi: 08 Mayıs 2023
Durum: Aktif Değil
Puanlar: 33
Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı Saliha Göçergi Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 30 Mayıs 2023 Saat 16:51
TclStringList sınfına ait başka özelliklerin kullanımına bakmak için http://www.docs.clomosy.com/index.php/TclStringList sayfasını ziyaret edebilirsiniz.
Yukarı Dön
Benhur Açılır Kutu İzle
Moderatör
Moderatör
Simge

Kayıt Tarihi: 30 Mayıs 2023
Durum: Aktif Değil
Puanlar: 28
Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (1) Teşekkürler(1)   Alıntı Benhur Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 30 Mayıs 2023 Saat 21:33
ilave örnek;

    i:Integer;
    strList:TclStringList;
    MyFileStr:String;
  Begin
    If clFileExists('file.txt','x:\') Then clShowMessage('dosya Var') Else clShowMessage('dosya Yok');
    strList := Clomosy.StringListNew;
    MyFileStr := clPathCombine('MyFile.Txt',Clomosy.AppFilesPath); 
    ShowMessage(MyFileStr);
    If clFileExists(MyFileStr,'') Then
      strList.LoadFromFile(MyFileStr,0);
    strList.Add('New Line');
    strList.SaveToFile(MyFileStr,0);
  End
learn, try, use...
Yukarı Dön
 Yanıt Yaz Yanıt Yaz

Forum Atla Forum İzinleri Açılır Kutu İzle

Forum Software by Web Wiz Forums® version 12.07
Copyright ©2001-2024 Web Wiz Ltd.

Bu Sayfa 0,016 Saniyede Yüklendi.