![]() |
| 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
|
| Yazar | |
Saliha Göçergi
Forum Yöneticisi
Kayıt Tarihi: 08 Mayıs 2023 Durum: Aktif Değil Puanlar: 33 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı Saliha Göçergi
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
Konu: String ParçalamaGö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 |
|
![]() |
|
Saliha Göçergi
Forum Yöneticisi
Kayıt Tarihi: 08 Mayıs 2023 Durum: Aktif Değil Puanlar: 33 |
Mesaj Seçenekleri
Yanıt Yaz
Alıntı Saliha Göçergi
Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz.
Teşekkürler(0)
Alıntı Cevapla
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.
|
|
![]() |
|
Benhur
Moderatör
Kayıt Tarihi: 30 Mayıs 2023 Durum: Aktif Değil Puanlar: 28 |
Mesaj Seçenekleri
Teşekkürler(1)
Alıntı Cevapla
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...
|
|
![]() |
|
Yanıt Yaz
|
|
| Tweet |
| Forum Atla | Forum İzinleri ![]() Kapalı Foruma Yeni Konu Gönderme Kapalı Forumdaki Konulara Cevap Yazma Kapalı Forumda Cevapları Silme Kapalı Forumdaki Cevapları Düzenleme Kapalı Forumda Anket Açma Kapalı Forumda Anketlerde Oy Kullanma |