var
i : Integer;
MyList : TStringList;
begin
MyList := ccSessiosnManager.GetSessionObject(ccSessionManager.SessionId,'MyObject');
if not(MyObject = nil) then
begin
for i:=0 to MyList.Count-1 do
begin
ccScriptEngine.Log(ccLog_Debug,MyList.Strings[i]);
end;
end;
end;