Skrývaný text - Historie editací

EnTeamAdmin v 22. 12. 2020, 21:30

2020-12-22T21:30:48Z

EnTeamAdmin v 14. 8. 2020, 09:07

2020-08-14T09:07:22Z

EnTeamAdmin: naimportována 1 revize

2019-07-04T21:14:49Z

naimportována 1 revize

en>Kadel v 29. 8. 2016, 08:32

2016-08-29T08:32:02Z

Nová stránka

Protokol procesu je vlastně HTML prohlížeč (Internet explorer). Pomocí javascriptu je pak možné provádět s textem různé operace, např. zobrazovat, nebo skrývat části textu po najetí myši na jeho náhled. Ukázka níže vkládá do procesu pouze část textu a celý text je pak zobrazen po najetí myši na zmíněnou část textu.

[[Soubor:Aaa.png]]

<pre>
declare procedure AddHtmlText dll "ActualDocument" (string, string, string, pointer)
declare function GetGuid dll "ActualDocument" (): string

script JavascriptText (): Boolean
var bodyHtml,subjectHtml, html, sBR, textID : String

begin
sBR := "<BR/>"
subjectHtml := "<b>" + "Toto je náhled textu " + "</b>"
bodyHtml := "<table cellpadding=""10"">"
bodyHtml += "<tr>"
bodyHtml += "<td>" + "aaaa" + sBR + "bbbb" + sBR + "cccc"
bodyHtml += "</td>"
bodyHtml += "<td>" + "1111" + sBR + "2222" + sBR + "3333"
bodyHtml += "</td>"
bodyHtml += "</tr>"
bodyHtml += "</table>"

textID := GetGuid()
html := "<div onMouseOver=""document.getElementById('info_" + textID + "').style.visibility = 'visible'; return false;"
html += """ onMouseOut=""document.getElementById('info_" + textID + "').style.visibility = 'hidden'; return false;"">" + subjectHtml + "</a>"
html += "<div id=""info_" + textID + """ style=""visibility: hidden;display: none; position: relative; top: 0px; left: 0px;"">"
html += " <div id=""info_box"" style=""position: absolute; top: 0px; left: 0px; background-color: #BBBBBB; padding: 2px 8px 2px 8px; border: 1px solid black; color: black;"">"
html += " <p style=""font-size: 12px;"">" + bodyHtml + " </p>"
html += " </div>"
html += "</div>"
AddHtmlText("actualdocument", html, "", actualDocument)
Result := True
end
</pre>

← Starší verze		Verze z 22. 12. 2020, 21:30
Řádek 39:		Řádek 39:
	result := true		result := true
	end</pre>		end</pre>
		+	[[Category: enTeam skripty]]

@@ Řádek 8: / Řádek 8: @@
 declare function GetGuid dll "ActualDocument" (): string
-script JavascriptText (): Boolean
+script JavascriptText(): boolean
-var bodyHtml,subjectHtml, html, sBR, textID : String
+var
 begin
-   sBR := "<BR/>"
+   HtmlSubject :=  "<b>" + "Toto je náhled textu " + "</b>"
-  subjectHtml :=  "<b>" + "Toto je náhled textu " + "</b>"
+   HtmlBody := "<table cellpadding=""10"">"
-   bodyHtml := "<table cellpadding=""10"">"
+   HtmlBody += "<tr>"
-   bodyHtml += "<tr>"
+   HtmlBody += "  <td>"
-   bodyHtml +=   "<td>" + "aaaa" + sBR + "bbbb" + sBR + "cccc"
+  HtmlBody += "    aaaa <br/> bbbb <br/> cccc"
-   bodyHtml +=   "</td>"
+   HtmlBody += "  </td>"
-   bodyHtml +=   "<td>" + "1111" + sBR + "2222" + sBR + "3333"
+   HtmlBody += "  <td>"
-   bodyHtml += "</td>"
+  HtmlBody += "    1111 <br/> 2222 <br/> 3333"
-   bodyHtml += "</tr>"
+   HtmlBody += "  </td>"
-   bodyHtml += "</table>"
+   HtmlBody += "</tr>"
-   textID :=  GetGuid()
+   TextId :=  GetGuid()
-   html := "<div onMouseOver=""document.getElementById('info_" + textID + "').style.visibility = 'visible'; return false;"
+   Html := "<div onMouseOver=""document.getElementById('info_" + TextId + "').style.visibility = 'visible'; return false;"
-   html += """ onMouseOut=""document.getElementById('info_" + textID + "').style.visibility = 'hidden'; return false;"">" + subjectHtml + "</a>"
+   Html += """ onMouseOut=""document.getElementById('info_" + TextId + "').style.visibility = 'hidden'; return false;"">" + HtmlSubject + "</a>"
-   html += "<div id=""info_" + textID + """ style=""visibility: hidden;display: none; position: relative; top: 0px; left: 0px;"">"
+   Html += "<div id=""info_" + TextId + """ style=""visibility: hidden;display: none; position: relative; top: 0px; left: 0px;"">"
-   html += "  <div id=""info_box"" style=""position: absolute; top: 0px; left: 0px; background-color: #BBBBBB; padding: 2px 8px 2px 8px; border: 1px solid black; color: black;"">"
+   Html += "  <div id=""info_box"" style=""position: absolute; top: 0px; left: 0px; background-color: #BBBBBB; padding: 2px 8px 2px 8px; border: 1px solid black; color: black;"">"
-   html += "    <p style=""font-size: 12px;"">" + bodyHtml   + " </p>"
+   Html += "    <p style=""font-size: 12px;"">" + HtmlBody   + " </p>"
-   html += "  </div>"
+   Html += "  </div>"
-   html += "</div>"
+   Html += "</div>"
-   AddHtmlText("actualdocument", html, "", actualDocument)
-   Result := True
+   AddHtmlText("actualdocument", Html, "", actualdocument)
 end
-</pre>
+   result := true

← Starší verze	Verze z 4. 7. 2019, 21:14
(Žádný rozdíl)