aboutsummaryrefslogtreecommitdiffstats
path: root/unicode/src/base/UPlaylist.pas
diff options
context:
space:
mode:
authortobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-07-23 19:18:31 +0000
committertobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-07-23 19:18:31 +0000
commit230d5ed9b8cd6ed6d8a85a53e614a3bbd6ccddb3 (patch)
tree42e36cd0c88d5fb73c2ce52664c20aceb12300a1 /unicode/src/base/UPlaylist.pas
parentceaaf48e88ba705e47cbf491720f05fda814e33b (diff)
downloadusdx-230d5ed9b8cd6ed6d8a85a53e614a3bbd6ccddb3.tar.gz
usdx-230d5ed9b8cd6ed6d8a85a53e614a3bbd6ccddb3.tar.xz
usdx-230d5ed9b8cd6ed6d8a85a53e614a3bbd6ccddb3.zip
TTextFileStream/TMemTextFileStream
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1886 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--unicode/src/base/UPlaylist.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/unicode/src/base/UPlaylist.pas b/unicode/src/base/UPlaylist.pas
index 09c196ef..03ae2ffb 100644
--- a/unicode/src/base/UPlaylist.pas
+++ b/unicode/src/base/UPlaylist.pas
@@ -184,7 +184,7 @@ begin
//Load File
try
FilenameAbs := PlaylistPath.Append(Filename);
- TextStream := TTextFileStream.Create(FilenameAbs, fmOpenRead);
+ TextStream := TMemTextFileStream.Create(FilenameAbs, fmOpenRead);
except
begin
Log.LogError('Could not load Playlist: ' + FilenameAbs.ToNative);
@@ -260,7 +260,7 @@ begin
Exit;
// open file for rewriting
- TextStream := TTextFileStream.Create(PlaylistFile, fmCreate);
+ TextStream := TMemTextFileStream.Create(PlaylistFile, fmCreate);
try
// Write version (not nessecary but helpful)
TextStream.WriteLine('######################################');