Új hozzászólás Aktív témák

• #1994 zka67 őstag mekker #1993

  Új Válasz 2014-08-29 22:15:21 #1994

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  zka67

  őstag

  válasz mekker #1993 üzenetére

  Szia, így:

  Uses HTTPApp;
  
  procedure TForm1.Button1Click(Sender: TObject);
  const S : string = 'Árvíztűrő tükörfúrógép';
  begin
  Memo1.Lines.Add( S );
  Memo1.Lines.Add( HTTPEncode( UTF8Encode(S) ) );
  end;

  A példa kimenete:

  Árvíztűrő tükörfúrógép
  %C3%81rv%C3%ADzt%C5%B1r%C5%91+t%C3%BCk%C3%B6rf%C3%BAr%C3%B3g%C3%A9p

Új hozzászólás Aktív témák