undo all

Discussion in 'AutoCAD' started by SabrinaCollstrop, Jul 1, 2003.

  1. SabrinaCollstrop

    SabrinaCollstrop Guest

    Hi,

    I need some help.
    I did program this:

    call lijn(x1(0),x1(1),y1(0),y1(1))

    ..............
    If nde > 11 Then
    Response = MsgBox("Onmogelijk, te veel daksparren nodig", vbCritical + vbOKOnly, "Cras-Collstrop")

    'HERE ALL MUST BE UNDONE, BUT WHEN I MY CASE HE DRAWS THE
    'LINES I DID PROGRAMED BEFORE. HOW TO DO THIS? I can't
    'put this if on an other place becouse nde is defined right
    'before this.

    End If

    I hope someone can help me

    thx!!
    sa
     
    SabrinaCollstrop, Jul 1, 2003
    #1
  2. SabrinaCollstrop

    Mark_Abercrombie Guest

    Will this work?



    ThisDrawing.StartUndoMark call lijn(x1(0),x1(1),y1(0),y1(1)) .............. ThisDrawing.EndUndoMark

    If nde > 11 Then Response = MsgBox("Onmogelijk, te veel daksparren nodig", vbCritical, _vbOKOnly, "Cras-Collstrop") ThisDrawing.SendCommand "UNDO M " End If
     
    Mark_Abercrombie, Jul 1, 2003
    #2
  3. SabrinaCollstrop

    SabrinaCollstrop Guest

    Hi,

    this doesn't work
    he undo's just a part of my programmation, not the whole thing.

    Please help me someone, I'm gettig grazy here.
     
    SabrinaCollstrop, Jul 2, 2003
    #3
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.
Similar Threads

  1. undo

  2. Slower after a UNDO

  3. Intellizoom and Undo

  4. Intellizoom and Undo

  5. This will undo everything. OK?

  6. Save layout with all visible objects in all viewports to new dwg

  7. Undo Redo Undo Redo

  8. Macro for Unsuppress all mates in all assemblies

Loading...