XML VERİLERİNİ AYIRMA

void description_bul

{

mevcut_xml_description = gelen_xml;

Delete(mevcut_xml_description, 1, 550);

// ShowMessage(mevcut_xml);

description_index_baslangic = Pos('description', mevcut_xml_description);

// ShowMessage(title_index_baslangic);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

// ShowMessage(mevcut_xml);

description_index_son = Pos('description', mevcut_xml_description);

// ShowMessage(title_index_son);

nihai_description = Copy(mevcut_xml_description, 1, description_index_son-3)

while (Pos('"', nihai_description) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description);

Delete(nihai_description, cift_tirnak_index, 1);

}

nihai_description = Trim(nihai_description);

}

void description_bul2

{

// 2. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description2 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description2) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description2);

Delete(nihai_description2, cift_tirnak_index, 1);

}

nihai_description2 = Trim(nihai_description2);

// 3. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description3 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description3) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description3);

Delete(nihai_description3, cift_tirnak_index, 1);

}

nihai_description3 = Trim(nihai_description3);

// 4. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description4 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description4) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description4);

Delete(nihai_description4, cift_tirnak_index, 1);

}

nihai_description4 = Trim(nihai_description4);

// 5. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description5 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description5) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description5);

Delete(nihai_description5, cift_tirnak_index, 1);

}

nihai_description5 = Trim(nihai_description5);

// 6. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description6 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description6) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description6);

Delete(nihai_description6, cift_tirnak_index, 1);

}

nihai_description6 = Trim(nihai_description6);

// 7. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description7 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description7) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description7);

Delete(nihai_description7, cift_tirnak_index, 1);

}

nihai_description7 = Trim(nihai_description7);

// 8. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description8 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description8) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description8);

Delete(nihai_description8, cift_tirnak_index, 1);

}

nihai_description8 = Trim(nihai_description8);

// 9. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description9 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description9) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description9);

Delete(nihai_description9, cift_tirnak_index, 1);

}

nihai_description9 = Trim(nihai_description9);

// 10. DESCRİPTİON

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

Delete(mevcut_xml_description, 1, description_index_baslangic + 11);

description_index_baslangic = Pos('description', mevcut_xml_description);

nihai_description10 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)

while (Pos('"', nihai_description10) <> 0)

{

cift_tirnak_index = Pos('"', nihai_description10);

Delete(nihai_description10, cift_tirnak_index, 1);

}

nihai_description10 = Trim(nihai_description10);

}

şu algoritma ile ayırdım. sadece bu xml'e özel bir ayırma şekli ve yani dinamik bir şey değil ama işimi gördü şimdilik ileride patlamazsa.

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
Ahmet_27 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 16 Temmuz 2025 Durum: Aktif Değil Puanlar: 36	Mesaj Seçenekleri Yanıt Yaz Alıntı Ahmet_27 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: XML VERİLERİNİ AYIRMA Gönderim Zamanı: 18 Temmuz 2025 Saat 16:57
	Internetten XML verisi çektim. Bu XML Verisini nasil ayiracagim? <title> ....................<title> <description> ................<description> <title> ....................<title> <description> ................<description> <title> ....................<title> <description> ................<description> <title> ....................<title> <description> ................<description> böyle veri geliyor mesela tüm title'lari bir title dizisine almak istiyorum içindeki verileri sirayla

Emr.Erkmn Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Moderatör Kayıt Tarihi: 28 Şubat 2025 Durum: Aktif Değil Puanlar: 146	Mesaj Seçenekleri Yanıt Yaz Alıntı Emr.Erkmn Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: Dün Saat 11:56
	Merhaba Ahmet, XML içindeki <title> ve <description> etiketlerinin verilerini ayıklamak istiyorsan.. Clomosy'nin TclStringList veya TclArrayString gibi yapılarıyla bunu yapabilirsin. İyi çalışmalar.

Ahmet_27 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 16 Temmuz 2025 Durum: Aktif Değil Puanlar: 36	Mesaj Seçenekleri Yanıt Yaz Alıntı Ahmet_27 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: Dün Saat 12:39
	void description_bul { mevcut_xml_description = gelen_xml; Delete(mevcut_xml_description, 1, 550); // ShowMessage(mevcut_xml); description_index_baslangic = Pos('description', mevcut_xml_description); // ShowMessage(title_index_baslangic); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); // ShowMessage(mevcut_xml); description_index_son = Pos('description', mevcut_xml_description); // ShowMessage(title_index_son); nihai_description = Copy(mevcut_xml_description, 1, description_index_son-3) while (Pos('"', nihai_description) <> 0) { cift_tirnak_index = Pos('"', nihai_description); Delete(nihai_description, cift_tirnak_index, 1); } nihai_description = Trim(nihai_description); } void description_bul2 { // 2. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description2 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description2) <> 0) { cift_tirnak_index = Pos('"', nihai_description2); Delete(nihai_description2, cift_tirnak_index, 1); } nihai_description2 = Trim(nihai_description2); // 3. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description3 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description3) <> 0) { cift_tirnak_index = Pos('"', nihai_description3); Delete(nihai_description3, cift_tirnak_index, 1); } nihai_description3 = Trim(nihai_description3); // 4. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description4 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description4) <> 0) { cift_tirnak_index = Pos('"', nihai_description4); Delete(nihai_description4, cift_tirnak_index, 1); } nihai_description4 = Trim(nihai_description4); // 5. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description5 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description5) <> 0) { cift_tirnak_index = Pos('"', nihai_description5); Delete(nihai_description5, cift_tirnak_index, 1); } nihai_description5 = Trim(nihai_description5); // 6. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description6 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description6) <> 0) { cift_tirnak_index = Pos('"', nihai_description6); Delete(nihai_description6, cift_tirnak_index, 1); } nihai_description6 = Trim(nihai_description6); // 7. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description7 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description7) <> 0) { cift_tirnak_index = Pos('"', nihai_description7); Delete(nihai_description7, cift_tirnak_index, 1); } nihai_description7 = Trim(nihai_description7); // 8. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description8 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description8) <> 0) { cift_tirnak_index = Pos('"', nihai_description8); Delete(nihai_description8, cift_tirnak_index, 1); } nihai_description8 = Trim(nihai_description8); // 9. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description9 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description9) <> 0) { cift_tirnak_index = Pos('"', nihai_description9); Delete(nihai_description9, cift_tirnak_index, 1); } nihai_description9 = Trim(nihai_description9); // 10. DESCRİPTİON description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); Delete(mevcut_xml_description, 1, description_index_baslangic + 11); description_index_baslangic = Pos('description', mevcut_xml_description); nihai_description10 = Copy(mevcut_xml_description, 1, description_index_baslangic-3) while (Pos('"', nihai_description10) <> 0) { cift_tirnak_index = Pos('"', nihai_description10); Delete(nihai_description10, cift_tirnak_index, 1); } nihai_description10 = Trim(nihai_description10); } şu algoritma ile ayırdım. sadece bu xml'e özel bir ayırma şekli ve yani dinamik bir şey değil ama işimi gördü şimdilik ileride patlamazsa.

Emr.Erkmn Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Moderatör Kayıt Tarihi: 28 Şubat 2025 Durum: Aktif Değil Puanlar: 146	Mesaj Seçenekleri Yanıt Yaz Alıntı Emr.Erkmn Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(1) Alıntı Cevapla Gönderim Zamanı: 10 Saat 3 Dakika Önce Saat 11:51
	Tamamdır. Tekrar hata alırsan paylaşırsın bizimle. İyi çalışmalar