function algeria_ToStream:TMemoryStream;begin Result:= TMemoryStream.Create; Result.Write(algeria_,algeria_Szie); Result.Position:= 0;End;