Модератор: Модераторы
alexs писал(а):LazReport
alexs писал(а):fpspreadsheet
RusDeveloper писал(а):alexs писал(а):LazReport
даalexs писал(а):fpspreadsheet
нет. где его взять? в пакетах доступных для установки я его не вижу.
PS. Lazarus и FPC скомпилированы из SVN 3-х дневной давности
Little_Roo писал(а):Я ставил так -
компилируем laz_fpspreadsheet.lpk
компилируем и устанавливаем laz_fpspreadsheet_visual.lpk
и только после этого laz_fpspreadsheetexport_visual.lpk
Компиляция пакета laz_fpspreadsheet 1.6.2: Код завершения 1, ошибок: 1, предупреждений: 9, подсказок: 9
fpolestorage.pas(410,52) Warning: Implicit string type conversion from "AnsiString" to "WideString"
fpolestorage.pas(428,52) Warning: Implicit string type conversion from "AnsiString" to "WideString"
uvirtuallayer_ole.pas(324,11) Warning: Implicit string type conversion from "RawByteString" to "WideString"
uvirtuallayer_ole.pas(325,25) Warning: Implicit string type conversion with potential data loss from "WideString" to "UTF8String"
uvirtuallayer_ole.pas(327,16) Warning: Implicit string type conversion with potential data loss from "WideString" to "UTF8String"
fpsexprparser.pas(401,14) Note: Virtual method "AsString:AnsiString;" has a lower visibility (protected) than parent class TsExprNode (public)
fpsexprparser.pas(402,14) Note: Virtual method "AsRPNItem(PRPNItem):^TRPNItem;" has a lower visibility (protected) than parent class TsExprNode (public)
fpsexprparser.pas(403,14) Note: Virtual method "NodeType:<enumeration type>;" has a lower visibility (protected) than parent class TsExprNode (public)
fpsfunc.pas(1416,3) Note: Local variable "cell" not used
fpsexprparser.pas(1534,3) Note: Local variable "tt" is assigned but never used
fpsexprparser.pas(1586,3) Note: Local variable "Right" not used
fpspreadsheet.pas(1688,2) Warning: User defined: TODO: Shift cells to the right/below !!! ???
xlscommon.pas(1547,9) Warning: Comparison might be always true due to range of constant and expression
xlsbiff5.pas(1580,25) Hint: Mixing signed expressions and longwords gives a 64bit result
xlsescher.pas(530,57) Hint: Mixing signed expressions and longwords gives a 64bit result
xlsbiff8.pas(456,19) Warning: Implicit string type conversion with potential data loss from "WideString" to "AnsiString"
xlsbiff8.pas(1951,4) Warning: User defined: TODO: Fix writing of cell comments in BIFF8 (file is readable by OpenOffice, but not by Excel)
xlsxooxml.pas(1017,3) Note: Local variable "msg" is assigned but never used
xlsxooxml.pas(2982,43) Error: Identifier not found "FileNameIsAbsolute"
function TsSpreadFormatRegistry.GetFormatArrayFromFileName(
AFileAccess: TsSpreadFileAccess; const AFileName: String;
APriorityFormat: TsSpreadFormatID = sfidUnknown): TsSpreadFormatIDArray;
var
idx: Integer;
i, n: Integer;
ext: String;
data: TsSpreadFormatData;
begin
ext := Lowercase(ExtractFileExt(AFileName));
if APriorityFormat <> sfidUnknown then
begin
// Bring the priority format to the top
idx := IndexOf(APriorityFormat);
FList.Exchange(0, idx);
end;
SetLength(Result, FList.Count);
n := 0;
for i := 0 to FList.Count - 1 do
begin
data := TsSpreadFormatData(FList[i]);
case AFileAccess of
faRead : if data.ReaderClass = nil then Continue;
faWrite : if data.WriterClass = nil then Continue;
end;
if Lowercase(data.FileExtension[0]) = ext then
begin
Result[n] := data.FormatID;
inc(n);
end;
end;
SetLength(Result, n);
if APriorityFormat <> sfidUnknown then
// Restore original order
FList.Exchange(idx, 0);
end;
RusDeveloper писал(а):в xls как-то коряво выгружается, xlsx - лучше...
Сейчас этот форум просматривают: Google [Bot] и гости: 229