Macintosh-Tools/Retro68
1
0
Fork 0
mirror of https://github.com/autc04/Retro68.git synced 2024-06-08 20:29:38 +00:00
Code Issues Projects Releases Wiki Activity

LaunchAPPLServer: adjust about box height based on text

Browse Source
This commit is contained in:
Wolfgang Thaller 2018-05-20 11:53:48 +02:00
parent 3928a55b91
commit 58d8be11e1
2 changed files with 30 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
LaunchAPPL/Server/AboutBox.cc
View File

@ -25,15 +25,36 @@ AboutBox::AboutBox()
#if TARGET_API_MAC_CARBON
Rect screenBounds = (*GetMainDevice())->gdRect;
Rect portBounds;
GetWindowPortBounds(window,&portBounds);
Rect portRect;
GetWindowPortBounds(window,&portRect);
#else
const Rect& screenBounds = qd.screenBits.bounds;
const Rect& portBounds = window->portRect;
const Rect& portRect = window->portRect;
#endif
Rect viewRect = portRect;
viewRect.left += 10;
viewRect.top += 52;
viewRect.bottom -= 10;
viewRect.right -= 10;
SetPortWindowPort(window);
textEdit = TENew(&viewRect, &viewRect);
Handle h = GetResource('TEXT', 128);
HLock(h);
TESetText(*h, GetHandleSize(h), textEdit);
HUnlock(h);
{
viewRect.bottom = viewRect.top + (*textEdit)->lineHeight * (*textEdit)->nLines;
(*textEdit)->viewRect.bottom = (*textEdit)->destRect.bottom = viewRect.bottom;
SizeWindow(window, portRect.right, viewRect.bottom + 10, false);
}
MacMoveWindow(window,
screenBounds.right/2 - portBounds.right/2,
screenBounds.bottom/2 - portBounds.bottom/2,
screenBounds.right/2 - portRect.right/2,
screenBounds.bottom/2 - portRect.bottom/2,
false);
ShowWindow(window);
@ -41,6 +62,7 @@ AboutBox::AboutBox()
AboutBox::~AboutBox()
{
TEDispose(textEdit);
DisposeWindow(window);
if(aboutBox == this)
aboutBox = nullptr;
@ -63,16 +85,7 @@ void AboutBox::Update()
else
PlotIcon(&r, GetResource('ICN#', 128));
r = portRect;
r.left += 10;
r.top += 52;
r.bottom -= 10;
r.right -= 10;
Handle h = GetResource('TEXT', 128);
HLock(h);
TETextBox(*h, GetHandleSize(h), &r, teJustLeft);
HUnlock(h);
TEUpdate(&portRect, textEdit);
EndUpdate(window);
}

2
LaunchAPPL/Server/AboutBox.h
View File

@ -2,10 +2,12 @@
#include "Window.h"
#include <Windows.h>
#include <TextEdit.h>
class AboutBox : public Window
{
WindowRef window;
TEHandle textEdit;
static AboutBox* aboutBox;