---

cad_de.zip

Hallo,

ich habe ein Programm erstellt mit dem Linien uber ein loop erstellt werden sollen.

.dfa wird eingelesen aber es werden keine Linien erstellt.

Zuerst werden Punkte auf dem Bildschirm erstellt anschliessend werden diese uber die .dlg Maske eingelesen und in der Liste sel_coords gespeichert. Aus diesen Punkten sollen dann eigendlich Linien erstellt werden. Dies passiert aber nicht.

.dlg im zip

Wer weiss Rat

Gruss en

#! UG/KF 17.0

DefClass: more_than_2_points (ug_base_part);

(list modifiable Parameter) sel_coords: {point(0,0,0),point(10,0,0)};
  (List)          sel_coords_Mask: { Point };

  (List)  sel_coords_Mode: {SelPoint};

(integer) n_points: length(sel_coords -1 ;

(list modifiable) list1: loop
{

  for $i from 1 to n_points:;
  append {ug_createInstance(
  {
    class, ug_line,
  Start_Point, nth(2,(nth($i,sel_coords ));
  End_Point,  nth(2,(nth($i+1,sel_coords ));
  })} ;
};

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

---

Da stecken 3 Probleme drin:
1. KF ist Minimalist. D.h. nur angeforderte Aufgaben werden ausgeführt ("KF arbeitet on demand" - wie der Spezi sagen würde). Deine Liste muß also
- einen demandvalue erhalten oder
- von einer anderen Anweisung eingefordert werden oder
- mittels Maske erzwungen werden oder
- mittels Destruktor erfragt werden (siehe dieses Forum).

Im konkreten Fall genügt
(list) demandvalue: {list1: };

2. Deine Klasse sollte so aussehen:
    class, ug_line,
  Start_Point, first(sel_coords   ;
  End_Point,   second(sel_coords   ;

3. In der Doku des UIStylers steht zum '_mode'
"SelPoint - changes return data to include the selection point and the selected entity as a list with 2 items."
Du erhältst keine zwei Punkte in der Liste, sondern einen Punkt sowie den tag auf das Objekt.
Eine einfache Lösung wäre die Verwendung von 2 pushbuttons für je einen Punkt.

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