<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head><meta http-equiv=Content-Type content="text/html; charset=utf-8"><meta name=Generator content="Microsoft Word 12 (filtered medium)"><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri","sans-serif";}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
p.MsoAcetate, li.MsoAcetate, div.MsoAcetate
{mso-style-priority:99;
mso-style-link:"Text bubliny Char";
margin:0cm;
margin-bottom:.0001pt;
font-size:8.0pt;
font-family:"Tahoma","sans-serif";}
span.TextbublinyChar
{mso-style-name:"Text bubliny Char";
mso-style-priority:99;
mso-style-link:"Text bubliny";
font-family:"Tahoma","sans-serif";}
span.StylE-mailovZprvy19
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:windowtext;}
span.StylE-mailovZprvy20
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.StylE-mailovZprvy21
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.StylE-mailovZprvy22
{mso-style-type:personal-reply;
font-family:"Calibri","sans-serif";
color:#1F497D;}
.MsoChpDefault
{mso-style-type:export-only;
font-size:10.0pt;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:70.85pt 70.85pt 70.85pt 70.85pt;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></head><body lang=CS link=blue vlink=purple><div class=WordSection1><p class=MsoNormal><span style='color:#1F497D'>Dobrý den,<o:p></o:p></span></p><p class=MsoNormal><span style='color:#1F497D'>Jelikož měl Volny.cz od půlnoci údržbu, nemohl jsem napsat do konve že už to jede. Skutečně to jde přes delegate, našel jsem tohle, je tam hezká ukázka, jak to udělat. Díky za nakopnutí.<o:p></o:p></span></p><p class=MsoNormal><span style='color:#1F497D'><a href="https://docs.microsoft.com/cs-cz/dotnet/visual-basic/language-reference/statements/delegate-statement?f1url=https%3A%2F%2Fmsdn.microsoft.com%2Fquery%2Fdev15.query%3FappId%3DDev15IDEF1%26l%3DCS-CZ%26k%3Dk(vb.Delegate)%3Bk(TargetFrameworkMoniker-.NETFramework%2CVersion%3Dv4.5.2)%3Bk(DevLang-VB)%26rd%3Dtrue">https://docs.microsoft.com/cs-cz/dotnet/visual-basic/language-reference/statements/delegate-statement?f1url=https%3A%2F%2Fmsdn.microsoft.com%2Fquery%2Fdev15.query%3FappId%3DDev15IDEF1%26l%3DCS-CZ%26k%3Dk(vb.Delegate)%3Bk(TargetFrameworkMoniker-.NETFramework%2CVersion%3Dv4.5.2)%3Bk(DevLang-VB)%26rd%3Dtrue</a><o:p></o:p></span></p><p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p><p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p><div><div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm'><p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Hw-list [mailto:hw-list-bounces@list.hw.cz] <b>On Behalf Of </b>Ladislav Vaiz<br><b>Sent:</b> Friday, January 05, 2018 11:51 PM<br><b>To:</b> HW-news<br><b>Subject:</b> RE: NET<o:p></o:p></span></p></div></div><p class=MsoNormal><o:p> </o:p></p><div><p class=MsoNormal style='margin-bottom:12.0pt'><span style='font-size:12.0pt;font-family:"Times New Roman","serif"'><br> <a href="https://docs.microsoft.com/en-us/dotnet/visual-basic/programming-guide/language-features/delegates">https://docs.microsoft.com/en-us/dotnet/visual-basic/programming-guide/language-features/delegates</a>/<br><br>--<br>Stručně naklofáno na mobilu<br><br>-----Original Message-----<br>From: Miroslav Draxal <<a href="mailto:evik@volny.cz">evik@volny.cz</a>><br>To: 'HW-news' <<a href="mailto:hw-list@list.hw.cz">hw-list@list.hw.cz</a>><br>Sent: pá, 05 led 2018 23:23<br>Subject: RE: NET<o:p></o:p></span></p></div><p class=MsoNormal><span style='color:#1F497D'>Zapomněl jsem. Jde mi o Visual Basic Net<o:p></o:p></span></p><p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p><div><div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm'><p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Hw-list [<a href="mailto:hw-list-bounces@list.hw.cz">mailto:hw-list-bounces@list.hw.cz</a>] <b>On Behalf Of </b>Ladislav Vaiz<br><b>Sent:</b> Friday, January 05, 2018 11:09 PM<br><b>To:</b> HW-news<br><b>Subject:</b> RE: NET<o:p></o:p></span></p></div></div><p class=MsoNormal><o:p> </o:p></p><div><p class=MsoNormal style='margin-bottom:12.0pt'><span style='font-size:12.0pt;font-family:"Times New Roman","serif"'>V C# potrebujete delegate pripadne event.<br>L.<br><br>--<br>Stručně naklofáno na mobilu<br><br>-----Original Message-----<br>From: Miroslav Draxal <<a href="mailto:evik@volny.cz">evik@volny.cz</a>><br>To: 'HW-news' <<a href="mailto:hw-list@list.hw.cz">hw-list@list.hw.cz</a>><br>Sent: pá, 05 led 2018 23:04<br>Subject: RE: NET<o:p></o:p></span></p></div><p class=MsoNormal><span style='color:#1F497D'>V C bych řekl že potřebuji ukazatel na proceduru.<o:p></o:p></span></p><p class=MsoNormal><span style='color:#1F497D'>Míra<o:p></o:p></span></p><p class=MsoNormal><span style='color:#1F497D'><o:p> </o:p></span></p><div><div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm'><p class=MsoNormal><b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>From:</span></b><span style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> Hw-list [<a href="mailto:hw-list-bounces@list.hw.cz">mailto:hw-list-bounces@list.hw.cz</a>] <b>On Behalf Of </b>Miroslav Draxal<br><b>Sent:</b> Friday, January 05, 2018 11:00 PM<br><b>To:</b> 'HW-news'<br><b>Subject:</b> NET <o:p></o:p></span></p></div></div><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal>Dobrý večer,<o:p></o:p></p><p class=MsoNormal>Dokázal by mě někdo navést jak provést následující.<o:p></o:p></p><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal>Mějme tři a více Modulů.<o:p></o:p></p><p class=MsoNormal>V jedné Třídě mám bufer, který si žije svým životem, do kterého Moduly posílají data. <o:p></o:p></p><p class=MsoNormal>Po zpracování informace v buferu potřebuji dát vědět modulu, který data do bufru uložil co a jak.<o:p></o:p></p><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal>Do bufru přistupuji voláním procedury s parametrem, parametr je struktura. Do struktury si můžu programově přidat co chci. Něco jako parametr zpětného volání, nějak nevím jak na to.<o:p></o:p></p><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal>Díky za nasměrování, Míra<o:p></o:p></p></div></body></html>