procedure TForm12.FormCreate(Sender: TObject);
begin try
abfThreadComponent1.Execute;
url_:=TStringList.Create;
ref_:=TStringList.Create;
except end;End;