v1.5.1
This commit is contained in:
parent
ee7b7164ce
commit
de19e2be1b
|
|
@ -71,12 +71,13 @@ Type TSImage = Class
|
||||||
Begin
|
Begin
|
||||||
des1 := 0xff;
|
des1 := 0xff;
|
||||||
des2 := 0xc0;
|
des2 := 0xc0;
|
||||||
|
des3 := 0xc2;
|
||||||
flag := 1;
|
flag := 1;
|
||||||
while flag do
|
while flag do
|
||||||
begin
|
begin
|
||||||
stringObj_.Read(byte1, 1);
|
stringObj_.Read(byte1, 1);
|
||||||
stringObj_.Read(byte2, 1);
|
stringObj_.Read(byte2, 1);
|
||||||
if byte1 = des1 and byte2 = des2 then flag := 0;
|
if byte1 = des1 and (byte2 = des2 or byte2 = des3) then flag := 0;
|
||||||
end
|
end
|
||||||
if flag then return array(0, 0);
|
if flag then return array(0, 0);
|
||||||
stringObj_.Read(tmp, 3);
|
stringObj_.Read(tmp, 3);
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue