RStab vorm Ausführen von Code starten

[MartinM]

Hallo,
RS-Com wirft immer Fehler aus, wenn man versucht auf das Programm zuzugreifen, bevor es gestartet wurde.

Dies würde ich gerne umgehen indem ich das Programm starte falls es noch nicht gestartet sein sollte.

Hier die Frage:

Gibt es einen Befehl um VV.Net befehl um RStab zu starten? Und wenn ja, wie heißt er.

Vielen Dank im Voraus schon einmal für eure Hilfe.

Viele Grüße
Martin

[Walter Rustler]

AW: RStab vorm Ausführen von Code starten

Hallo Martin,

anbei ein paar nützliche Makros für RSTAB6, in denen auch der Start und das öffnen von Positionen in RSTAB6 behandelt ist. Ebenso ist das Setzen von wichtigen Objekten erläutert. Bitte auch das Bild mit den Erläuterungen zu den notwendigen Verweis auf die RSTAB6 Type Library. Diese befindet sich jetzt in ...\Gemeinsame Dateien\Dlubal.

Viele Grüße
Walter Rustler

Ing.-Software Dlubal

[Maloblocki]

AW: RStab vorm Ausführen von Code starten

Hallo,

unter RSCOM5 und .NET habe ich es früher immer so gemacht (C#):

...
RSTAB.IrsApplication RSApp2;
RSTAB.IrsPosition5 RSPos2;
RSTAB.IrsTopology RSTop2;


try
{
MessageBox.Show("Creating new RSTAB instance");

RSPos2 = (RSTAB.IrsPosition5)new RSTAB.Position();
RSPos2.rsSetZAxisDirection(RSTAB.RS_ZAXIS_DIRECTIO N.ZAD_UPWARD, false);
RSApp2 = RSPos2.rsGetApplication();
RSApp2.rsShowApplication();
}
catch (System.Runtime.InteropServices.COMException)
{
MessageBox.Show("RSTAB can't be started.");
return;
}
...

Mit RSCOM6 scheint es nicht mehr zu gehen.
Ich kann keine neue Instanz von RSTAB6.IrsStructure erstellen.
VBA funktioniert weiterhin.

[Maloblocki]

AW: RStab vorm Ausführen von Code starten

Unter .NET funktioniert es so (hier c#):
...
RSTAB6.IrsApplication RSApp;
RSTAB6.IrsStructure RSPos;

try
{
MessageBox.Show("Creating new RSTAB instance");

RSPos = new RSTAB6.Structure();
RSPos.rsSetZAxisDirection(RSTAB6.RS_ZAXIS_DIRECTIO N.ZAD_UPWARD, false);
RSApp = RSPos.rsGetApplication();
RSApp.rsShowApplication();
RSApp.rsUnlockLicence();

}
catch (System.Runtime.InteropServices.COMException)
{
MessageBox.Show("RSTAB can't be started.");
return;
}
...