hata kodu

[arsl01]

merhaba ben butona bir kod yazdım tıklayınca şöyle bir hata veriyor.


access violation at adress c7087588,accessing adress 00000

kodda burada yani internetten json alırken alıyor ama visible yaptımmı bu hatayı veriyor windowsta olmuştuda mobilde hata verdi 

button kodu:

for i := 0 to Length(EnigmaAPI.filim.available_channels) - 1 do

begin

   GetLiveButton(strtoint(EnigmaAPI.filim.available_channels[i].channel_id)).Visible := False;
 end;

fonksiyonda burada

var
 I: Integer;
begin
for I := 0 to ScrollBox1.Controls.Count - 1 do
  if ScrollBox1.Controls[i] is TButton then
  begin
    if ScrollBox1.Controls[i].Tag = LiveButonTag then
    begin
      result := TButton(ScrollBox1.Controls[i]);
      Exit;
    end;
  end;
end;