[sumbik]

Здравствуйте.

Из потока пытаюсь синхронизировать следующую процедуру.

Код:

procedure Check.ShowCookies;
var
i:integer;
begin

for i := 0 to Form1.IdCookieManager1.CookieCollection.Count-1 do
begin

Form1.sMemo2.Lines.Add(Form1.IdCookieManager1.CookieCollection[i].ServerCookie);
Unit1.CookiesMain.Add(Form1.IdCookieManager1.CookieCollection[i].ServerCookie);

end; //for

Form1.sMemo2.Lines.Add('Количество строк в кукисах = ' +
                       IntToStr(Form1.IdCookieManager1.CookieCollection.Count))
end;

На форму выводится отлично, а вот с сохранением в переменную ошибка, куда бы я ни пробовал сохранить, в любую публичную переменную Unit1 либо в переменную потока Unit3. Мне нужно сохранить кукисы куда-то, чтобы потом использовать данные в потоке позже.