pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

Cosmetic

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3065 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
bigchimp
2014-05-20 12:36:07 +00:00
parent 20f88b74cd
commit db28686b2f
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/fpspreadsheet/fpsopendocument.pas
View File

@ -63,7 +63,7 @@ type
// Gets value for the specified attribute. Returns empty string if attribute // Gets value for the specified attribute. Returns empty string if attribute
// not found. // not found.
function GetAttrValue(ANode : TDOMNode; AAttrName : string) : string; function GetAttrValue(ANode : TDOMNode; AAttrName : string) : string;
// Figures out what the base year for times in this file (dates are unambiguous) // Figures out the base year for times in this file (dates are unambiguous)
procedure ReadDateMode(SpreadSheetNode: TDOMNode); procedure ReadDateMode(SpreadSheetNode: TDOMNode);
protected protected
procedure CreateNumFormatList; override; procedure CreateNumFormatList; override;
@ -179,8 +179,8 @@ end;
{ TsSpreadOpenDocReader } { TsSpreadOpenDocReader }
{ Creates the correct version of the number format list. { Creates the correct version of the number format list
It is for ods file formats. } suited for ODS file formats. }
procedure TsSpreadOpenDocReader.CreateNumFormatList; procedure TsSpreadOpenDocReader.CreateNumFormatList;
begin begin
FreeAndNil(FNumFormatList); FreeAndNil(FNumFormatList);