pas2js/demo/resources/htmllinkdemo.html
2019-10-28 09:31:55 +00:00

45 lines
9.6 KiB
HTML

<!doctype html>
<html lang="en">
<head>
<meta http-equiv="Content-type" content="text/html; charset=utf-8">
<meta name="viewport" content="width=device-width, initial-scale=1">
<link rel="stylesheet" href="css/stylelink.css">
<!--
copied from HTML generated by compiler
-->
<link rel="preload" as="script" id="resource-left" data-unit="htmllinkdemo" href="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAADwAAAA8CAYAAAA6/NlyAAAABmJLR0QA/wD/AP+gvaeTAAAFb0lEQVRoge2a328UVRTHv2dmdhVZjNhQtmUbowEh8UFJpfyoSxZfCNpiN1ArFAw8SJGESAz8AUQTH0BN9MFQTTRSwU1NaNpCwxMbKS4oRV9MQFBj3JahDWDolgo7d44PVjFt7+zc+YFo9pP0YXvuPed8987M3nPmAmXKlClT5t6FwnQ+/FwqbuvWszZjqQZaxMBjAFeAEAMAMAoAXSXgJxt8XiOc1oRxovJY1gwrp8AF59N1FYYVbWUbm0F42psX+oYYB63orUOJI19fDTK/wATn16QSmm7tJuAVAA8E5HaMiD4ssrW/pjc3GIRD34K5tjZypWrGDgbeBCYu1eC5CWBfQcx6a0Ff3y0/jnwJHlxbv5BsyhDwpB8/biHgO8tGS+JY/w9efWheJw41JtdpNp29W2IBgIGndA1nhxqeSXv14Unw5cbkFmL+HOFdwk7MIqBzqKF+u5fJyoKHGuvbwPwxAMNLwIDQCfSB+Xxyp+pEpXt4qDG5jpgzAHTVQCEhmGh9dc/JLrcTXAseXrt8vrD1AQAPekotPApMYkl1T+68m8GuLunvm5+IWrb+Be49sQAQI9YOcW1txM1gV4Irfp/9+t18GqtDi83q+19zNbLUgF8bls8zoF8AMNN3XuFSMIr0+JzjJy87DSq5wjr0Pbj3xQJAzIrw7lKDHAXn03UVE3tj3xDQJYRRI4RRA6AvCJ/T0JZP11U4DXAUbNy+byMCKQQoM7dgNCf6svlEXzYvhLHNv89pmakXIxucBjgKZvDL/nOgTLygb6Js1vr7P1E7xDqcNjtZpYJHVierQKj1GXyKWE6lDF3Y7/nz68gSM72iUmaUChZRXgU/1RShc4rY5mb9Skx8wkCTZ79uIhdplcwoFWwzlvqImYmPGhsnr6w5bn7G4Fbvft2G15bJTFLBGmiRt2DylQW4xZNPRZh5ocwmrXgYPF89FGXio1PvWXPc7LhbYifyWCCzOJV4DymFALrmTlpZAJj4/NLEnzL5NamErlvtANYoTJstMzj9LCkV95Ywdk4WGwSJvmze1rU2tVkszd1zi+e/ipPggoojQ7fe51Qq8C7I4AsrazTbblecNiozyBMkXAfjYbcRGGgyY6KDU6mpD62Y8P7QEraHSfSbzCJdYWL6UT0Qt5gx6/A/V5qyWSs+I95KxB3q/rzCF2UW+cYD7KplMg3rJ1b6jujOTjF3NLIVoIxHn0oQ0QWZTb7xIJz2HvLfXWmGnZPZ5IKFcQIA+4grXWkCXHcZPcBkcFZmlAr+85UlnfUZu2WK6GzWsoSh3E9W4Ez8yFfDMqPj7zAxDvqPP43oUOthON4yjoHz6boKvRj9BQH0tAjosoSxk6I2acI+ALWtolvGROT2I07vlEt+02Zj8l1m3hVsXiFBeLuqp9+xkVdya1lkaz+AscCSCo9RXRj7Sw0qKbimNzcIxhvB5BQijL1uzoa4Kh7i5vg7AH/rP6vQOBc3x131yVwJpoGBoq7ZLwK44SutcCjYGm+kgYGim8Guy8PK7twlBrYAEF4zCwFBzK3zuk9Jt5KTUaqHq3v7jzBjh3peocBEtD1+9FS3yiTlBkD10f52EG0FEHh3QwHBxK/Ge05+pDrR845nqDHZRMyfApjl1YdHbhDzZtWV/QtfW7zhhpULBEQGoMV+/ChwTtdES2V37pJXB756WpW9X16MFyJ1BOyCQ1slAG4C2HttxvXlfsQCAR49HFmdrBKGvYeJtiG498ljAA7otrEvqAOnoRwu1YuRDSDaBEadhxgM4AyADqsoDtccz10LMr9Qjw+b6RWVKNIqkLaMwYvAeBTAHNzpeRcAjIDwM4HOg+3TiPAJp3q2TJkyZcr8n/kDIZn7et3yi2cAAAAASUVORK5CYII=" />
<link rel="preload" as="script" id="resource-right" data-unit="htmllinkdemo" href="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAADwAAAA8CAYAAAA6/NlyAAAABmJLR0QA/wD/AP+gvaeTAAAFcklEQVRoge2aXWwUVRTH/2dmt6TQitrYWAoxGhDelMiHvrXGhH6EBAOlbLutNLa7LQlqDLwv0cQHiA/4ULqtwcLSsl0TiaRdSJps34BY0UcQ1CgsRQwisNDQnTvHh1LBkjs7H3dIY/b3uOfcc84/Z2bvx1ygSJEiRYosXMjP4IebRl8UOt5mDRsZtIZMvAJCBYCyhy45MG6yhl8IfAGsnQ0YZqYj1Xjdr5qUCx5sH6+Ymcm3grgNwDpXQRjfMeHoomDJ0HtH3rmpsj5lgvtbx5aTiT1M6AJjsaKw9wD0G4Y40JPanFUR0LPgvshkkHJ/7CKmT/HoUVUL4T7A+6dv0WcfpBseeAvlgS/D6dVCmEkCveYljgN+ZJObI8nGn9wG0NwOjIdGt5qCJ5+iWAB4nTSajO9Iv+s2gCvB8Zb0TgIdh1+PsDXlRJyK7xjtdjPYseCBUDpKzIcBBNwkVIRORL3x0NhupwMdvcPx0OhWAiUB6E4T+YQgYFvncMMJuwNsCx4In1ppCvN7Ap5xV5tv5Ezo66PDmy7Ycbb1SI80jZSYQny9AMUCQJkGMdQXmQzacbYl+Hag/OOn/G/slLX6nRsf2nEs+Ej3Np2sDgT0iwCWeC7LX3Kmrr0aTdRNWTkV7HAwoO/FwhcLAGW64D2FnCwFD7aPVzChS11NjyBCGhpWQMMKBmz/y1rB4Ohg+3iFlY+l4Af5mRaFG4H/wIRI17GGq13HGq5emyptAiGpIOySvDETsnKwFExAu4IiChKbqDWy10rDKkQzc5uVXSq4L3yqCsAbXguQwSa+iNVk/l2tqRNN63vbTlfKrFLBuiFq4eOJCAFbqqumh+eLXprPtQKc8BI6kBe1MqNUMGvY6CGpXbZVL5tOPC56e2q7yE4t7vDUacKbMpNcMGiN64ROYDSr7jQRVstsUsHEWOkmmUuUdppNrJLZrLZ4zzpKAh4VhhlVdfYEzHY6VpMJL6uaXkTAFtsDCc/JTFbTkqPNPWnUrVLsHLGJWoM0ON33Smt3fcTzNNGFrmy2sBKccxKIGPH+1rHlHut5glhNJmCQOOhw2F2ZweodvgXgebsZmFEPxpX+0JiTwh5BSGavlYZjE7XG3E+xmkygetl0Auzg/QUAxt8yk3xaIvzsKIk3UvPFjjSN6NVV01+B0ew0GGm4JLPJpyWwrSMTzxCS2anSlvmdvR0sOwag1U1IZlyU2eTvMGtn3SRziNLOzsHgMzKbVHDAMDMA2G3SQjBwQnVn50KLQGBCZpQK7kg1Xgdj0kNiS0jDbskflOvOAgAY53qObrohM1vOw0w46im5TZSJBVBo/W05oQ+2j1fM5Gd+gw9nWkRIMyGiC50MEgcdLR3l3CsJlrxk9U3ZssMPB/YrKOQJmFEPE1cEid8ViQWAQ4U+oBdcWhqGOIDZD9MLnbsBgw8UcioouCe1OcuET9TU5Cv77NwNsbV54LLKzwH84LkkvyCcN8srba23bQmOxtflSde2M3DHW2W+kNM0aonG1+XtONveHnYm6i6DaScA4bYyHxDM1Pp+ol66lJyPo/1w5Hj9NyDa5bwuX2ACd0eO13/rZJDjA4Cuofo4E3UAMAo6+4cgUE/ncOOA04GuTxIGQmNbGDgCoNxtDDcwcAdMbU47O4eno5NDLSdX6awnAaz1Esc2hPOkac2dibrLbkN4OtPqHtp8KTtVuoGJP4LFsYpnCPdBvG9pPveWF7GzoRTRFz5VRabYS0wRqFt73yNQn26Y+1VdOPXlcmnemAmBEWZgg4scDMY5gBMk9OHOVN1fKuvz9fpwb9vpykBe1M5+66E1AL8M4AU8fn0Y+BOgXwG+AMZZI6hnrPazRYoUKVLk/8w/yKIEWACzZN8AAAAASUVORK5CYII=" />
<link rel="preload" as="script" id="resource-up" data-unit="htmllinkdemo" href="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAADwAAAA8CAYAAAA6/NlyAAAABmJLR0QA/wD/AP+gvaeTAAAFTklEQVRoge2a208UVxzHv7/ZGUgFxEt6MZY0Nl5IVBaz3Non6FvfaArFijb6UGptqED0HZsmfYC6XGJatUmbSrWUJiX9A4p96iKLFZQEKtWkalrbCMqtgZ2ZXx+gcUM5szNnzqA2+3nc3zm/8/3md3ZmzgVIkyZNmjSPLxRk8p2Xjj+naeYrBJQykK8BLzKwEUD2UpMZAu7ZwA0CRsEcs9joGylp+SMoTcoN5/e/tzEjlFkL5gMgFMnkYKIBje1z81bi/GjpqXsq9SkzXBCrfx66fgzA2wDWKEo7C+azZFDrUGH0joqEvg1H4nVGAllHAHyIh1NVNXNgaplbl/hofFvnvJ9EvgwXDBzdQaR1MxD2k8cDV8iimqHSk7/IJtBkOxYMNL0O0uKraBYACjnE8fBg42uyCaQM7x5sOgjirxHcFHYihxk94XjjYZnOng2HB5reIebPAegyAyoixMAn4XhDvdeOnv7Di9OYuwGEvA4UEBaDq64WtfW67eDa8M7Bxq0aY5CAtXLaAmOGoRVfLfp41E1jV1N650hzhs74VoVZAvXCNPNgmnkEcl0ZB7IJ9vlIvM5w09iVYf3vB00qnsYE9KyfXls9XNZ5e7is8/b2G7eqmNHlNy+APQmsOepSgzPhK42b2cQYgCxfkpi7N8ys23+xotlM/rm8r1mfyL7fBaIaX/mBGQO8fbCo7XenRikrzCaOw6dZAnpWMgsAFyuazR0379QqqHT2AnDMhRYxiwuBjN/g59tYUNnlKKr07IK18ILTgsOxwhmhzFr4MOtU2eUoqnSWoRt7nRo4T2nmA9JDM3evn87dl2y2vK/5Px8ryb/1vNFjbZzJPQTmbtlhiektp7jQcCTesAmEiNSgK1S2+pvq0GTO1BfL207kPLiQbFpBpYt3xY4+KwoKDScY5ZBYTRGod6XKjm3Z/BWDa1foUjWRfb9rpUpLvqcpZITKRUHxlCYqkxgMbCbql5tN+TAiqllu+mJFs8lmwvO3MgCwbQu1Cw0zkC8zWDKenrwrmLY1Q3K9TkLtwhUPAVulxjL0MwWx+jpbM2hSm+oAqNJ1X6KayZypzIJYfb2tGaSF+DTYuwQisXanJd4670MBYLwKXb+lgWW0gsGV0PVKDQypBADYQbvTa+lRLO5VkSMKSG/xPKk4GZ5ZNRXqmRYFHAzzZBBKVgMC7otiDq8l+jUYOcHDhOuimNAwAa62TB5LbB4ThcRTmjkWiJhVgDT6SRQTGrYt/gHSb8JHClsJ+0dRUGj4Wln7XSaKB6MpUPqvlbXfFQUd38Ma2+fU6wkcR82OhuetxHkAs0rlBMvsgrXguHngaHi09NQ9MJ9VqylQPk11gJ7y05IMasWTUeVpy9ZbUzVKaXioMHqHmT9Qo2nppsASuy415anKS8AJN3dDXJ0AZtBcNIGsvQD2+FaWtF7WiM/4zrfIZR2zHW4a/i8O08B20XBxu/DrKhnXy8ORSHRcIxwEYMkqCwALTLVuzQIe18NDkeh3TDjiXVcgMMCHh4tPfu+lk+cNgKuR6BkmOgQg5WlCgFjE9O5wUdtnXjtK3+LZHW+oJNCXcNhOCQIGpojpgNfK/ouva0uFP7+/zbZC3VDx9HbHZYtQMxKJjssm8LWndWVPx/UN07klABrgsK2igDkwnbCeyn3Jj1lA4dXDSLxhk0l0nBl18Ht4/pBZBp+2baNF1YXTQC6XGlrGm0TYD6BEYgwG0M/EXfY8XRh5OTqhUl+g14cLho49Q6ZdsXjWQ/kgbAHwNJKuDwP4C4ybAI+SpsVY1/qGw61/BqkrTZo0adI8rvwDpmICIqoZ+uMAAAAASUVORK5CYII=" />
<link rel="preload" as="script" id="resource-down" data-unit="htmllinkdemo" href="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAADwAAAA8CAYAAAA6/NlyAAAABmJLR0QA/wD/AP+gvaeTAAAFhUlEQVRoge2aTWwUZRjH/89Md0tlFUkDWCkkGLYQlS9322K8LGKgYDUY2BRsWerB1pCYGAMnr0YPcJKTIhGXbWtTE5EgSzFKPZWF3YbWS4GNUNJSPkIldtuFtjOPh25BS2d25p2ZpST7u7XP5z/PZub9GCBPnjx58sxeyMnk5VvrX1ChvimBK5lpJYCXCChmwJMpnmLgLoC/iLiXVekcSXT2wqmjN53qyXbBFRtDxYqLaol4NwC/WBa+wKBj8hiaz/8Wvmtnf7YJrtxSWzoBeR8BHwJ4xqa0IwAddsl8sPNkeMCOhJYF+3wNLmnR/b3M+ByZn6oDjIJw4B7P+zIZPfTASiJLgv1VdStYklqJscZKHhNclAg150+FL4smkEQD/Vv3bAdJ8RyKBYC1KiNeURV6TzSBLBJUXrW7HkAYwBzRwhYoZMKOkrLVtwev9MTNBpsW7K8KNYLoW1j4ddiARKDqEu+aocFk93kzgaYE+7fu2Q7gOzxZsQ8hYFOJd1XPYLKn10SMMV7bXLdckqQEgOeEunOOFCtSeeLMUUOiDU3qlWDQTbL0I+wQS/jFJaNUhrIEQNRyPsBDstrs8zW4jDgbEjxnuOhTu57GMisfdZ4MD8SiTf2kyI125ASwjhbc/8SIY9af9OvVocXjCi4BmGu5LQDxaPh/Nf1bQmxHXgApVtWyRHtkUM8p64THFOyHTWIdxkMk7cvmpCu4YmOoOLM2fjogNFZsDBXruegKVlxUC/s2ArlgrlrIO/UcdAVntnhPGRTSs2oK9m2uKwHgs70fp2GUV767a5GWWXvCsrQBDp+IOASp466AllFTsASudKSdHMCg9Vo2TcGZM6inFF6hZdF5aPFyJ1rJEV4tg45get6JTnKEZu96ryWnzqdywbNahlmxr80leoJTOevCfoa1DHqC/xYsFpWhLJnc79Jx8+F0/FG88H75npZBUzABSZFKMpSGWLSpPxZt6vek+4IAWk2Et3rSfcGpeBlKg0gPAK5oGbQnTHxJsNhDOjo6Jjzp63UwJrrVk75e19HRMTH1D1VxC670SLN37YWHKp0TKaWg4FAgECiY+tug6MfEBgKBApbVr0R6IEKnlk1TsOwe+x2AwGkEb0sVLW2ZLnqZJ10LQuTx5qhtuthgMCgPFy05CvA28/XBUsHYH1pGTcGxEy23ADZ90J1hR6poaeS/otva2hTP6PUPpjvOHe17f/pkr6aKmghUK1KYgNhk7zOj+x5m0DGRohlqZpr0dKeZJ4sa4aoM3Z51BctjaAYwIlx8hklrYXWyGUZoXP8BqXvzMHC1O/2id+0CAJrbLQO8Ouaa93JZ6fyfrl27ps7kEAwG5Vtc/D2BdlmoAwIdunAm/LOeT9alpUvmg7A2ZUBn0jZNFgCGQXQwm1PWu6X+y93DJd41CgFvWWzosUnbNVkAYPBn8Wj412x+hl7sPl+DixbejwFYZ7WxyaXjxMeq4qbJ96zQq2d6zi6+Xbg+kfhmPKun0ZSz+TINrPrjpyOGVoaGt4dd7ZGkxKgHoIh25gAKmGqNigVM3g8PJLt7F3vX3gTwjunW7IeZ0JiIhlvMBJn+AuBGsjuxePnqPhBV48kdIChg7E1Ew4fNBgp943Ej2XOxxLvqTwK9DaBQJIcF/gHTzvjpcLNIsKWD9srqeq+iqK2w5eltBOpSVaWmqz0itFcHBCc8xcDli0NlpfOPjLvnDQF4A85NexSEL9KedH3PiR/uWElk21WKb3NdCcm0H0wNsO8+eQSMr0mSDtj1wakjH5eqbuwCUAegQqAGExBj4ohLcbd0th8ZsrM/Ry/LVm/avbBQpg0MWg9WV4JoGYAFeHTmnQJwB8xXQVIvgc89UPhsz5ljt53sK0+ePHnyzFb+BYW/6T+M0TFbAAAAAElFTkSuQmCC" />
<!--
end of copy
-->
<title>HTML link</title>
<script src="htmllinkdemo.js"></script>
</head>
<body>
<h1>HTML Preload link resources</h1>
<p>
This demo demonstrates how to load images from resources. Click the below image to round-robin between the available images.
</p>
<center>
<img id="theimage" src="" alt="The image" width=60 height=60>
</center>
<script>
window.addEventListener("load", rtl.run);
</script>
<div>
Created using &nbsp; <a target="_blank" href="https://wiki.freepascal.org/pas2js">pas2js.</a> &nbsp;&nbsp;Sources: &nbsp;
<a target="new" href="htmllinkdemo.lpr">Program</a>.
</div>
<div>
<a target="_blank" href="https://icons8.com/icons/set/circled-up-2">Scroll Up</a> icon by <a target="_blank" href="https://icons8.com">Icons8</a><br>
<a target="_blank" href="https://icons8.com/icons/set/circled-left">Go Back</a> icon by <a target="_blank" href="https://icons8.com">Icons8</a><br>
<a target="_blank" href="https://icons8.com/icons/set/circled-right">Circled Right</a> icon by <a target="_blank" href="https://icons8.com">Icons8</a><br>
<a target="_blank" href="https://icons8.com/icons/set/circled-down-2">Scroll Down</a> icon by <a target="_blank" href="https://icons8.com">Icons8</a><br>
</div>
</body>
</html>