---

Hallo Forum,
habe folgendes Problem:
In einem DCL Fenster möchte ich die Felder mit unterschiedlichen Werten füllen,
einmal mit den Werten der Liste A, einmal mit den Werten der Liste B. Dieses klappt auch einwandfrei. Mein lisp hat ein Button "Weiter" und ein Button "Exit".
(action_tile "WEITER" "(if (= POS_STUECK 1)(POS_STUECKLISTE 0)(POS_ENDE))")
(action_tile "EXIT"  "(if (= POS_STUECK 1)(POS_STUECKLISTE 0)(done_dialog 0))")
Mit "Weiter" kann ich Problemlos wieder zurück schalten und die vorherigen Werte wieder laden. Mit "Exit" schließt sich das Fenster komplet, es soll dann aber auch wieder auf die vorherigen Werte zurück schalten. Dabei habe ich heraus gefunden, das es wohl an der Zeile mit "is_cancel = true" in meiner DCL Datei liegt.
: button {
  label = "e&Xit";
  key = "EXIT";
  width = 9;
  is_cancel = true;
}
lasse ich "is_cancel = true" weg klappt es, nur dann kann ich das Fenster nicht mehr mit ESC schließen.
Hat einer eine Idee wie man beides unter eine Hut bekommt.

mfg
Niggemann

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Morgen,
versuche mal Deine gesamte Funktion mit folgenden Zeilen

  (while (and(/= abbr t)(= catchit nil))
    (setq catchit (vl-catch-all-apply 'deinefunktion))
  );while

abzufangen...
Mfg Heiko

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Niggemann,
ohne das ich Deine Funktionen kenne auf Verdacht:

Code:

---

(action_tile "EXIT"  "(if (= POS_STUECK 1)(POS_STUECKLISTE 0)(progn  (POS_ENDE)(done_dialog 0)))")

---

Durch das Progn wird die Funktion (POS_ENDE) vor dem verlassen des Dialogs noch ausgeführt.

------------------
viele Grüße

Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke für die schnellen Antworten,
@ Heiko,
werde mich mal mit deinem Vorschlag befassen, bin aber der Meinung es muß einfacher gehen.
@ Jörn,
die Funktion (POS_ENDE) ermittelt bei einem Normalen schließen des Fensters nur
Massen wie Gewicht, Arbeitszeiten usw.., speichert diese, und schließt das Fenster.
Die Variable POS_STUECK hat die Werte 0 oder 1, 0 = Standart Werte, 1 = Erweiterte Werte. Zwischen diesen Werten möchte ich hin und herschalten, dieses wird in der Funktion POS_STUECKLISTE gemacht. Wenn ich aber der Meinung bin das ich die Erweiterten Werte mit "EXIT" oder mit oder mit "Esc" verlassen will, sollen eben die Standart Werte wieder angezeigt werden, denn das Programm möchte ich noch nicht verlassen.
Wie schon gesagt wenn ich  "is_cancel = true" weg lasse klappt es.

Grüße
Niggemann

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Niggemann,
hast Du is_cancel mehrfach eingesetzt, z.B. für den standardmäßigen "cancel"-Button?? Dann würde eventuell dieser durch die ESC-Taste angesprochen werden. Vielleicht solltest Du mal ein bißchen Code hier reinstellen.
Bist Du schon Schritt für Schritt den Code im Debug-Modus durchgegangen?

------------------
viele Grüße

Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Jörn,
ich benutze nicht die Standart Button, sondern immer nur die von mir angelegten Button, für OK oder Abbruch. In meiner DCL Datei steht immer "Weiter" für "OK" und "Exit" für "Abbruch" bzw. "cancel". Mehrfach kann "is_cancel" nicht vor kommen, da ich die Einstellung für Überprüfung der DCL Datei auf:
dcl_settings : default_dcl_settings { audit_level = 3; } stehen habe. Dadurch
kommt ein Meker wenn ich ein 2. "is_cancel" drinn hätte.
Beim ausprobieren habe ich dann festgestellt, wenn ich den Button "EXIT" drücke, das Programm ordnungsgemäß zu meiner Funktion "POS_STUECKLISTE" springt und dort meine Variable "POS_STUECK" auf '0' setzt.
Desweitern ist mir aufgefallen wenn ich in meinem Lisp die action_tille "EXIT" auskommentiere und in der DCL Datei den Button "EXIT" mit "is_cancel = true" habe wird das Fenster auch geschlossen. Also egal ob eine "action_tile" da ist oder nicht. Vom Code kann ich dir alles geben was du möchtes, aber über 2000 Zeilen helfen dann auch nicht viel weiter. Sag mir bitte was du sehen möchtes und ich schicke es umgehend.
Zur Info ich schreibe im Moment unter ACAD 2004, da mein Lisp auf einem Rechner laufen muß auf dem ACAD 2004 installiert ist.
Viele Grüße
Niggemann

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Heiko,
hab versucht deinen Vorschlag um zusetzen, leider ohne Erfolg. Entweder bin find ich die Richtige Stelle nicht oder es klappt nicht. Was allerdings geklappt hat ist eine neue Möglichkeit ACAD ab zu schießen.
Viele Grüße
Niggemann

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Niggemann,
eigentlich hatte ich gedacht, Du hast ein kleines DCL-Fenster, 2 Listen und eine LISP-Funktion die das DCL-Fenster und die Werte einer der beiden Listen läd. Also wenn Du das nicht absplitten kannst sind 2000 Zeilen für das Forum und für eben mal schauen doch ein bißchen zu viel.

Aber noch eine andere Idee:
Was ist, wenn Du bei Deiner Action-tile Anweisung für den Exit-Button folgendes mit reinschreibst: (setq OK(done_dialog 0)))
Dann kannst du ,nachdem das DCL geschlossen über
(if (= OK 0)(if (= POS_STUECK 1)(POS_STUECKLISTE 0)))
Die Liste wieder zurücksetzen.

Und wenn Du für OK dann nur ein NIL haben solltest, dann weißt Du zumindest, das Deine Action-Tile-Anweisung nicht sauber durchgelaufen ist.

Ich wünsche erstmal ein schönes Wochenende

------------------
viele Grüße

Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Niggemann,
ich denke, Du hast einfach eine Klammer falsch gesetzt. Versuch mal:

Code:

---

(action_tile "EXIT"  "(if (= POS_STUECK 1)(POS_STUECKLISTE 0))(done_dialog 0)")

---

In Deiner Funktion wird in einigen Fällen (wenn POS_STUECK 1 ist) ja (done_dialog) nicht ausgeführt:

Code:

---

(if (= POS_STUECK 1)(POS_STUECKLISTE 0)(done_dialog 0))")

---

Wenn aber ein Button is_cancel = true hat, und im zugehörigen action_tile kein (done_dialog) ausgeführt wird, wird der Dialog terminiert (term_dialog) (s. [F1].

Grüsse, Henning

------------------
Henning Jesse
VoxelManufaktur
Computer-Dienstleistungen für Architekten und Ingenieure

  http://www.voxelman.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Stueckl1.jpg Stueckl2.jpg

@ Jörn,
nix Fenster zu und wieder auf. Ein Fenster mit unterschiedlichen Listen.
Ich erkläres weiter unten, dann siehst du auch warum ich nicht einfach ein paar Code Zeilen raus schneiden kann.

@ Henning,
die Klammern sind schon Richtig.

An Beide heute Funktioniert es, ich kann mit der Taste "EXIT" von der 2. Liste wieder zur ersten zurück schalten. Warum - wieso, ich weiß es nicht, was ich weiß ist das ich am code nichts geändert habe. Meine einzige Erklärung ist das ich durch das häufige laden des Programms ACAD durch einander gebracht habe, ist mit in 18 Jahren noch nicht passiert. Das Problem mit "Esc" besteht aber immer noch.

Zum Verständniß habe ich 2 Bilder von den Fenster gemacht. Bild Stückl1 ist das Standart Fenster mit einer Stückliste. Da wo der Balken steht gibt es eine Unterstückliste (Baugruppe) diese ist im Bild Stückl2 abgebildet.
Es ist das gleiche Fenster nur der Text im Fensterkopf und einige Buttons deaktiviert bzw aktiviert. Da die Bearbeitung der Artikel der Unterstückliste die gleiche ist wie die Bearbeitung eines Artikels aus der normalen Stückliste, wollte ich mir die Arbeit sparen 2 gleiche Fenster zu erstellen. Aus diesem Grund möchte ich mit der Taste "EXIT" oder mit "Esc" von der Unterstückliste zu der Hauptstückliste wechseln. Hab mir die Sache aber einfacher vorgestellt.

Wünsch euch noch ein schönes Wochenende

viele Grüße
Niggemann

[Diese Nachricht wurde von Niggemann am 23. Mai. 2008 editiert.]

[Diese Nachricht wurde von Niggemann am 23. Mai. 2008 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP