changeset 945 | 4ead9cde4e14 |
parent 916 | 1d0022336fbb |
child 949 | 866729775535 |
--- a/hedgewars/uMisc.pas Thu May 22 17:25:12 2008 +0000 +++ b/hedgewars/uMisc.pas Sat May 24 17:34:06 2008 +0000 @@ -117,6 +117,7 @@ function Str2PChar(const s: shortstring): PChar; function Surface2Tex(surf: PSDL_Surface): PTexture; procedure FreeTexture(tex: PTexture); +function toPowerOf2(i: Longword): Longword; var CursorPoint: TPoint; TargetPoint: TPoint = (X: NoPointX; Y: 0);