Fix trailing linebreak counted to last column name in first CSV line

This commit is contained in:
Ansgar Becker
2022-11-14 19:56:34 +01:00
parent f33ccc708f
commit 9339304356

View File

@@ -225,7 +225,7 @@ begin
for Value in Row do begin
Col := TTableColumn.Create(FConnection);
if IgnoreLines > 0 then
Col.Name := Value.OldText
Col.Name := Trim(Value.OldText)
else
Col.Name := 'col_'+Row.IndexOf(Value).ToString;
Col.DataType := FConnection.Datatypes[0]; // UNKNOWN by default