mclasson

for (int a = 0; a < 10000; a++)
{
    new Worker(this);
}
memoryLabel.Text = "Memory consumption:" + GC.GetTotalMemory(true)/1024;

mclasson

private void TriggerChildObjects(object sender, EventArgs e)
{
    countLabel.Text = "InvocationList contains " + 
    (ev_Click == null?0:ev_Click.GetInvocationList().Length) + " objects";
}

mclasson

private void Dispose(object sender, EventArgs e)
{
    if (ev_Click == null)
        return;
    foreach (var w in ev_Click.GetInvocationList())
    {
        using (var x = w.Target as IDisposable)
        {
            x.Dispose();
        }

mclasson

private readonly byte[] bLoad = new byte[99999];
HostWindow _host;
public Worker(HostWindow host)
{
    _host = host;
    host.ev_Click += HostEventTriggered;
}

mclasson

test

mclasson

library("httr")

httr::set_config(config(http_version = 2)) # set the HTTP version to 1.1 (none, 1.0, 1.1, 2)

sendMail <- function(e){
  
  body <- list(secret = 'sfsdf£$4500dfdd__$$', body=e["message"]) # create a list that will be serialized to JSON
  result <- POST(url = "https://prod-10.westeurope.logic.azure.com/workflows/8934jadajada999"
                 , body = body  , encode = "json", handle = NULL)