paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-09-18 08:29:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix toast when parent ID is specified

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-07-18 16:03:07 +02:00
parent 85da3bc708
commit e2778fb8fb
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
packages/bulma/bulmawidgets.pas
View File

@ -562,8 +562,6 @@ end;
procedure TToastManager.SetParentID(const Value: String);
begin
FParentID := Value;
if ParentID<>'' then
TBulmaToast.SetDoc(document.getElementById(ParentID));
end;
@ -749,6 +747,8 @@ Var
S : String;
Opts : TJSObject;
aDelay : NativeInt;
parEl : TJSElement;
Begin
S:=ContextualNames[Contextual];
if S<>'' then
@ -760,8 +760,13 @@ Begin
aDelay:=FHideDelay;
if Not AutoHide then // we let it display for 1 day
aDelay:=24*3600*1000;
if (ParentID<>'') then
parEl:=document.getElementById(ParentID)
else
parEl:=document.body;
Opts:=New([
'message', aElement,
'appendTo', parEl,
'message', aElement,
'type', S,
'single', single,
'animate',FAnimate,