Ver Mensaje Individual
  #2  
Antiguo 13-05-2004
Avatar de tcp_ip_es
tcp_ip_es tcp_ip_es is offline
No confirmado
 
Registrado: ago 2003
Ubicación: Madrid
Posts: 635
Reputación: 0
tcp_ip_es Va por buen camino
En el evento on Action es donde recoges los parámetros, sería tal que asi:


Código:
procedure TWebModule1.WebModule1DatosAction(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var nombre, Apellido, Direccion:string;
begin
Nombre:=request.contentfields.values['nombre'];
Apellido:=request.contentfields.values['Apellido'];
Direccion:=request.contentfields.values['Direccion'];
.
.
.
end;
en el caso de que utilizaras en tu formulario el método get en vez del post sería tal que asi
Código:
procedure TWebModule1.WebModule1DatosAction(Sender: TObject;
  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var nombre, Apellido, Direccion:string;
begin
Nombre:=request.queryfields.values['Nombre'];
Apellido:=request.queryfields.values['Apellido'];
Direccion:=request.queryfields.values['Direccion'];
.
.
.
end;

Si tienes más dudas no dudes en preguntar. Saludos, Tony

Última edición por tcp_ip_es fecha: 13-05-2004 a las 10:24:36.
Responder Con Cita