7
Eki

Delphide Html Sembollerinin Karektere Çevrilmesi

Web sitelerinden Http Get işlemi yaparken bazı karakterlerin ” gibi html formatında geldiğini görürsünüz. Normalde PHP dilinde htmlentities fonksiyonu ile bunu decode edebiliyorsunuz. ama delphide bu fonksiyona benzer birşey bulamadığım için kolları sıvayıp kendi fonsiyonumu yazdım. Başka arkadaşların zorlanmaması için paylaşıyorum. Kodlarda açıklama yapmadım eğer takıldığınız yer olursa sorabilirsiniz.

function StripHtmlDecode(const S:String):String;
var
 i,Len,BegnTag:Integer;
 A,B,C:Boolean;
 Symbol:string;         //”
begin
 Len:=Length(S); Result:=S; i:=1;
 while i<=len do
 begin
  if (Result[i]='&') then begin A:=True; BegnTag:=i; end else
  if (Result[i]='#') and A then B:=True else
  if (Result[i] in ['0'..'9']) and A and B then C:=True else
  if (Result[i]=';') and A and B and C then
  begin
   Symbol:=String(Chr(StrToInt(Copy(Result,BegnTag+2,i-BegnTag-2))));
   Delete(Result,BegnTag,i-BegnTag+1);
   Insert(Symbol,Result,BegnTag);
   i:=BegnTag;
   A:=False; B:=False; C:=False;
  end else
  begin  A:=False; B:=False; C:=False; end;
  Inc(i);
 end;
end;



Bunları İncelediniz mi?

En iyi Sunucu (Hosting) Firması

Bir çok sunucu firması denedim. Şimdi hepsinin isimlerini burdan vermek istemiyorum çünkü içinde iyi olanda var, kötü olanda var. Çünkü kötümek,karalamak benim karakterim değildir. Ama ben şuana kadar memnun olduğum … Devamını oku..

Delphide Html Sembollerinin Karektere Çevrilmesi

Web sitelerinden Http Get işlemi yaparken bazı karakterlerin &#8221; gibi html formatında geldiğini görürsünüz. Normalde PHP dilinde htmlentities fonksiyonu ile bunu decode edebiliyorsunuz. ama delphide bu fonksiyona benzer birşey bulamadığım için … Devamını oku..

Telefon ve Adres Rehberi

Telefon rehberi programı sayesinde müşterilerinizin numarasını,email adresini,kişiye ait gerekli notlarınızı arşivleyebilip,istediğiniz anda ad,soyad ve telefon numarasına göre arama yapabilirsiniz. Telefon defteri programı tamamen ücretsiz olup hiçbir kısıtlama yoktur. üstelik iletişim … Devamını oku..

Arama:
Facebook Twitter Friendfeed Rss Wmaraci Arşiv
Son Yorumlar
İstatistik
Barındırılan Sunucu Şirketi
© Copyright 2010-2020 Fatih Duman.

Üye Girişi Valid XHTML 1.0 Transitional