<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN">
<html><body>
<div><span id="result_box"><span>You could also use some resources from the gb.media component.</span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div>
<pre style="color: gray;">Private pl As MediaPipeline
Public Sub Form_Open()
Dim src, sca, con, png, snk As MediaControl
pl = New MediaPipeline
src = New MediaControl(pl, "ximagesrc")
src["xid"] = CLong(0)
<span style="color: gray;">' <em>Imposta la dimensione della schermata:</em></span>
src["startx"] = 0
src["starty"] = 0
src["endx"] = Screen.W
src["endy"] = Screen.H
src["use-damage"] = False
sca = New MediaControl(pl, "videoscale")
sca["method"] = 0
con = New MediaControl(pl, "videoconvert")
png = New MediaControl(pl, "pngenc")
snk = New MediaControl(pl, "filesink")
snk["location"] = "/tmp/screenshot.png"
src.LinkTo(sca)
sca.LinkTo(con)
con.LinkTo(png)
png.LinkTo(snk)
End
Public Sub Button1_Click()
Wait 2
<span style="color: gray;">' <em>Take a "screenshot":</em></span>
pl.Play()
pl.Stop()
End</pre>
<span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span>regards<br /></span></span></div>
<div><span id="result_box"><span>vuott<br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<div><span id="result_box"><span><br /></span></span></div>
<p>Il 27.08.2018 21:26 vuott@tiscali.it ha scritto:</p>
<blockquote type="cite" style="padding-left:5px; border-left:#1010ff 2px solid; margin-left:5px; width:100%"><!-- html ignored --><!-- head ignored --><!-- meta ignored -->
<div>.GetScreenshot( ) Method of "DesktpWindow" Class is similar.</div>
<div>vuott</div>
<p>Il 27.08.2018 18:12 Tobias Boege ha scritto:</p>
<blockquote style="padding-left: 5px; border-left: #1010ff 2px solid; margin-left: 5px; width: 100%;">
<pre>On Mon, 27 Aug 2018, Rolf-Werner Eilert wrote:</pre>
<blockquote style="padding-left: 5px; border-left: #1010ff 2px solid; margin-left: 5px; width: 100%;">Is there a chance to read a small portion of the screen into an image or picture? What I am looking for is sort of a screenshot function.</blockquote>
<pre>The GUI components have a Desktop.Screenshot method.
<span class="sig">-- "There's an old saying: Don't change anything... ever!" -- Mr. Monk ----[ Gambas mailing-list is hosted by <a href="https://www.hostsharing.net">https://www.hostsharing.net</a> ]---- </span></pre>
</blockquote>
<!-- html ignored --><br /><br /><br />
<p>Con MyOpen hai Giga, SMS e i minuti che vuoi da 3€ al mese, per sempre. Cambi gratis quando e come vuoi e in più hai 10€ di credito omaggio!<br /> SCOPRI DI PIU’ <a href="http://tisca.li/myopen">http://tisca.li/myopen</a><br /><br /></p>
</blockquote>
</body></html>
<br><br/><br/>Con MyOpen hai Giga, SMS e i minuti che vuoi da 3€ al mese, per sempre. Cambi gratis quando e come vuoi e in più hai 10€ di credito omaggio!<br />
SCOPRI DI PIU’ <a href='http://tisca.li/myopen' target='_blank'>http://tisca.li/myopen</a><br/><br/>