home *** CD-ROM | disk | FTP | other *** search
- /* GadTools layout toolkit
- **
- ** Copyright © 1993-1995 by Olaf `Olsen' Barthel
- ** Freely distributable.
- */
-
- #include "gtlayout_global.h"
-
- STATIC VOID __regargs
- LTP_GetSizeDimensions(LayoutHandle *Handle,ULONG *SizeWidth,ULONG *SizeHeight)
- {
- Object *SizeImage;
- UWORD SizeType;
-
- if(Handle -> Screen -> Flags & SCREENHIRES)
- {
- if(SizeWidth)
- *SizeWidth = 18;
-
- if(SizeHeight)
- *SizeHeight = 10;
-
- SizeType = SYSISIZE_MEDRES;
- }
- else
- {
- if(SizeWidth)
- *SizeWidth = 13;
-
- if(SizeHeight)
- *SizeHeight = 11;
-
- SizeType = SYSISIZE_LOWRES;
- }
-
- if(SizeImage = NewObject(NULL,SYSICLASS,
- SYSIA_Size, SizeType,
- SYSIA_Which, SIZEIMAGE,
- SYSIA_DrawInfo, Handle -> DrawInfo,
- TAG_DONE))
- {
- if(SizeWidth)
- GetAttr(IA_Width,SizeImage,SizeWidth);
-
- if(SizeHeight)
- GetAttr(IA_Height,SizeImage,SizeHeight);
-
- DisposeObject(SizeImage);
- }
- }
-
-
- /*****************************************************************************/
-
-
- ULONG __regargs
- LTP_GetSizeWidth(struct LayoutHandle *handle)
- {
- ULONG SizeWidth;
-
- LTP_GetSizeDimensions(handle,&SizeWidth,NULL);
-
- if(SizeWidth < handle -> Screen -> WBorRight)
- return(handle -> Screen -> WBorRight);
- else
- return(SizeWidth);
- }
-
-
- /*****************************************************************************/
-
-
- ULONG __regargs
- LTP_GetSizeHeight(struct LayoutHandle *handle)
- {
- ULONG SizeHeight;
-
- LTP_GetSizeDimensions(handle,NULL,&SizeHeight);
-
- if(SizeHeight < handle -> Screen -> WBorBottom)
- return(handle -> Screen -> WBorBottom);
- else
- return(SizeHeight);
- }
-