Código Delphi [-] var t:Tstream; begin t := Tstrieam.Create(...)
var t:Tstream; begin t := Tstrieam.Create(...)