Hot News:
   

Mit Unterstützung durch:

  Foren auf CAD.de
  TM - Plant Simulation
  Relatives Ansprechen von Object-Eigenschaften

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Relatives Ansprechen von Object-Eigenschaften (2091 mal gelesen)
T_Wunsch
Mitglied
Greenfield & Digital Factory


Sehen Sie sich das Profil von T_Wunsch an!   Senden Sie eine Private Message an T_Wunsch  Schreiben Sie einen Gästebucheintrag für T_Wunsch

Beiträge: 75
Registriert: 03.11.2005

Plant Simulation 10.1.1

erstellt am: 14. Nov. 2005 08:51    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Eigenschaften von Objekten relativ ansprechen?

z.B.:
tabelle := str_to_obj("Parametersatz_" + to_str(Parametersatz_aktuell));
for zeile := 1 to tabelle.yDim loop
objekt := tabelle[1,zeile];
for spalte := 2 to tabelle.xDim loop
if tabelle[spalte,zeile] /= VOID then

inspect tabelle[spalte,0]
when "Abstand" then
objekt.Abstand := tabelle[spalte,zeile];
when "Bearbeitungszeit" then
objekt.Bearbeitungszeit := tabelle[spalte,zeile];
when "Zykluszeit" then
objekt.Zykluszeit := tabelle[spalte,zeile];
when "Rüstzeit" then
objekt.Rüstzeit := tabelle[spalte,zeile];

else
print "PARAMETER-INIT: Fehler... Object: " + to_str(tabelle[1,zeile]) + " Eigenschaft: " + to_str(tabelle[spalte,0]);
end;

end;
next;
next;

Die inspect ist einfach unschön und macht den code unnötig lange...
VBA oder PHP Lösung sähe etwa so aus:

objekt(tabelle[spalte,0]) = tabelle[spalte,zeile]

tabelle[spalte,0] muss hierbei vom typ string sein  -    entspricht der syntax
objekt.eigenschaft ...

Gibt's hier einen Trick um sich unnötige Tipperei zu ersparen?
DANKE Forum!

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


Ex-Mitglied

erstellt am: 14. Nov. 2005 11:53    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat

Hi,

und wie wäre es so

object.Abstand:=tabelle["Abstand",zeile];
object.Bearbeitungszeit:=tabelle["Bearbeitungszeit",zeile];
object.Zykluszeit:=tabelle["Zykluszeit",zeile];
.
.
.

Gruss

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

T_Wunsch
Mitglied
Greenfield & Digital Factory


Sehen Sie sich das Profil von T_Wunsch an!   Senden Sie eine Private Message an T_Wunsch  Schreiben Sie einen Gästebucheintrag für T_Wunsch

Beiträge: 75
Registriert: 03.11.2005

Plant Simulation 10.1.1

erstellt am: 14. Nov. 2005 15:30    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

...entspricht NICHT der gesuchten Funktion!

_________________________________________________
anderes Beispiel:

eigenschaft := "BearbeitungsZeit";
ob := Einzelplatz_1;

--geht leider nicht...
ob(eigenschaft) := str_to_time("10:00:00.0000");

_________________________________________________

so ist's überschaubarer!

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


Ex-Mitglied

erstellt am: 14. Nov. 2005 20:05    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat

Hi

so gehts


(obj : object;attribut,wert :string)
is
str :string;
do
str:=sprint("is do ", obj,".",attribut,":=",wert,"; end;");
--- print str;
execute(str);
end;


Gruss

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

[Diese Nachricht wurde von Simulator am 14. Nov. 2005 editiert.]



Systembetreuer:in IPS-Systeme (zedas) (d/m/w)

Als Verkehrsdienstleisterin gestalten wir nicht nur die Zukunft Frankfurts, sondern setzen uns auch als Arbeitgeberin für Ihre persönliche und berufliche Entwicklung ein. In unserem Unternehmen leben wir Offenheit, Toleranz und Gleichberechtigung und bieten Ihnen eine Vielzahl an attraktiven Benefits.

Die Verkehrsgesellschaft Frankfurt am Main, kurz VGF, ist das kommunale Verkehrsunternehmen in Frankfurt und betreibt den kompletten U-Bahn- und Straßenbahnverkehr in Frankfurt....

Anzeige ansehenFeste Anstellung
T_Wunsch
Mitglied
Greenfield & Digital Factory


Sehen Sie sich das Profil von T_Wunsch an!   Senden Sie eine Private Message an T_Wunsch  Schreiben Sie einen Gästebucheintrag für T_Wunsch

Beiträge: 75
Registriert: 03.11.2005

Plant Simulation 10.1.1

erstellt am: 15. Nov. 2005 08:27    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

...GENAU!!!
*wieschuppenvondenaugenfällt*


DANKE

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen .... | Nach anderen Beiträgen suchen

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2025 CAD.de | Impressum | Datenschutz