QB64/InForm
QB64/InForm
1
1
Fork 0
mirror of https://github.com/FellippeHeitor/InForm.git synced 2025-01-15 11:59:34 +00:00
Code Issues Releases Wiki Activity

Show "Starting..." for projects with too many controls.

Browse source
This commit is contained in:
FellippeHeitor 2017-06-05 02:55:37 -03:00
parent fbebf10922
commit 7f065fb239
3 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
InForm/InForm.ui
View file

@ -353,7 +353,9 @@ SUB __UI_Init
IF __UI_FormID = 0 THEN SYSTEM
SCREEN _NEWIMAGE(Control(__UI_FormID).Width, Control(__UI_FormID).Height, 32)
_DELAY .1
COLOR Control(__UI_FormID).ForeColor,Control(__UI_FormID).BackColor
CLS
_PRINTSTRING (_WIDTH / 2 - _PRINTWIDTH("Starting...") / 2, _HEIGHT / 2 - _FONTHEIGHT / 2), "Starting..."
_SCREENSHOW
_DELAY .1

BIN
InForm/UiEditorPreview.exe
View file

Binary file not shown.

BIN
UiEditor.exe
View file

Binary file not shown.