|
@@ -139,6 +139,15 @@ Type
|
|
Procedure DropDownHide;
|
|
Procedure DropDownHide;
|
|
Procedure DropDownUpdate;
|
|
Procedure DropDownUpdate;
|
|
Procedure DropDownDispose;
|
|
Procedure DropDownDispose;
|
|
|
|
+ Procedure Popover(options : TJSObject); external name 'popover';
|
|
|
|
+ Procedure Popover(aCommand : String); external name 'popover';
|
|
|
|
+ Procedure PopoverShow;
|
|
|
|
+ Procedure PopoverHide;
|
|
|
|
+ Procedure PopoverToggle;
|
|
|
|
+ Procedure PopoverDispose;
|
|
|
|
+ Procedure PopoverEnable;
|
|
|
|
+ Procedure PopoverToggleEnabled;
|
|
|
|
+ Procedure PopoverUpdate;
|
|
end;
|
|
end;
|
|
|
|
|
|
implementation
|
|
implementation
|
|
@@ -305,4 +314,59 @@ begin
|
|
dropdown('dispose');
|
|
dropdown('dispose');
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
+Procedure TBootstrap.PopoverShow;
|
|
|
|
+
|
|
|
|
+begin
|
|
|
|
+ Popover('show');
|
|
|
|
+end;
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+Procedure TBootstrap.PopoverHide;
|
|
|
|
+
|
|
|
|
+begin
|
|
|
|
+
|
|
|
|
+ Popover('hide');
|
|
|
|
+end;
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+Procedure TBootstrap.PopoverToggle;
|
|
|
|
+
|
|
|
|
+begin
|
|
|
|
+
|
|
|
|
+ Popover('toggle');
|
|
|
|
+end;
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+Procedure TBootstrap.PopoverDispose;
|
|
|
|
+
|
|
|
|
+begin
|
|
|
|
+
|
|
|
|
+ Popover('dispose');
|
|
|
|
+end;
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+Procedure TBootstrap.PopoverEnable;
|
|
|
|
+
|
|
|
|
+begin
|
|
|
|
+
|
|
|
|
+ Popover('enable');
|
|
|
|
+end;
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+Procedure TBootstrap.PopoverToggleEnabled;
|
|
|
|
+
|
|
|
|
+begin
|
|
|
|
+
|
|
|
|
+ Popover('toggleEnabled');
|
|
|
|
+end;
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+Procedure TBootstrap.PopoverUpdate;
|
|
|
|
+
|
|
|
|
+begin
|
|
|
|
+
|
|
|
|
+ Popover('update');
|
|
|
|
+end;
|
|
|
|
+
|
|
|
|
+
|
|
end.
|
|
end.
|