paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 07:29:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed lazarus xml files for fpc 1.1

Browse Source 
git-svn-id: trunk@3713 -
This commit is contained in:
mattias 2002-12-18 17:52:18 +00:00
parent 291b1cea12
commit 0e8ca743dc
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/include/pixmap.inc
View File

@ -224,7 +224,8 @@ begin
XPM:=ReadXPMFromStream(Stream,Size);
try
if not ReadXPMSize(XPM,NewWidth,NewHeight,NewColorCount) then
raise Exception.Create('TPixmap.ReadStream: ERROR: reading xpm');
RaiseGDBException('AAA1');
//raise Exception.Create('TPixmap.ReadStream: ERROR: reading xpm');
// free old pixmap
// Create the pixmap
@ -249,6 +250,9 @@ end;
{ =============================================================================
$Log$
Revision 1.16 2002/12/18 17:52:18 mattias
fixed lazarus xml files for fpc 1.1
Revision 1.15 2002/09/16 16:18:50 lazarus
MG: fixed mem leak in TPixmap