TStringList.Delimiter := Edit_1.text....TCaption vs. Char

[sx2008]

Also ich würde gleich Nägel mit Köpfen machen und ein eigene Funktion/Methode vorsehen:

Delphi-Quellcode:

// liefert das Delimterzeichen zurück
// zusätzlich darf man auch ein #-Zeichen gefolgt von einer Zahl angeben
// Beispiel: '#8'   ==> Tabulatorzeichen
//           '#$FF' ==> ASCII-Zeichen 255
function StringToDelimiter(s:string):char;
const
  DEFAULT_DELIM =';';
var
  i : Integer;
begin
  if s = '' then
    s := DEFAULT_DELIM
  else if s[1] := '#' then
  begin
    i := StrToIntDef(Copy(s, 2, 5), ord('#'));
    s := Chr(i);
  end;
  result := s[1];
end;

sl.Delimiter := StringToDelimiter(Main_Form.edt_Delimiter.Text);