Citaat van: dreten op zo 22 01 2023, 12:25:35Gecondoleerd
Ik ben overgestapt op Mac en heb me dus heel wat kopzorgen op de nek gehaald...

Deze sectie stelt je in staat om alle bijdragen van dit lid te bekijken. Je kunt alleen de bijdragen zien waar je op dit moment toegang toe hebt.
Toon bijdragen MenuCitaat van: dreten op zo 22 01 2023, 12:25:35Gecondoleerd
Ik ben overgestapt op Mac en heb me dus heel wat kopzorgen op de nek gehaald...
Citaat van: matizje op di 20 12 2022, 15:03:00
hoe zou zoiets eruit komen te zien in LIsp dan, ga ik me daarin verdiepen
de manier zoals ik het nu doe met SHIFT+rechter muis geeft dit weer in het commandoscherm:
MOVE
Select objects: 1 found
Select objects:
Specify base point or [Displacement] <Displacement>:
Specify second point or <use first point as displacement>:
>>Enter new value for ORTHOMODE <1>:
Resuming MOVE command.
Specify second point or <use first point as displacement>: _from Base point: <Offset>: 50
;;;Move Multiple
(defun c:mm (/ ss1 L1 L2)
(setq ss1 (ssget))
(while (setq L1 (getpoint "\nWijs Basis point (1) aan: "))
(setq L2 (getpoint L1 "\nWijs Referentie punt (2) aan: "))
(command "MOVE" ss1 "" L1 L2)
) ;_ end of while
(princ)
) ;_ end of defun
(defun c:line ( / p1 p2)
(setq p1 (getpoint "Specify first point: "))
(setq p2 (getpoint p1 "Specify second point: "))
(command "line" p1 p2)
(princ)
)
CiteerThis code defines a function called c:line that prompts the user to specify the starting and ending points of the line. It then uses the line command to draw the line between these two points.
To use this code in AutoCAD, you can type it in the command line and press Enter to run it. This will define the c:line function and make it available for use in your AutoCAD drawing. To draw a line, simply type line in the command line and press Enter. This will run the c:line function and prompt you to specify the starting and ending points of the line. Once you have specified these points, the line will be drawn in your AutoCAD drawing.
Keep in mind that this code is just an example and can be modified and expanded upon to suit your specific needs and preferences. For more information and examples of VLISP code, you can check out the AutoCAD documentation or search online for VLISP tutorials and examples.
Sub DrawLine()
Dim p1 As Variant
Dim p2 As Variant
' Prompt the user to specify the starting and ending points of the line
p1 = ThisDrawing.Utility.GetPoint("Specify first point: ")
p2 = ThisDrawing.Utility.GetPoint("Specify second point: ", p1)
' Draw the line between the specified points
ThisDrawing.ModelSpace.AddLine p1, p2
End Sub
CiteerThis code defines a subroutine called DrawLine that prompts the user to specify the starting and ending points of the line. It then uses the AddLine method to draw the line between these two points in the current drawing.
To use this code in AutoCAD, you can open the VBA editor and paste the code into a new module. This will define the DrawLine subroutine and make it available for use in your AutoCAD drawing. To draw a line, simply run the DrawLine subroutine in the VBA editor. This will prompt you to specify the starting and ending points of the line. Once you have specified these points, the line will be drawn in your AutoCAD drawing.
Keep in mind that this code is just an example and can be modified and expanded upon to suit your specific needs and preferences. For more information and examples of VBA code, you can check out the AutoCAD documentation or search online for VBA tutorials and examples.
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Geometry;
namespace DrawLine
{
public class Line
{
[CommandMethod("DrawLine")]
public void DrawLine()
{
// Get the current document and database
Document doc = Application.DocumentManager.MdiActiveDocument;
Database db = doc.Database;
// Start a transaction
using (Transaction trans = db.TransactionManager.StartTransaction())
{
// Open the Block table for read
BlockTable bt = trans.GetObject(db.BlockTableId, OpenMode.ForRead) as BlockTable;
// Open the Block table record Model space for write
BlockTableRecord btr = trans.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForWrite) as BlockTableRecord;
// Create a new line
Line line = new Line(new Point3d(0, 0, 0), new Point3d(10, 10, 0));
// Add the line to the block table record
btr.AppendEntity(line);
// Save the new object to the database
trans.AddNewlyCreatedDBObject(line, true);
// Save the changes and dispose of the transaction
trans.Commit();
}
}
}
}
CiteerThis code defines a class called Line that contains a method called DrawLine. The DrawLine method creates a new Line object using the Point3d constructor and adds it to the current drawing.
To use this code in AutoCAD, you can compile it into a .NET assembly and load it into AutoCAD using the NETLOAD command. This will define the DrawLine command and make it available for use in your AutoCAD drawing. To draw a line, simply type DrawLine in the command line and press Enter. This will run the DrawLine command and draw a line in your AutoCAD drawing.
Keep in mind that this code is just an example and can be modified and expanded upon to suit your specific needs and preferences. For more information and examples of C# code, you can check out the AutoCAD documentation or search online for C# tutorials and examples.
Citaat van: julien op di 11 01 2022, 09:54:14Meer tijd om koffie te halen???
Dat heb ik onmiddellijk gedaan.
De nieuwe insert is zo traag dat het soms compleet onwerkbaar wordt.
Citaat van: bart op vr 23 07 2021, 16:42:39CLASSICINSERT geeft het oude vertrouwde venster weer.
Ja dat klopt
als je insert ingeeft op de commandline krijg je een ander scherm dan met de voorgaande versie
Citaat van: ArnoL op wo 19 05 2021, 21:19:52
...Het probleem is nu dat er "spontaan" blocks in mijn lijst verschijnen (zoals bv een "dot") die ik niet gemaakt heb, maar die ik ook niet met purge kan verwijderen?
...
Citaat van: julien op wo 19 05 2021, 11:28:15Ik maak het per schaal omdat ik met een standaard werk (met een tool)
...
Waarom maak je een dimstyle aan per schaal?
Daarvoor hebben we al enkele jaren annotative maatvoering:
https://cadsite.be/cursus/les_8/
Citaat van: gery op ma 10 05 2021, 13:41:54Netjes! was er niet op gekomen...
Het vinkje bij "Scale lineweights" in de plotinstellingen van modelspace is in casu de boosdoener (zie bijgevoegde afbeelding).
Dit vinkje kan je weghalen op volgende manier:Alternatief: plotten via paperspace
- open een (goede) tekening waarbij deze optie in modelspace niet aangevinkt is
- maak in die tekening een page setup aan en geef die een naam
- open de foute tekening en importeer de net aangemaakte page setup uit de goede tekening, en activeer deze page setup
- pas eventueel andere plotinstellingen aan
Citaat van: HenkdeKarper op do 29 04 2021, 18:32:14Jij blij, ik blij... Allemaal blij
Thnx Eddybeerke, dat was em!!!!
heel erg blij hier!
Citaat van: Pat op di 13 04 2021, 17:57:08Ik zou zo niet weten waarom het niet zou kunnen.
Kan men Inventor en Solidworks op eenzelfde PC instaleren?
Gr
Patrick
Citaat van: Welles op di 06 04 2021, 17:35:07De vraag terug is: Wat wil je ermee?
Ik heb wat ervaring met AutoCAD, maar ik ben nieuwsgierig naar andere tekenprogramma's.
Welk zou het meest aangewezen zijn om aan te leren?
Inventor of Solidworks?