Intraweb ile joomla sitesinden bilgi çekmek

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
habikus
Üye
Mesajlar: 69
Kayıt: 14 Eyl 2011 04:23

Intraweb ile joomla sitesinden bilgi çekmek

Mesaj gönderen habikus »

Intraweb Uygulaması araçlarını kullanarak yapığım programda hosting serverdeki joomla sitemden dataları local bilgisayarımda gösterebiliyorum. Fakat bazı field ler html kodları ile beraber görünüyor. Bu dataları html kodları arınmış halde görebilmenin bir yolu varmı? Yardımcı olursanız sevinirim.
ertank
Kıdemli Üye
Mesajlar: 1716
Kayıt: 12 Eyl 2015 12:45

Re: Intraweb ile joomla sitesinden bilgi çekmek

Mesaj gönderen ertank »

Merhaba,

Temizlemek istediğiniz HTML tag içeren string değerlerin örneklerini buraya yazabilir misiniz?

Eğer "<HTML>metin burada</HTML>" gibi bir HTML tag formatında ise aşağıdaki gibi bir fonksiyon ile sorunu çözebilirsiniz.

Kod: Tümünü seç

function StripHTML(const S: string): string;
var
  TagBegin, TagEnd, TagLength: integer;
  TempString: string;
begin
  TempString := S;
  TagBegin := Pos( '<', TempString);      // search position of first <

  while (TagBegin > 0) do
  begin  // while there is a < in TempString
    TagEnd := Pos('>', TempString);              // find the matching >
    TagLength := TagEnd - TagBegin + 1;
    Delete(TempString, TagBegin, TagLength);     // delete the tag
    TagBegin:= Pos( '<', TempString);            // search for next <
  end;

  Result := TempString;                   // give the result
end;
Kaynak: http://www.festra.com/eng/snip12.htm

Kullanımı:

Kod: Tümünü seç

TemizlenmisString := StripHTML(TagIcerenString);
habikus
Üye
Mesajlar: 69
Kayıt: 14 Eyl 2011 04:23

Re: Intraweb ile joomla sitesinden bilgi çekmek

Mesaj gönderen habikus »

Sağol ertank verdiğiniz bilgilerle sorunum çözüldü. HTML tag larım ise aşağıdaki gibi idi. Allah razı olsun.

Kod: Tümünü seç

<ul><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Çok konuşmazdı</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Daima düşünceliydi</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Boş şeylerle uğraşmazdı</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Kötü söz söylemezdi</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Kimseyle çelişmezdi</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Her zaman ağırbaşlıydı</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Dünya işleri için hiç kızmazdı</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Umanı umutsuzluğa düşürmezdi&nbsp;</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Kimsenin kusurunu araştırmazdı</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Affediciliği tabii idi intikam almazdı</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Hoşlanamdığı bir şey hakkında susardı</span></span></span></li><br>	<li><br>		<span style="font-size: 12pt;"><span style="font-family: verdana,geneva;"><span style="font-size: 10pt;">Gerçeğe aykırı övgüyü kabul etmezdi </span></span></span><br>		
Cevapla