Memo in MS SQL Speichern und Auslesen

[Andidreas]

Hallo,

ich habe in meiner MS SQL Tabelle eine Spalte vom Typ "Text"...
In dieser Spalte möchte ich den Inhalt eines Memos abspeicher:

Delphi-Quellcode:

  Try
    With (MSSQL_Query1) Do
    Begin
      Active := False;
      SQL.Clear;
        SQL.Add(' Insert Into "' + ModuleUniDBSchema + '.Table1" ');
        SQL.Add(' (Message) ');
        SQL.Add(' Values( ');
        SQL.Add(' '''+ mem_mailtext.Lines.Text +''' ');
        SQL.Add(' )' );
      ExecSQL;
    End;
  Except
    On E:EUniError Do
    Begin
      fnDisplayMyActionBox('ERR', 'MS SQL Error', 'Could not insert Record into Table1!', E.Message, EmptyStr, EmptyStr, True);
      Exit;
    End;
  End;

Das Funktioniert soweit, bzw. in der MS SQL Tabelle ist die Memo eingabe:

Code:

Das
ist
ein
Test

wie folgt abgespeichert:

Code:

Das  ist  ein  Test

Jetzt hab ich das Problem das ich über die UniDac Komponente den Text nicht auslesen kann:

Delphi-Quellcode:

  With (MSSQL_Query1) Do
  Begin
    Active := False;
    SQL.Clear;
    SQL.Add(' Select Message From "' + ModuleUniDBSchema + '.Table1" ');
    Active := True;
  End;

  ShowMessage(MSSQL_Query1.FieldByName('Message').AsAnsiString);

Beim ShowMessage erhalte ich die Fehlermeldung:
Invalid class typecast

Was mach ich falsch, bzw. wie kann ich den Text so auslesen wie ich ihn gespeichert hab?