MartinFb, are you sure & char must not be hilited as .,:= etc? it's black here. procedure TRTBSource.SaveToFile(&File:string); var Data:TStrings; begin Data:=TStringList.Create; Data.Text:=Text; Data.SaveToFile(&File); FreeAndNil(Data); end; -- Regards, Alexey