Tak funguje i ten první.
writeln(sl.Text); tam děla paseku.

Zkouším
Takto se mi podařilo stáhnout soubor s našeho servru přes synapse.

with THTTPSend.Create do
try
UserName:= 'admin';
Password:= 'admin';
If HTTPMethod('GET', 'http://101.15.20.19/mujseznam.txt') then
if ResultCode = 200 then Document.SaveToFile('.\mujseznam.txt');
finally
Free;
end;