RefURL := GikoSys.UrlToServer(FBoard.URL) + 'test/bbs.cgi';
end else begin
URL := FThreadItem.GetSendURL;
- RefURL := GikoSys.UrlToServer(FThreadItem.ParentBoard.URL)
- + 'test/read.cgi/'
- + FThreadItem.ParentBoard.BBSID
- + '/' + ChangeFileExt(FThreadItem.FileName, '')
- + '/l50';
+ RefURL := FThreadItem.URL;
end;
Indy.Request.UserAgent := GikoSys.GetUserAgent;
Indy.Request.Referer := RefURL;