equal
deleted
inserted
replaced
1090 |
1090 |
1091 function LoadImage(const filename: shortstring; imageFlags: LongInt): PSDL_Surface; |
1091 function LoadImage(const filename: shortstring; imageFlags: LongInt): PSDL_Surface; |
1092 var tmpsurf: PSDL_Surface; |
1092 var tmpsurf: PSDL_Surface; |
1093 s: shortstring; |
1093 s: shortstring; |
1094 begin |
1094 begin |
1095 WriteToConsole(msgLoading + filename + '.png [flags:'); |
1095 WriteToConsole(msgLoading + filename + '.png [flags: ' + inttostr(imageFlags) + ']'); |
1096 if imageFlags = ifNone then |
|
1097 WriteToConsole(' None') |
|
1098 else |
|
1099 begin |
|
1100 if (imageFlags and ifAlpha) <> 0 then WriteToConsole(' Alpha'); |
|
1101 if (imageFlags and ifCritical) <> 0 then WriteToConsole(' Critical'); |
|
1102 if (imageFlags and ifTransparent) <> 0 then WriteToConsole(' Transparent'); |
|
1103 if (imageFlags and ifIgnoreCaps) <> 0 then WriteToConsole(' IgnoreCaps'); |
|
1104 end; |
|
1105 WriteToConsole('] '); |
|
1106 |
1096 |
1107 s:= filename + '.png'; |
1097 s:= filename + '.png'; |
1108 tmpsurf:= IMG_Load(Str2PChar(s)); |
1098 tmpsurf:= IMG_Load(Str2PChar(s)); |
1109 |
1099 |
1110 if tmpsurf = nil then |
1100 if tmpsurf = nil then |