Question : Reading various textfiles according to Encoding

Dear experts,

I work with Delphi2009 which supports unicode.

I am trying to make a CSV importer.

To open a file I use the TextFile, AssignFile(f, filename), reset(f), readln(f, myString), tokenize each line with DelimitedText method of TStringList, CloseFile(f).

However it works only for ANSII text files.  If file saved with unicode it doesn't work.

How can I tell the file encoding and perform reading,  if file unicode or other encoding transforming readed text to ASCII so I can pass it to TStringList, else if ASCII encoding read it normally and pass ASCII text to TStringList?

In other words universal textfile reader and transform encoded string to wide string or something I can work with.  Imported text would ONLY contain normal latin and Greek chars so ASCII is what fits best

Answer : Reading various textfiles according to Encoding

Use this instead

1: 2: 3: 4:

Dim rs As Recordset Set rs = frm.Recordset rs.Delete rs.Requery