Create toolbar

// Add Reference to:
// 1) AutoCAD 200X Type Library
// 2) AutoCAD/ObjectDBX Common 1X.0 Type Library
// X = 6 or 7

using System ;
using Autodesk.AutoCAD.Runtime ;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.Interop;
using Autodesk.AutoCAD.Interop.Common;

[assembly: CommandClass(typeof(Rivilis.ToolbarSample))]

namespace Rivilis
{
public class ToolbarSample
{
// Define Command "TS"
[CommandMethod("TS")]
static public void TSample()
{
try
{
IAcadApplication app =
(IAcadApplication) Autodesk.AutoCAD.ApplicationServices.Application.AcadApplication;
IAcadMenuGroups groups = app.MenuGroups;
IAcadMenuGroup group = groups.Item(0);
IAcadToolbars toolbars = group.Toolbars;
// Adding new toolbar
IAcadToolbar toolbar = toolbars.Add("My toolbar");
// Adding button to toolbar
IAcadToolbarItem button = toolbar.AddToolbarButton(
0, // Index of button
"My button", // Name of button
"Helpstring button", // Helpstring of button
"\x1b\x1b_.OPTIONS\n", // Macro command
false // Flyout
);
// Setting path to small and large icons
button.SetBitmaps("C:\\SmallIcon.bmp","C:\\LargeIcon.bmp");
// Center toolbar on AutoCAD Window
int x = app.WindowLeft + (app.Width - toolbar.Width)/2,
y = app.WindowTop + (app.Height - toolbar.Height)/2;
toolbar.Float(y,x,1);
}
catch (System.Exception e)
{
}
}
}
}


Copy 'n Paste from: http://discussion.autodesk.com/threa...hreadID=481507

The type or namespace name 'Interop' does not exist in the namespace 'Autodesk.AutoCAD' (are you missing an assembly reference?) C:\Documents and Settings\User\My Documents\Visual Studio 2005\Projects\Toolbars\Toolbars\Class.cs 26 24 Toolbars

1) AutoCAD 200X Type Library
2) AutoCAD/ObjectDBX Common 1X.0 Type Library

Nh­ư vậy là bộ cài CAD 2007 của bạn....Có vấn đề rồi. Tôi up...cà project lên bạn xem nhá:

Cho tớ hỏi cái: Minh đa viết được vài đoạn mã ARX dot net rồi. Nhưng bây giờ chưa biết làm cách nào tự động load cái này lúc khởi động. Mà toàn phải dùng net load. Bác nào có cách chỉ tớ với. Nếu có thể thì dùng lệnh Lisp cũng được. Viết cho em một đoạn Ma LISP tự động load được k0. Về lisp em mù tịt.