Delphi 7 problem

[Ivan.dev]

I have error message: Not enough storage is available to complete this operation" or C0000005
I do not know why it happen. I contacted eSignal, but there do not know the decision of this problem.
I am connected to the eSignal application, then I use a following code:
symbol:='MSFT';
tsFilter.sSymbol:=(symbol);
tsFilter.bQuotes:=1;
tsFilter.bTrades := 1;
tsFilter.lNumDays := 1;
tsFilter.bFilterPrice:=0;
tsFilter.dminPrice:=0;
tsFilter.dmaxPrice:=0;
tsFilter.bFilterVolume :=0;
tsFilter.bFilterQuoteExchanges :=0;
tsFilter.bFilterTradeExchanges :=0;
try
tsHandle := Hooks1.RequestTimeSales[tsFilter]; //error at this line ("Not enough storage is available to complete this operation" or C0000005)
except
on e:exception do memo1.Lines.Add('errors ('+e.Message+') handle: '+inttostr(tsHandle));
end;

[afastexit]

Have you declared the tsFilter variable local to the procedure?
Try to declare it as a global variable, it could resolve the memory problem.