Witajcie,
próbuje swoich sił z Allegro WebAPI i mam spory problem, mianowicie: chcę użyć funkcji wyszukiwania(na razie tylko proste wyszukanie), więc pisze sobie taki kod:
procedure TForm2.Button1Click(Sender: TObject);
var
i:integer;
begin
dane.Zapytanie:=SearchOptType.Create;
dane.Zapytanie.search_string:=edit1.Text;
SetLEngth(dane.Wyniki,50);
SetLEngth(dane.Kategorie,50);
for i := 1 to 50 do
begin
dane.Wyniki[i]:=SearchResponseType.Create;
dane.Kategorie[i]:=CategoriesStruct.Create;
end;
(AllegroHTTP as AllegroWebApiPortType).doSearch(dane.Sesja,dane.Za pytanie,dane.liczbaOfert,dane.liczbaOfertSpec,dane .Wyniki,dane.WykluczoneSlowa,dane.Kategorie);
//showmessage(dane.Wyniki[0].s_it_name);
end;
i otrzymuje taki oto błąd:
Wydaje się jakbym nie miał gdzieś niezainicjowany obiekt, ale nie wiem co robię źle. Sugestie?
- c6fcd206b6.png (17 KB) - ściągnięć: 115