|
CATIA V5 Programmierung : User-Selektion umbennen
meisterlumpi am 17.08.2011 um 10:29 Uhr (0)
generell sollte man für neue projekte auch immer ein neues VBA projekt anlegen. So startet man auch wieder mit den standard einstellungen und übernimmt nicht die vom vorherigen projekt, wo man nur die module gelöscht hat. (weil du ja auch nicht unbedingt weißt was der ersteller des Projekts so alles geändert hat und was davon deinen code "behindern" wird)neues projekt erstellst du in CATIA - ALT + F8 - Makrobibliotheken - BibTyp auf VBA-Projekte stellen - Neue Bib erzeugenüber Vorhandene Bib hinzufügen kan ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CNEXT mit Makro starten, Return Code ändern?
meisterlumpi am 05.09.2011 um 17:56 Uhr (0)
Halloist ne interessante frage. bin kein programmierer, daher lasse ich mich gern eines besseren belehren, doch ich behaupte mal den return code, bzw. das errorlevel des programms kann man nicht einfach ändern wenn man keinen zugang zum quelltext hat.die idee war jetzt eine neue umgebungsvariable vorm catia start anzulegen mitSETX CAT_ERROR "false"z.b. und diese beim auftreten eines fehlers im skript auf true zu setzten, so dass man sie nachdem schließen von catia wieder auslesen kann. das funktioniert all ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : txt-file (Zeile bestimmen)
meisterlumpi am 06.09.2011 um 09:02 Uhr (0)
HimitCode:Datei.OpenAsTextStream(ForAppending)kannst du den text an die bestehende datei anhängen ohne sie zu überschreiben. direkt in eine bestimmte zeile zu schreiben ohne den text vorher zu löschen wird schwierig und viel fummelei. http://www.virtualsplat.com/tips/visual-basic-fso.asp wenns nicht unbedingt eine .txt sein muss würde ich dir vorschlagen eine ini-datei zu benutzen. siehe http://www.vbarchiv.net/workshop/workshop_21-ini-dateien-bearbeiten-und-verwalten.html gruß
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : txt-file (Zeile bestimmen)
meisterlumpi am 06.09.2011 um 10:12 Uhr (0)
Zitat:wenn z. B. in der 2.Zeile bereits etwas steht dann möchte ich den Text in der 2. Zeile überschreiben (ohne den Text in der 1. Zeile zu ändern und umgekehrt)und nicht als 3.Zeile dran hängendann müsstest du vor jedem schreiben einer zeile die komplette text-datei erstmal auslesen in einen string. dann den string an den "neuen Zeilen" splitten so dass du ein array erhälst mit den einzelnen zeilen als komponenten.array1 = split(string1, vbCrLf)oder sowas in der richtung.dann kannst du deine Zeile im ar ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : txt-file (Zeile bestimmen)
meisterlumpi am 06.09.2011 um 10:33 Uhr (0)
kurz zu den inisin einer ini gibt es Sections, Keys und Values. Eine Section kann beliebig viele Keys beinhalten, denen man Values, also Werte zuordnen kann.Section1Key1=Value1Key2=Value2...Section2...folgendes modul kannst du dir in dein vba projekt kopierenCode: DLL-Funktionen zum LESEN der INI deklarieren Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" ( _ ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As Strin ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : txt-file (Zeile bestimmen)
meisterlumpi am 06.09.2011 um 13:33 Uhr (0)
die zeile Code:PathToINIFile = "C: est.ini"musst du natürlich anpassen. falls du die datei C: est.ini nicht anlegen darfst (weil du keine schreibrechte auf C: hast z.b.), dann wirds nicht funktionieren. das skript überprüft weder, ob man schreibrechte hat, noch ob die ini wirklich existiert (beim auslesen eines wertes).eine fertige funktion zum auslesen bestimmter zeilen findest du hier http://www.vbarchiv.net/tipps/tipp_970-bestimmte-zeile-aus-einer-textdatei-auslesen.ht ml du könntest bei dir mal versuch ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : txt-file (Zeile bestimmen)
meisterlumpi am 07.09.2011 um 15:44 Uhr (0)
Das Element txtLine musst du abändern. Mach dir einfach ne string variable und schreib die auszulesende Zeile da rein. Pfad anpassen nicht vergessen.GrußCode:Sub test() Dim Zeile as string Zeile = ReadLine("C:.........sample.txt", 1) - PFAD ANPASSEN MsgBox ZeileEnd Sub Bestimmte Zeile aus einer Textdatei lesenPublic Function ReadLine(ByVal sFile As String, _ Optional ByVal nLine As Long = 1) As String Dim sLines() As String Dim oFSO As Object Dim oFile As Object Fehlerbehandlung aktivieren On Error ...
|
| In das Form CATIA V5 Programmierung wechseln |