Adds the sysenvapis include files to the lpk and adds an extra safety in OpenURL for users which forget to encode spaces in filenames

git-svn-id: trunk@36745 -
This commit is contained in:
sekelsenmat 2012-04-13 12:47:38 +00:00
parent 5f2d225948
commit e87cc8fbbf
2 changed files with 23 additions and 1 deletions

View File

@ -13,6 +13,12 @@ begin
Result := False;
if AURL = '' then Exit;
// A help for users which forget to properly encode their URLs
// See bug 21659 and see http://www.ietf.org/rfc/rfc1738.txt which says
// that spaces in URLs need to be encoded
if Pos(' ', AURL) > 0 then
AURL := StringReplace(AURL, ' ', '%20', [rfReplaceAll, rfIgnoreCase]);
{$IFDEF WinCE}
FillChar(Info, SizeOf(Info), 0);
Info.cbSize := SizeOf(Info);

View File

@ -30,7 +30,7 @@
<License Value="modified LGPL-2
"/>
<Version Major="1" Release="1"/>
<Files Count="288">
<Files Count="292">
<Item1>
<Filename Value="barchart.pp"/>
<UnitName Value="BarChart"/>
@ -1188,6 +1188,22 @@
<Filename Value="customdrawn_android.pas"/>
<UnitName Value="customdrawn_android"/>
</Item288>
<Item289>
<Filename Value="include/sysenvapis_win.inc"/>
<Type Value="Include"/>
</Item289>
<Item290>
<Filename Value="include/sysenvapis.inc"/>
<Type Value="Include"/>
</Item290>
<Item291>
<Filename Value="include/sysenvapis_mac.inc"/>
<Type Value="Include"/>
</Item291>
<Item292>
<Filename Value="include/sysenvapis_unix.inc"/>
<Type Value="Include"/>
</Item292>
</Files>
<LazDoc Paths="../docs/xml/lcl"/>
<i18n>