---

Hallo,

ich versuche gerade ein Materialflusssystem zu modellieren. Die Verbindungen zwischen den einzelnen Wegen habe ich in einer Exceltabelle definiert. Diese Tabelle möchte ich nun in eine Planttabelle importieren und dann über eine Methode automatisch die Kanten zwischen den einzelnen Wegabschnitten setzten lassen.

Dummerweise ist das Format meiner Planttabelle nach dem Datenimport aus Excel immer vom Typ String. Um es verwenden zu können benötige ich aber den Typ "Object". Wenn ich das Format (manuell) ändere, färbt sich meine Tabelle rot ein. Führe ich meine Methode aus, erhalte ich die Fehlermeldung "Typenkonflikt in Verbinden, Parameter 2: erwarte object". Schreibe ich die Daten von Hand in die Planttabelle (habe dabei das Format vorher auf Object geändert), dann funktioniert das ganze super. Hat jemand eine Idee, was ich falsch mache?

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

---

So, die Sache hat sich gerade in Wohlgefallen aufgelöst.

Die Planttabelle mit den zu verbindenden Materialflussobjekten befand sich in einem anderen Netzwerk als die Materialflussobjekte. Damit scheint Plant nicht zu klar zu kommen. Ich habe die Tabelle jetzt in mein Hauptnetzwerk zu den Materialflussobjekten gelegt und jetzt funktioniert alles super.

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

---

Ich hätte allerdings nocheinmal eine andere Frage. Gibt es eine Möglichkeit die so erzeugten Kanten am Ende des Simulationslaufes auch wieder zu vernichten? Den Befehl Weg.nfKante.vernichteObjekt habe ich schon gefunden, allerdings vernichtet dieser nur Kanten zwischen Wegen und keine Kante zwischen einem Weg und einer Einzelstation. Wie könnte ich eine Schleife programmieren, die mir automatisch für meine ca. 80 Wegabschnitte die Kanten wieder löscht?

Ich habe es schon mit der folgenden Methode probiert, aber leider funktioniert das noch nicht (Fehlermeldung: Ein VOID kann keine Methode vernichteObjekt empfangen)

is
        a: object;
i,j: integer;
do
j:= Wege.yDim;

for i:=1 to j loop
a:=Wege ["Weg", i];
a.nfKante.vernichteObjekt;
a.vgKante.vernichteObjekt;
next;

end;

Gruß
/Joshy

[Diese Nachricht wurde von Joshy am 11. Mrz. 2005 editiert.]

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

---

Hi Joshy,

nun das ist so wie bei vielen anderen Systemen auch, wenn
kein Pfad angegeben wird, dann wird automatisch in der derzeitigen Umgebung gesucht (nach den Objekten)- in Deinem Fall im Netzwerk,  wo Deine Methode steht. Mit einer absoluten Pfadangabe können die Objekte von beliebigen Stellen aus aufgerufen werden.
Manchmal ist es günstiger die Objekte als strings (in Tabellen)
abzuspeichern und erst beim Zugriff per str_to_obj(pfad+objektname)
den entsprechenden Objekt-Pfad mit anzugeben.

Gruß

------------------
DER SIMULATOR  

[Diese Nachricht wurde von Simulator am 11. Mrz. 2005 editiert.]

---

Hi Joshy,

auch hier gibtŽs wieder viele Wege, die nach Rom führen.

mit
is
i :integer;
liste :list[object];
obj : object;
do

liste.create;
for i:=1 to current.anzahlobjekte loop
obj:=current.objekt(i);
if obj.klasse.name="Kante" then
liste.anhaengen(obj);  -- Kanten sammeln
end;
next;

repeat
liste.entnehmen(1).vernichteObjekt;
until liste.dim=0;

end;

Kannst Du alle Kanten sammeln und dann loeschen;

Wenn Du nur die Kanten loeschen willst, die in Deiner Wegetabelle stehen und Objekte sind, die mit Kanten verbunden werden können - also keine Methoden, Displays etc.,  so kannst Du folgendermassen vorgehen :

is
i,j :integer;
obj : object;
do
for i:=1 to wege.ydim loop

obj:=Wege ["Weg", i];

for j:=1 to obj.anzahlnf loop
obj.nfkante.vernichteobjekt;
next;

for j:=1 to obj.anzahlvg loop
obj.vgkante.vernichteobjekt;
next;
next;
end;

ich vermute mal, dass Du bei Deinem Schleifendurchlauf (N) die nfkante des Bausteins N die auch die vgkante des Bausteins N+1 ist gelöscht hast und diese Kante dann beim nächsten Schleifendurchlauf (N+1) nicht mehr gefunden wurde.

Man könnte durch eine Abfrage, ob das Kantenobjekt noch existiert
if obj.nfkante\=VOID then .... dies vorher überprüfen.

wie gesagt, es gibt viele Möglichkeiten, dies waren nur einige.

Gruß

------------------
DER SIMULATOR