Ver Mensaje Individual
  #1  
Antiguo 14-12-2007
sabato48 sabato48 is offline
Registrado
 
Registrado: abr 2007
Posts: 4
Reputación: 0
sabato48 Va por buen camino
Problema con indy y cadena con &

Hola que tal gente del foro, es mi primer post dentro de este y espero me puedan ayudar.

Uso Delphi 5 con indy 9, tengo un programa con un TIdHTTP en con el cual efectúo una llamada post hacia una CGI, el problema es que si la cadena que le envio contiene un & el valor del campo le llega incompleto, hice un ejemplo de la CGI y el codigo es el siguiente:

Código Delphi [-]
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var   cadena: String;
begin   cadena := Request.ContentFields.Values['razonSocial'];
  Response.Content := cadena;
end;
Ahora les envío el código de mi programa:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var   cadenarespuesta, cadenaorigen : TStringStream;   URL:String;
begin   URL := Edit1.Text;   
cadenaorigen := TStringStream.Create(Memo1.Lines.Text);   Memo1.Lines.Add(indi.Post(URL,Memo1.Lines));   
indi.Free;   
cadenarespuesta.Free;   cadenaorigen.Free; 
end;

En el Memo1 tengo la linea razonSocial = padre & son, al momento de correr el programa, lo único que agrega al Memo es padre.

Probé con indy 10, incluyendo de hecho los archivos .pas necesarios a mi proyecto, inclusive intente con la solución expuesta en este hilo, sin embargo así tampoco me funcionó, leí también el hilo, pero sigue sin funcionar.

Si alguien pudiera ayudarme a entender que es lo que pasa, o sabe alguna solución que me sea útil, les estaría muy agradecido.

De antemano les agradezco y envío saludos.

Última edición por sabato48 fecha: 14-12-2007 a las 00:02:03. Razón: no se veia bien el codigo delphi
Responder Con Cita