Hallo zusammen,
ich bin am Verzweifeln:
Ich greife auf eine Tabelle zu welche u.A. ein Memofeld beinhaltet (
MSSQL - Server Feldtyp ntext).
Auf meinem Rechner klappt alles, ich sehe den ganzen Text. Wenn ich das Programm dann auf den Server laufen lasse bekomme ich vom Text nur die ersten 2 Zeichen wieder. (Wenn ich den Datentyp auf text änder bekomme ich die ersten 4 Zeichen)
Ich habe ein kleines Testprogramm geschrieben und habe da das selbe Problem.
Hilfe!!!
Delphi-Quellcode:
procedure TfrmMainMenue.Button3Click(Sender: TObject);
var
MyConnectionFactory: TDBXConnectionFactory;
MyConnectionProperties: TDBXProperties;
DB_Test : TDBXConnection;
MyCommand : TDBXCommand;
MyReader : TDBXReader;
begin
MyConnectionFactory := TDBXConnectionFactory.GetConnectionFactory;
MyConnectionProperties := MyConnectionFactory.GetConnectionProperties('BFS');
DB_Test := MyConnectionFactory.GetConnection(MyConnectionProperties);
MyCommand := DB_Test.CreateCommand;
MyCommand.Parameters.ClearParameters;
MyCommand.Text := 'SELECT * FROM KostenPlanungKommentar';
MyReader := MyCommand.ExecuteQuery;
FillListView1(MyReader);
while MyReader.Next do
begin
...
ShowMessage(MyReader.Value['Kommentar'].GetWideString); // Hier werden nur die ersten 2 Zeichen zurückgegeben
....
end;
MyCommand.Free; // wieder freigeben...
end;