QB64/InForm
QB64/InForm
1
1
Fork 0
mirror of https://github.com/FellippeHeitor/InForm.git synced 2025-01-14 19:49:33 +00:00
Code Issues Releases Wiki Activity

Prevents calling PlayGif when no Gif was properly loaded.

Browse source
This commit is contained in:
FellippeHeitor 2019-05-01 20:30:12 -03:00
parent e0115a84d0
commit cf9029d077
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
InForm/UiEditor.bas
View file

@ -4069,6 +4069,7 @@ SUB SaveForm (ExitToQB64 AS _BYTE, SaveOnlyFrm AS _BYTE)
a$ = a$ + " 0)"
END IF
PRINT #TextFileNum, a$
PRINT #TextFileNum, " __UI_RegisterResult = 0"
IF PreviewControls(i).Type = __UI_Type_ContextMenu THEN
PRINT #TextFileNum,
@ -4130,7 +4131,7 @@ SUB SaveForm (ExitToQB64 AS _BYTE, SaveOnlyFrm AS _BYTE)
PRINT #TextFileNum, a$
IF AddGifExtension AND PreviewAutoPlayGif(i) THEN
a$ = " PlayGif __UI_NewID"
a$ = " IF __UI_RegisterResult THEN PlayGif __UI_NewID"
PRINT #TextFileNum, a$
END IF
CASE ELSE