#69 fpspreadsheet bugfix

[Ruben Chaer]

in the unit xlsxooxml thereis a bug in the function MakeXLPath (line 600)
If the original AFileName begins with '/' an 'ax/' where added to the begining.
I fix the bug deleting the initial '/'

{ The rels files store relative file paths (e.g. ../media/image1.png).
This function makes sure that the file path begins with 'xl'. This filename
can be used by the unzipper to extract the file from the xlsx (zip) archive. }
function MakeXLPath(AFileName: String): String;
begin
Result := AFileName;
if Length(AFileName) <= 3 then
exit;
// bugfix rch@20261003 =============================
if Result[1] = '/' then
delete( Result, 1, 1 );
//=================================================
if (Result[1] = '.') and (Result[2] = '.') then
begin
Result[1] := 'x';
Result[2] := 'l';
end else
if not ((Result[1] ='x') and (Result[2] = 'l') and (Result[3] = '/')) then
Result := 'xl/' + AFileName;
end;

[Ruben Chaer]

sorry my bugfix is wrong
but the problem exists.