C#

Simon Stevens wrote:

What are you counting? Pairs of letters?

leppie wrote:

Simon Stevens wrote:
What are you counting? Pairs of letters?

All of them, yes! [Poke tongue]

public static System.Collections.Generic.List<string>
FindSequences
(
    string Chars
,
    uint   Length
)
{
    System.Collections.Generic.List<string> result =
        new System.Collections.Generic.List<string>() ;
 
    char current = '\0' ;
    int  count   = 0    ;
 
    foreach ( char c in Chars )
    {
        if ( c != current )
        {
            if ( count == Length )
            {
                result.Add ( new string ( current , count ) ) ;
            }
 
            current = c ;
            count   = 0 ;
        }
 
        count++ ;
    }
 
    if ( count == Length )
    {
        result.Add ( new string ( current , count ) ) ;
    }
 
    return ( result ) ;
}

class TestClass
{
  public static void Test()
  {
    string s = GetName( new Func<string,int>(Method));
  }

  static int Method(string s) { return 0; }

  static string GetName(Delegate method)
  {
    return method.Method.Name;
  }
}

string s = GetName( ( Func<string,int> ) Method );

string s = GetName( ( Delegate ) Method );

----------------------------------
Be excellent to each other

System.Reflection.MethodBase.GetCurrentMethod().Name

ISynchronizeInvoke synchronizeInvoke = MyCallbackObject As System.ComponentModel.ISynchronizeInvoke;
if (synchronizeInvoke == null)
{
   MyCallbackObject.Callback()
}
else
{
   synchronizeInvoke.Invoke(myDelegate);
}

/* DirectorySearch.cs
 *
 * Purpose : Directory data collection on a background thread
 *
 * Revision History
 * Based on Microsoft.Samples.DirectorySearcher but simplified and
 * modified to use ThreadPool, AsyncOperationManager
 */
using System;
using System.ComponentModel;
using System.Threading;
using System.IO;

namespace SpecTest {
  class DirectorySearchCP {
    private AsyncOperation operation;
    private String startDir;
    private DirectoryInfo[] dirlist;
    public event EventHandler<DirListEventArgs> SearchComplete;

    // Create the search thread, which will initiate the search.
    public void BeginSearch(String startDir) {
      this.startDir = startDir;
      operation = AsyncOperationManager.CreateOperation(null);
      ThreadPool.QueueUserWorkItem(new WaitCallback(ThreadProcedure), null);
    }
    
    private void SearchDirectory() {
      DirectoryInfo s = new DirectoryInfo(startDir);
      dirlist = s.GetDirectories("*.*", SearchOption.TopDirectoryOnly);
    }

    // This method runs in a background thread to collect directory information.
    private void ThreadProcedure(Object stateInfo) {
      try {
        SearchDirectory();
      } finally {
        // Raise an event to notify the user that the search has terminated. 
        // This event is raised on the thread that called BeginSearch
        operation.PostOperationCompleted(new SendOrPostCallback(OnSearchComplete), dirlist);
      }
    }

    private void OnSearchComplete(Object state) {
      EventHandler<DirListEventArgs> handler = SearchComplete;
      if (handler != null) {
        DirListEventArgs args = new DirListEventArgs();
        args.dirlist = (DirectoryInfo[])state;
        handler(this, args);
      }
    }
  }

  public class DirListEventArgs : System.EventArgs {
    public DirectoryInfo[] dirlist;
  }
}

[SecurityPermission(SecurityAction.LinkDemand, Flags = SecurityPermissionFlag.UnmanagedCode)]
protected override bool ProcessCmdKey(ref Message msg, Keys keyData)
        {
            switch (keyData)
            {
                case Keys.Escape:
                    if (this != FormManager.MainForm)
                    {
                        Close();
                        return true;
                    }
                    break;

                case Keys.Control | Keys.F1:
                    for (int i = 0; i < FormManager.MainForm.MdiChildren.Length; i++)
                    {
                        if (FormManager.MainForm.MdiChildren[i] == this)
                        {

                            if (i < FormManager.MainForm.MdiChildren.Length - 1)
                                FormManager.MainForm.MdiChildren[i + 1].Focus();
                            else
                                FormManager.MainForm.MdiChildren[0].Focus();

                            return true;
                        }
                    }
                    return true;

                case Keys.Control | Keys.F10:
                    if (WindowState == FormWindowState.Maximized)
                        WindowState = FormWindowState.Normal;
                    else
                        WindowState = FormWindowState.Maximized;
                    return true;

            }
            return base.ProcessCmdKey(ref msg, keyData);
        }
    }

C:\...crosoft.NET\Framework\v2.0.50727>g 1.2 -url file://z:/myapp/* FullTrust
Microsoft (R) .NET Framework CasPol 2.0.50727.1434
Copyright (c) Microsoft Corporation.  All rights reserved.

The operation you are performing will alter security policy.
Are you sure you want to perform this operation? (yes/no)
y
Added union code group with "-url" membership condition to the Machine level.
Success