Hello,
Ok, it seams that I found a workaround. It works correctly if I use this:
lData := ARequest.Content;
instead of
lData := ARequest.ContentFields.Text;
It seams that the string is filled correctly, even if the TStringList
isn't filled.
I think this could be improved by adding this code:
procedure TRequest.InitPostVars;
Var
...
DataStr: string;
begin
...
else if Pos('APPLICATION/X-WWW-FORM-URLENCODED',Uppercase(CT))<>0 then
ProcessUrlEncoded(M, ContentFields)
// For other data just load it to a TStringList and let the
// user application process it
else
begin
SetLength(DataStr, M.Size);
M.ReadBuffer(DataStr[1], M.Size);
ContentFields.Text := DataStr;
end;
But I was not able to test it yet, because my build script (located in
C:\Programas\lazarus31\fpc\2.5.1\source\packages):
set path=C:\Programas\lazarus31\fpc\2.5.1\bin\i386-win32
make fcl-web
pause
Fails with:
C:\Programas\lazarus31\fpc\2.5.1\source\packages>set path=C:\Programas\lazarus31
\fpc\2.5.1\bin\i386-win32
C:\Programas\lazarus31\fpc\2.5.1\source\packages>make fcl-web
make -C fcl-web all
make[1]: Entering directory `C:/Programas/lazarus31/fpc/2.5.1/source/packages/fc
l-web'
C:/Programas/lazarus31/fpc/2.5.1/bin/i386-win32/ppc386.exe fpmake.pp -n -Fu../..
/rtl -Fu../../packages/hash/units/i386-win32 -Fu../../packages/paszlib -Fu../../
packages/fcl-process -Fu../../packages/fpmkunit
Fatal: Can't find unit system used by fpmake
Fatal: Compilation aborted
make[1]: *** [fpmake] Error 1
make[1]: Leaving directory `C:/Programas/lazarus31/fpc/2.5.1/source/packages/fcl
-web'
make: *** [fcl-web] Error 2
Even while a nearly identical script works for FPC 2.4.2 for building fcl-web.
On Tue, Nov 1, 2011 at 7:53 AM, Vincent Snijders
<vincent.snijd...@gmail.com> wrote:
> You can send arbitrary data using MULTIPART/FORM-DATA
Indeed, but I'd rather specify my own mime-type and not use any
pre-defined format for packaging my data. This kind of thing just adds
overhead and slowness.
--
Felipe Monteiro de Carvalho
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
