var
s: string;
...
ArrayData := VarArrayCreate( [1, RowCount, 1, ColCount], varOleStr );
ArrayData[1, 1] := s;
Cell1 := ExcelWS.Cells.Item[1, 1];
Cell2 := ExcelWS.Cells.Item[RowCount, ColCount];
Range := ExcelWS.Range[Cell1, Cell2];
Range.Value := ArrayData;
ExcelApplication обрезает строки
Код:
Добрый день, подскажите почему обрезаются строки в ячейках до 256 символов?
Delphi 2007, Office 2010.
Есть какие то варианты это исправить?
пробовал также
Код:
ExcelWS.Cells.Item[1, 1].Value := s;
Цитата:
ExcelWS.Cells.Item[1, 1].Value := string;
Вы умудрились переменную назвать string? Или что это за тупняк? )
И да, оформляйте код по правилам.
Прошу прощения, string написал, чтоб показать какого типа переменная, поправил
Ясно. Посмотрите в отладчике значение переменной стринг. Дело в том что есть опция компилятора, когда он string воспринимает как ShortString, тогда его длина будет не более 255. Если с этим все нормально, то надо копать VarArrayCreate - тут я подсказать, увы, ничего не могу.
Спасибо, вопрос решился, надо сохранять в формате xlsx, тогда ячейки не обрезаются. значение FileFormat = 51