Menu ▾ ▴

#1 QAMF3 error SBadStreamFormat

1.0
closed
swish
None
2017-09-18
2017-09-17
Sergei
No

Hi, please fix the error in source \ QAMF3.pas, do not decode amf package, I attached the file.
I do so

var AMF: TQAMF;
datastring:string;
Begin
AMF := TQAMF.Create;
amf.LoadFromFile('1.amf');
datastring:=AMF.AsString
freeandnil(AMF);
End;
2 Attachments
1.amf
QAMF3.pas

Discussion

  • Sergei

    Sergei - 2017-09-17
    Post awaiting moderation.

  • swish

    swish - 2017-09-18

    Thanks.I have fixed it.You are right,I change it to

    if IntPtr(p) + ALen <= IntPtr(pe) then
    for fix.

     

  • swish

    swish - 2017-09-18
    • assigned_to: swish
     

  • swish

    swish - 2017-09-18
    • status: open --> closed
    • Attachments has changed:

    Diff:

    --- old
+++ new
@@ -1 +1,2 @@
 1.amf (4.4 kB; application/octet-stream)
+QAMF3.pas (114.1 kB; application/octet-stream)
     

  • swish

    swish - 2017-09-18

    New fixed file attached.

     

Log in to post a comment.