With your help in the past i had a google api call working, Now i went over to Delphi XE8 and it does not work anymore.
I added
- Code: Select all
procedure TIWFormAdminMotionChart.IWAppFormRender(Sender: TObject);
begin
JavaScriptOnce :=
'</script>' +
'<script type="text/javascript" src="https://www.google.com/jsapi"></script>' +
'<script type="text/javascript">' +
'google.load(''visualization'', ''1'', {''packages'':[''motionchart'', ''piechart'', ''table'', ''annotatedtimeline'', ''linechart'', ''imagesparkline'']});';
end;
When i run i find and HTML error (Invalid End Tag on </Script>)
When we study the html source everything looks ok. (However if i comment my code, no error)
The only HTML between my code in the html and the end tag is your code in which i do not see anything strange,
In Notepad ++ every script has a proper end script tag,
Perhaps you see whats going on here.
Eric
- Code: Select all
</script><script type="text/javascript" src="https://www.google.com/jsapi"></script><script type="text/javascript">google.load('visualization', '1', {'packages':['motionchart', 'piechart', 'table', 'annotatedtimeline', 'linechart', 'imagesparkline']});
function Validate() {
return true;
}
function InitIWCLObjects() {
IW.initIWCL(IWCLForm,"TFRAMETOPMENU1IWFRAMEREGION",false)
if (TFRAMETOPMENU1IWFRAMEREGIONIWCL) {
TFRAMETOPMENU1IWFRAMEREGIONIWCL.SetAlign(alTop);
TFRAMETOPMENU1IWFRAMEREGIONIWCL.SetAnchors(new CreateAnchors(true, true, true, false));
};
if (TFRAMETOPMENU1IWFRAMEREGIONIWCL) {
TFRAMETOPMENU1IWFRAMEREGIONIWCL.BorderWidthPixels = 0;
}
IW.initIWCL(TFRAMETOPMENU1IWFRAMEREGIONIWCL,"TOPBANDTFRAMETOPMENU1",false)
if (TOPBANDTFRAMETOPMENU1IWCL) {
TOPBANDTFRAMETOPMENU1IWCL.SetAlign(alBottom);
TOPBANDTFRAMETOPMENU1IWCL.SetAnchors(new CreateAnchors(true, true, false, true));
};
if (TOPBANDTFRAMETOPMENU1IWCL) {
TOPBANDTFRAMETOPMENU1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(TFRAMETOPMENU1IWFRAMEREGIONIWCL,"TOPSECTIONTFRAMETOPMENU1",false)
if (TOPSECTIONTFRAMETOPMENU1IWCL) {
TOPSECTIONTFRAMETOPMENU1IWCL.SetAlign(alClient);
TOPSECTIONTFRAMETOPMENU1IWCL.SetAnchors(new CreateAnchors(true, true, true, true));
};
if (TOPSECTIONTFRAMETOPMENU1IWCL) {
TOPSECTIONTFRAMETOPMENU1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(TOPSECTIONTFRAMETOPMENU1IWCL,"IMAGETOPLOGOTFRAMETOPMENU1",false);
IW.initIWCL(TOPSECTIONTFRAMETOPMENU1IWCL,"USERSECTIONTFRAMETOPMENU1",false)
if (USERSECTIONTFRAMETOPMENU1IWCL) {
USERSECTIONTFRAMETOPMENU1IWCL.SetAlign(alRight);
USERSECTIONTFRAMETOPMENU1IWCL.SetAnchors(new CreateAnchors(false, true, true, true));
};
if (USERSECTIONTFRAMETOPMENU1IWCL) {
USERSECTIONTFRAMETOPMENU1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(USERSECTIONTFRAMETOPMENU1IWCL,"SIGNOUTTFRAMETOPMENU1",false)
if (SIGNOUTTFRAMETOPMENU1IWCL) {
SIGNOUTTFRAMETOPMENU1IWCL.SetAlign(alNone);
SIGNOUTTFRAMETOPMENU1IWCL.SetAnchors(new CreateAnchors(false, true, true, false));
};
if (SIGNOUTTFRAMETOPMENU1IWCL) {
SIGNOUTTFRAMETOPMENU1IWCL.HookEvent("click",SIGNOUTTFRAMETOPMENU1_onclick);
}
IW.initIWCL(USERSECTIONTFRAMETOPMENU1IWCL,"SETTINGSTFRAMETOPMENU1",false)
if (SETTINGSTFRAMETOPMENU1IWCL) {
SETTINGSTFRAMETOPMENU1IWCL.SetAlign(alNone);
SETTINGSTFRAMETOPMENU1IWCL.SetAnchors(new CreateAnchors(false, true, true, false));
};
if (SETTINGSTFRAMETOPMENU1IWCL) {
SETTINGSTFRAMETOPMENU1IWCL.HookEvent("click",SETTINGSTFRAMETOPMENU1_onclick);
}
IW.initIWCL(USERSECTIONTFRAMETOPMENU1IWCL,"LABELSETTINGSTFRAMETOPMENU1",false)
if (LABELSETTINGSTFRAMETOPMENU1IWCL) {
LABELSETTINGSTFRAMETOPMENU1IWCL.SetAlign(alNone);
LABELSETTINGSTFRAMETOPMENU1IWCL.SetAnchors(new CreateAnchors(false, true, true, false));
};
if (LABELSETTINGSTFRAMETOPMENU1IWCL) {
LABELSETTINGSTFRAMETOPMENU1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(USERSECTIONTFRAMETOPMENU1IWCL,"LABELUSERNAMETFRAMETOPMENU1",false);
if (LABELUSERNAMETFRAMETOPMENU1IWCL) {
LABELUSERNAMETFRAMETOPMENU1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(USERSECTIONTFRAMETOPMENU1IWCL,"SEPUSERSECTIONTFRAMETOPMENU1",false)
if (SEPUSERSECTIONTFRAMETOPMENU1IWCL) {
SEPUSERSECTIONTFRAMETOPMENU1IWCL.SetAlign(alNone);
SEPUSERSECTIONTFRAMETOPMENU1IWCL.SetAnchors(new CreateAnchors(false, true, true, false));
};
if (SEPUSERSECTIONTFRAMETOPMENU1IWCL) {
SEPUSERSECTIONTFRAMETOPMENU1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(IWCLForm,"TFRAMEFOOTER1IWFRAMEREGION",false)
if (TFRAMEFOOTER1IWFRAMEREGIONIWCL) {
TFRAMEFOOTER1IWFRAMEREGIONIWCL.SetAlign(alBottom);
TFRAMEFOOTER1IWFRAMEREGIONIWCL.SetAnchors(new CreateAnchors(true, true, false, true));
};
if (TFRAMEFOOTER1IWFRAMEREGIONIWCL) {
TFRAMEFOOTER1IWFRAMEREGIONIWCL.BorderWidthPixels = 0;
}
IW.initIWCL(TFRAMEFOOTER1IWFRAMEREGIONIWCL,"REGIONFOOTERTFRAMEFOOTER1",false)
if (REGIONFOOTERTFRAMEFOOTER1IWCL) {
REGIONFOOTERTFRAMEFOOTER1IWCL.SetAlign(alNone);
REGIONFOOTERTFRAMEFOOTER1IWCL.SetAnchors(new CreateAnchors(false, false, false, false));
};
if (REGIONFOOTERTFRAMEFOOTER1IWCL) {
REGIONFOOTERTFRAMEFOOTER1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(REGIONFOOTERTFRAMEFOOTER1IWCL,"LNKFEEDBACKTFRAMEFOOTER1",false);
if (LNKFEEDBACKTFRAMEFOOTER1IWCL) {
LNKFEEDBACKTFRAMEFOOTER1IWCL.HookEvent("click",LNKFEEDBACKTFRAMEFOOTER1_onclick);
}
IW.initIWCL(REGIONFOOTERTFRAMEFOOTER1IWCL,"IWLINKPRIVACYPOLICYTFRAMEFOOTER1",false);
if (IWLINKPRIVACYPOLICYTFRAMEFOOTER1IWCL) {
IWLINKPRIVACYPOLICYTFRAMEFOOTER1IWCL.HookEvent("click",IWLINKPRIVACYPOLICYTFRAMEFOOTER1_onclick);
}
IW.initIWCL(REGIONFOOTERTFRAMEFOOTER1IWCL,"SEPUSERSECTIONTFRAMEFOOTER1",false)
if (SEPUSERSECTIONTFRAMEFOOTER1IWCL) {
SEPUSERSECTIONTFRAMEFOOTER1IWCL.SetAlign(alNone);
SEPUSERSECTIONTFRAMEFOOTER1IWCL.SetAnchors(new CreateAnchors(false, true, true, false));
};
if (SEPUSERSECTIONTFRAMEFOOTER1IWCL) {
SEPUSERSECTIONTFRAMEFOOTER1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(REGIONFOOTERTFRAMEFOOTER1IWCL,"SEPUSERSECTION3TFRAMEFOOTER1",false)
if (SEPUSERSECTION3TFRAMEFOOTER1IWCL) {
SEPUSERSECTION3TFRAMEFOOTER1IWCL.SetAlign(alNone);
SEPUSERSECTION3TFRAMEFOOTER1IWCL.SetAnchors(new CreateAnchors(false, true, true, false));
};
if (SEPUSERSECTION3TFRAMEFOOTER1IWCL) {
SEPUSERSECTION3TFRAMEFOOTER1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(REGIONFOOTERTFRAMEFOOTER1IWCL,"LBLCOPYRIGHTTFRAMEFOOTER1",false);
if (LBLCOPYRIGHTTFRAMEFOOTER1IWCL) {
LBLCOPYRIGHTTFRAMEFOOTER1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(TFRAMEFOOTER1IWFRAMEREGIONIWCL,"REGIONCACHETFRAMEFOOTER1",false)
if (REGIONCACHETFRAMEFOOTER1IWCL) {
REGIONCACHETFRAMEFOOTER1IWCL.SetAlign(alNone);
REGIONCACHETFRAMEFOOTER1IWCL.SetAnchors(new CreateAnchors(false, true, false, false));
};
if (REGIONCACHETFRAMEFOOTER1IWCL) {
REGIONCACHETFRAMEFOOTER1IWCL.BorderWidthPixels = 0;
}
IW.initIWCL(IWCLForm,"RGNMENUCG",false);
if (RGNMENUCGIWCL) {
RGNMENUCGIWCL.BorderWidthPixels = 1;
}
IW.initIWCL(RGNMENUCGIWCL,"MENUCG",false);
if (MENUCGIWCL) {
MENUCGIWCL.BorderWidthPixels = 0;
}
IW.initIWCL(RGNMENUCGIWCL,"DDUSERS",false);
if (DDUSERSIWCL) {
DDUSERSIWCL.BorderWidthPixels = 0;
}
IW.initIWCL(IWCLForm,"REGIONMOTION",false)
if (REGIONMOTIONIWCL) {
REGIONMOTIONIWCL.SetAlign(alNone);
REGIONMOTIONIWCL.SetAnchors(new CreateAnchors(true, true, true, true));
};
if (REGIONMOTIONIWCL) {
REGIONMOTIONIWCL.BorderWidthPixels = 0;
}
}
function Initialize() {
GActivateLock = true;
InitRects(1254, 727);
InitIWCLObjects();
AttachBeforeUnload();
history.go(1);
Body_OnResize();
window.onresize = Body_OnResize;
document.body.onblur = Body_OnBlur;
IW.Utils.fixIEMargins();
window.scrollTo(0,0)
ReleaseLock();
$("#LABELSETTINGSTFRAMETOPMENU1").removeClass("cgloading");
$("#LABELUSERNAMETFRAMETOPMENU1").removeClass("cgloading");
$("#SEPUSERSECTIONTFRAMETOPMENU1").removeClass("cgloading");
$("#SEPUSERSECTIONTFRAMEFOOTER1").removeClass("cgloading");
$("#SEPUSERSECTION3TFRAMEFOOTER1").removeClass("cgloading");
$("#LBLCOPYRIGHTTFRAMEFOOTER1").removeClass("cgloading");
}
</script>