Vítejte !   Přihlášení | Registrace
Hlavní menu
CATIA fórum.cz
Novinky
Seriál CATIA
Obecně o CAD
Novinky ze světa DS
Makra pro CATIA V5
Diskuse
Vytvořit téma
Koncepty
Seznam oblíbených
Soukromé zprávy
Pravidla
Live CHAT
VIP žádost
Základy Catia
Ke stažení
Doporučujeme
Pracovní příležitosti
Reklama a kampaně
O fóru
Nápověda

Programování maker - platforma

Kompletní přehled příspěvků v tématu Programování maker - platforma řazený podle data jejich publikace na fóru.

UživatelPříspěvek
Zdeněk Mrázek

Poslat zprávu | Profil
Datum: 29.1. 2010 | Zobrazeno: 6455x
Konfigurace CATIA:

Text dotazu:
1. Syntaxe prostředí CATVBA odpovídá Visual Basicu 6. Mnoho aplikací přechází v nových verzích od VBA na platformu .NET. Jak to vypadá u Catie?
2. Lze platformu .NET využít u stávající verze Catie a pokud ano, jak?

Jan Svoboda

Poslat zprávu | Profil
[#81] | Publikováno: 29.01. 2010 - 13:43
Všechny makra dělám v Microsoft Visual Basic 2008 Express Edition
Dělal jsem makra od R14 do R19 a vše bez problémů.
Jiří Pešek

Poslat zprávu | Profil
[#83] | Publikováno: 29.01. 2010 - 21:25
To je záludná otázka. :)) Myslím, že v Catii V5 nebude integrován novější VBA. Možná že dojde ke změně v Catia V6.
Obecně se dá říct VBA 6 (Catscript) stačí na základní makra. Výhodou je jednoduchost kódu a rychlost vykonání skriptů. VBA 6.3+ je zakomponován v Catii.
Programátoři využívají i jiné jazyky pro spouštění maker -
VBA 2008,Visual Basic .NET, Perl, C++, C#,Microsoft .NET-Framework 2.0
a další. Tyto jazyky jsou myslím pro složitější aplikace s propojením s databází.
Př. http://www.cadsim-gmbh.de/download.htm

CAA RADE je programovací prostředí pro CATII a využívá C++. Všechny nadstavby pro Catii, např. Validat,Q-Checker,NTtool a jiné. Instalace je docela drahá, řádově více caa 50000 Eur. Používají ji zkušení programátoři a firmy, které na to mají.
Tyto aplikace mají tu výhodu, že jsou součástí Catie a využívají ji přímo.
Zdeněk Mrázek

Poslat zprávu | Profil
[#92] | Publikováno: 01.02. 2010 - 08:12
Jsem ve VB začátečník, ale pustil jsem se právě do platformy .NET (také využívám VB2008 Expres Edition). Nechci se vracet ke staršímu VB6. Mohu poprosit pana Svobodu o uveřejnění nějakého velmi jednoduchého příkladu (prosím opravdu "po lopatě") jak vytvořit makro pro Catii ve VB2008EE a jak toto makro z prostředí Catie zavolat? Předem díky.
Jan Svoboda

Poslat zprávu | Profil
[#97] | Publikováno: 01.02. 2010 - 17:30
Tady máte kus kódu...
Musíte ještě ve VB nalinkovat knihovny, to je vidět na obrazku...

Public Class Form1

Dim CATIA As INFITF.Application = GetObject(, "CATIA.Application")
Dim Adoc As INFITF.Documents
Dim UserSelection1 As INFITF.Selection
Dim reference1 As INFITF.References
Dim VisPropertySet1 As INFITF.VisPropertySet
Private Sub Form1_Load() Handles MyBase.Load
CATIA = GetObject(, "CATIA.Application")
Adoc = CATIA.Documents
End Sub

Private Sub VIS() Handles VIS.Click
'Bílá barva
UserSelection1 = CATIA.ActiveDocument.Selection
If UserSelection1.Count > 0 Then

For I = 1 To UserSelection1.Count
'MsgBox(UserSelection1.Item(I).Value.Name)
VisPropertySet1 = UserSelection1.VisProperties
VisPropertySet1.SetRealColor(255, 255, 255, 1)
Next

End If
End Sub

Přiložené soubory:
references_vb2009.zip

Jan Svoboda

Poslat zprávu | Profil
[#99] | Publikováno: 01.02. 2010 - 19:08
Makro funguje tak,že vyberete plochy, které potřebujete obarvit nadefinovanou barvou,
stisknete button a makro plochy obarví.
Ing Jan Cinert

Poslat zprávu | Profil
[#101] | Publikováno: 01.02. 2010 - 22:53
Vloudila se malá chybička, na konci kódu chybí End Class...
Jinak též děkuji za příklad, i já uvažuji o tom, že bych se pustil do VB2008EE, Catiovský VB6 má sice opravdu lepší odezvu, ale jeho možnosti jsou na dnešní dobu už trochu omezené.
Jan Svoboda

Poslat zprávu | Profil
[#103] | Publikováno: 01.02. 2010 - 23:32
já jsem se také po krátké době co jsem začal s makry raději rozhodl pro VB...
Libor Jedlička

Poslat zprávu | Profil
[#122] | Publikováno: 07.02. 2010 - 20:59
Ještě prosím o radu...
Pokud vytvořím makro v VB2008.net, tak knihovny jenž si nalinkuji do referencí musí být umístěné ve spouštěcím adresáři - tzn. tam kde je .exe soubor makra. Jak se tohoto lze zbavit?
Všechny PC ve firmě mají Catii ve stejném instalačním adresáři a já jsem nucen potřebné .dll knihovny zbytečně kopírovat do adresáře kde spouštím makro. Jak lze nastavit absolutní cesta na referenční knihovny? Děkuji.
Ing Jan Cinert

Poslat zprávu | Profil
[#123] | Publikováno: 07.02. 2010 - 23:36
Co spouštět makro z nějakého síťového disku? Pak stačilo nakopírovat knihovny sem, makro by se spouštělo pokaždé ze stejného umístění.
Libor Jedlička

Poslat zprávu | Profil
[#126] | Publikováno: 08.02. 2010 - 15:56
To ano, ale stejně je to "ošklivost" kamkoliv kopírovat knihovny, jenž jsou na každém PC v instalačním adresáři Catie. Když jsem kdysi zkoušel dělat programy v VB6, tak to nevyžadoval. Ve VB2008net to ale tak musím dělat - je to určitě jen v nastavení...jenže kde...
Takhle když dám někomu z externích firem makro, dám mu místo jednoho .exe souboru celkem 5 souborů (a 4 znich má již na svém počítači).
Jan Svoboda

Poslat zprávu | Profil
[#127] | Publikováno: 09.02. 2010 - 09:08
Uživatel odpovídá na příspěvek #126:

VB6 je integrovaný přímo do CATIE a proto žadné knihovny nevytváří a používá stávající.
A proto nemůžete vytvořit exe soubor... Knihovni ktere si VB2008net vytvoří (nejsou stejné jako v catii)mají tak zanedbatelnou velikost, že bych to vůbec neřešil. Dokážu si, ale představit, že by se vytvořil instalátor který by vytvořil při instalaci tyto knihovni nové. U žádného makra mi velikost knihoven nepřesahuje 1MB...
Zdeněk Mrázek

Poslat zprávu | Profil
[#139] | Publikováno: 18.02. 2010 - 14:54
Omlouvám se, ale jak jsem uvedl výše, jsem začátečník. Prokousávám se samotným prostředím VB.net, takže jsem ve fázi, kdy dokážu vytvořit formulář a z něj spustit nějakou funkci. Ale není mi právě vůbec jasné, jak propojit naprogramované makro s Catií (předpokládám, že je to právě přes linky knihoven) ... zde bych potřeboval opravdu trochu polopatické "nakopnutí". Dostal jsem se do fáze - New Project - Windows application ... View code - tady jsem vyplnil kód a tím jsem skončil.
Ing Jan Cinert

Poslat zprávu | Profil
[#140] | Publikováno: 18.02. 2010 - 22:27
Zkuste to podle návodu, co psal pan Svoboda. Ve Visual studiu (při nově otevřeném projektu) klikněte v horním menu na Project a dále Add reference. Pak přepněte na záložku COM a v seznamu vyberte knihovny, které jsou příloze příspěvku pana Svobody.
CATIA V5 InfInterfaces Object Library

CATIA V5 MecModeInterfaces Object Library
CATIA V5 ProductStructureInterfaces Object Library

Tyhle knihovny obsahují základní objekty nutné pro práci s catií, pro další moduly je třeba načíst i ostatní knihovny. K samotnému propojení s catií stačí podle mně tento kód.
Public Class Main


'deklarace instance CATIA
Dim CATIA As INFITF.Application

'vytvoreni objektu CATIA
On Error Resume Next
CATIA = GetObject(, "CATIA.Application")
If Error.Nr <> 0 Then
MsgBox "Spojeni s CATIA se nepodarilo!"
Else
MsgBox "Spojeni s CATIA bylo uspesne navazano."
End If

'deklarace napr productu
Dim oProduct As ProductStructureTypeLib.Product

'a vytvoreni objektu je jiz stejne, napr. pro sestavu
oProduct = CATIA.ActiveDocument.Product

End Class
Ing Jan Cinert

Poslat zprávu | Profil
[#194] | Publikováno: 27.02. 2010 - 18:50
Ještě jsem zapomněl dodat. Abyste pro deklarace proměnných mohl používat stejný způsob jako v interním editoru Catie, uveďte úplně na začátku kódu toto:
Imports INFITF

Imports ProductStructureTypeLib

Tím naimportujete nalinkované knihovny a všechny objekty, vlastnosti a metody Catie z těchto knihoven se pak budou objevovat v nabídce Intelisense Visual Studia (samozřejmě je třeba importovat vše co používáte).
Pak namísto složitého
Dim oProduct As ProductStructureTypeLib.Product

stačí jen
Dim CATIA As Application

Dim oProduct As Product
atd.
jambara

Poslat zprávu | Profil
[#1231] | Publikováno: 24.10. 2010 - 20:04
Dobrý večer chtěl jsem se zeptat zda by mi někdo neporadil jak se přepnout zpět na P2 z P3. Předem děkuji za jakoukoliv odpověď.
Ing Jan Cinert

Poslat zprávu | Profil
[#1233] | Publikováno: 24.10. 2010 - 21:46
Postup pro zpětné přepnutí je následující:

V příkazové řádce vpravo dole napiště "c: options" a potvrďte enterem. Otevře se menu Options. Najeďte na záložku General, kde jste přepnul na z P2 na P3. Sice tu není nic vidět, ale přepínače jsou na svých místech, stačí se myší trefit do správného místa. Jakmile to přepnete, Catia ohlásí, že je třeba restart.

Po restartu je vše OK.

PS: Proč to proboha píšete sem? Tady by vám nikdo neodpověděl...


Uživatel nepřihlášen

Pro zobrazení obsahu stránky / provedení akce (vytvoření nového téma, napsání odpovědi do diskuse apod.) musíte být přihlášeni.