Topic: Code Formatting

[Jeff H]

This started happening at Cadtutor and now here.
Pasting code from VS2010 to here does this
 

Code: [Select]

 

                  [CommandMethod("CaptureKeys")]         public void CaptureKeys()         {             Application.PreTranslateMessage +=               new PreTranslateMessageEventHandler(KeyHandler);         }         [CommandMethod("StopCaptureKeys")]         public void StopCaptureKeys()         {             Application.PreTranslateMessage -=               new PreTranslateMessageEventHandler(KeyHandler);         }         void KeyHandler(object sender, PreTranslateMessageEventArgs e)         {             Document doc = Application.DocumentManager.MdiActiveDocument;             Editor ed = doc.Editor;             if (e.Message.message == WM_KEYDOWN &&                 (e.Message.wParam.ToInt32() >= 37 &&                 e.Message.wParam.ToInt32() <= 40))             {                 e.Handled = true;                 switch (e.Message.wParam.ToInt32())                 {                     case 37:                         ed.WriteMessage("\nLeft Arrow");                         break;                     case 38:                         ed.WriteMessage("\nUp Arrow");                         break;                     case 39:                         ed.WriteMessage("\nRight Arrow");                         break;                     case 40:                         ed.WriteMessage("\nDown Arrow");                         break;                     default:                         break;                 }                        }         }         
 
Must paste in Notepad then copy from there and paste to get
 

Code: [Select]


         [CommandMethod("CaptureKeys")]
 
        public void CaptureKeys()
        {
 
            Application.PreTranslateMessage +=
 
              new PreTranslateMessageEventHandler(KeyHandler);
 
        }
 
        [CommandMethod("StopCaptureKeys")]
 
        public void StopCaptureKeys()
        {
 
            Application.PreTranslateMessage -=
 
              new PreTranslateMessageEventHandler(KeyHandler);
 
        }
 
 
        void KeyHandler(object sender, PreTranslateMessageEventArgs e)
        {
            Document doc = Application.DocumentManager.MdiActiveDocument;
            Editor ed = doc.Editor;
 
            if (e.Message.message == WM_KEYDOWN &&
 
                (e.Message.wParam.ToInt32() >= 37 &&
 
                e.Message.wParam.ToInt32() <= 40))
            {
                e.Handled = true;
                switch (e.Message.wParam.ToInt32())
                {
                    case 37:
                        ed.WriteMessage("\nLeft Arrow");
                        break;
                    case 38:
                        ed.WriteMessage("\nUp Arrow");
                        break;
                    case 39:
                        ed.WriteMessage("\nRight Arrow");
                        break;
                    case 40:
                        ed.WriteMessage("\nDown Arrow");
                        break;
                    default:
                        break;
 
                }
         
            }
 
        }


Another thing is since this starting to happen the editor picks up the color while creating post but does not persist inside or outside tags
pic as example

[Keith™]

The problem with the code tags is that the height of the code window is affected by the width of the code window. If you change the code to have shorter lines, the strange height problem goes away.

[BlackBox]

From VS IDE (I opened VB.NET 2010 Express), go to:

Options (Check "Show all settings") --> Text Editor --> Basic --> Tabs --> Select "Insert spaces" radio button.

[Jeff H]

I have that already set.

[BlackBox]

I have that already set.

Well I'm not sure what settings you have that may be different, my friend.

Here's a snippet directly copied from VB.NET 2010 Express, and pasted in my reply CODE tags:

Code: [Select]

Imports Autodesk.AutoCAD.Runtime

'Imports System
'Imports System.IO

Public Class _Foo
    Shared Sub _OpenFile(ByVal filePath As String)
        System.Diagnostics.Process.Start(filePath)
    End Sub

    <CommandMethod("OpenFile")> _
    Public Sub OpenFile()
        _OpenFile("<FilePath>\<FileName>.txt")
    End Sub
End Class


[BlackBox]

... Do you have "word wrap" turned on?