Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Pro ENGINEER
  VB Tabelle auslesen

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

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Creo
Autor Thema:  VB Tabelle auslesen (1964 mal gelesen)
supTom
Mitglied
CAD-Support


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

Beiträge: 42
Registriert: 19.02.2008

Creo4 M100
DELL Precision M4800
Win 10 / 64
12 GB Ram
NVIDIA Quadro 2000

erstellt am: 22. Aug. 2013 13:24    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

Hallo zusammen,

hiermal wieder was für die VB Gurus unter den Pro/E Programmierern:

Ich will den Inhalt von Tabellen per Programm auslesen.
Geht bis zum Auslesen alles gut, ich kann die Tabelle auswählen, bekomme Anzahl der Zeilen und Spalten und sollte dann nur noch den Text aus der Zelle holen.
Klappt aber irgendwie nicht.
Bis jetzt sieht das Pgm so aus:

Vorher werden die Tabellen aufgelistet und die Tabellensegmente aufgelistet und die Reihen und Spalten des Tabellensegments ermittelt

For p As Integer = 1 To oTableInfo.NumberOfRows

  For q As Integer = 1 To oTableInfo.NumberOfColumns
 
      oTableCell = (New CCpfcTableCell).Create(p, q)

      oTableStrings = oTable.GetText(oTableCell, EpfcParamMode.EpfcDWGTABLE_NORMAL)

      iMaxStrings = oTableStrings.Count

      For o As Integer = 0 To iMaxStrings - 1
        errMsg = errMsg + oTableStrings.Item(o) + Chr(10)

      Next
  Next
Next

Der Fehler liegt irgendwo in der Tablecell. Für die Funktion GetText ist als erster Parameter eine "Cell as IpfcTableCell" vorgeschreiben, aber so wie ich das verwendet habe geht es nicht.
Hat jemand eine Idee wie es richtig ist?

Gruß von Thomas

------------------
nixblick

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

NicoFTB
Mitglied
Ingenieur Entwicklung/Konstuktion


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

Beiträge: 806
Registriert: 08.05.2012

erstellt am: 22. Aug. 2013 15:48    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 Nur für supTom 10 Unities + Antwort hilfreich

Hallo Thomas,

muss die Tabelle vielleicht bei 0,0 anfangen?

------------------
Grüße
Nico \o/

Üs - ProE-Beziehungen

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

anagl
Ehrenmitglied V.I.P. h.c.
 


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

Beiträge: 4566
Registriert: 28.05.2001

CREO2 M140
PDMLink 10.2 M020
HW diverse
Das Schreiben bei CAD.de ist freiwillig und kein Muss !!!!!

erstellt am: 22. Aug. 2013 16:35    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 Nur für supTom 10 Unities + Antwort hilfreich

Wahrscheinlich kannst Du die Logik aus http://inversionconsulting.blogspot.de/2008/06/weblink-excel-to-proe-drw-tables-part-2.html
bzw. http://ww3.cad.de/foren/ubb/Forum12/HTML/018051.shtml#000011 nutzen
aber den große Unterschied sehe ich momentan auch nicht

------------------

Servus Alois

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

supTom
Mitglied
CAD-Support


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

Beiträge: 42
Registriert: 19.02.2008

erstellt am: 10. Sep. 2013 16:57    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

Danke an alle für die guten Ideen,

nach meinem Urlaub (mit etwas Abstand) habe ich nochmals alles durchgelesen und ...
wer lesen kann (und auch noch versteht was er liest) hat Vorteile.

Das Handbuch schreibt dazu:

Function GetText (Cell as IpfcTableCell, Mode as IpfcParamMode) as Istringseq

Returns the text in a drawing table cell.

If no text is found in the table cell, this method will throw a IpfcXToolkitGeneralError exception.

Wenn nichts in der Zelle ist kommt nicht etwa ein Null-String zurück sondern ein waschechter Error. Abgefangen mit Try und Catch sieht die Sache jetzt ganz gut aus.

Nur ...
was fange ich jetzt mit den erhaltenen Bildschirmkoordinaten der Tabelle an??
Bis zum vollständigen Auslesen eines Schriftkopfs dauerts wohl noch etwas.
Nächste Baustelle: Umrechnen der Koordinaten!

Gruß Thomas

------------------
nixblick

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

anagl
Ehrenmitglied V.I.P. h.c.
 


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

Beiträge: 4566
Registriert: 28.05.2001

CREO2 M140
PDMLink 10.2 M020
HW diverse
Das Schreiben bei CAD.de ist freiwillig und kein Muss !!!!!

erstellt am: 10. Sep. 2013 18:19    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 Nur für supTom 10 Unities + Antwort hilfreich

supTom
Mitglied
CAD-Support


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

Beiträge: 42
Registriert: 19.02.2008

erstellt am: 12. Sep. 2013 09:44    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

Hallo zusammen,

die Umrechnung geht letztendlich über
GetSheetTransform
Nur muß man wissen, daß es den Befehl gibt.

Weitergeholfen hat (wieder mal)
A Pro/Engineers Guide to Pro/Web.Link von Christoper Lewis.
Der Schinken ist sein Geld wert und da VB meist die gleichen Befehle wie Javascript hat kommt man anhand der vielen Bespiele auch weiter.

Gruß und Schluß mit diesem Thread von Thomas

------------------
nixblick

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 | CAD.de-Newsletter

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

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

(c)2023 CAD.de | Impressum | Datenschutz