| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| LINE BUILDER - Episode 2: Factory Flow Simulation |
Autor
|
Thema: Delphi (1448 mal gelesen)
|
Baltenweck Mitglied Konstrukteur
Beiträge: 170 Registriert: 13.03.2001 Früher brauche man 3 Comodore, um zum Mond zu fliegen - heute braucht man 1 Ghz um Windows zu starten...
|
erstellt am: 08. Okt. 2001 07:03 <-- editieren / zitieren --> Unities abgeben:
Hallo SWX 'ler, in der aktuellen Ausgabe des PC-Magazins ist eine Vollversion von Delphi 6. Da habe ich mich daran erinnert, daß ich ja mal Turbo Pascal :-) programmiert habe. Delphi 1 habe ich auch noch ein bisschen mitgekriegt. Nun meine Frage(n): Erstellt einer von Euch Programme fuer SWX mit Delphi ? Wie spricht man die API mit Delphi an ? Gruß Patrick
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
StefanBerlitz Guter-Geist-Moderator IT Admin (CAx)
Beiträge: 8756 Registriert: 02.03.2000 SunZu sagt: Analysiere die Vorteile, die du aus meinem Ratschlag ziehst. Dann gliedere deine Kräfte entsprechend und mache dir außergewöhnliche Taktiken zunutze.
|
erstellt am: 08. Okt. 2001 07:10 <-- editieren / zitieren --> Unities abgeben: Nur für Baltenweck
Hallo Patrick, tut mir leid, ich programmiere in VB und hab keinerlei Erfahrung in Delphi. Aber es muss eigentlich schon gehen, wenn Delphi COM-Objekte ansprechen kann. Du mußt dazu irgendwie (und genau das ist wahrscheinlich der Haken) an das SolidWorks-Objekt herankommen; in VB heißen die Zeilen dazu: Code:
Dim swApp As Object ' an SolidWorks anklinken Set swApp = CreateObject("SldWorks.Application")
Sobald du das hast, hast du gewonnen. Und ich bin mir sicher, so was muss es in Delphi auf geben. Caio, Stefan
------------------ -- Inoffizielle Solidworks Hilfeseite http://solidworks.cad.de EMail: Stefan.Berlitz@solidworks.cad.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ThiloT Mitglied Dipl.-Ing.
Beiträge: 50 Registriert: 16.10.2000
|
erstellt am: 08. Okt. 2001 14:34 <-- editieren / zitieren --> Unities abgeben: Nur für Baltenweck
Im Prinzip geht das Prima, sogar z.T. noch besser als mit VB. Leider hat sich SW dazu entschlossen, nicht nur die MFC zu verwenden, sondern auch dann und wann MFC-Objekte über die API rüberzureichen, anstatt meinetwegen ein Window-Handle, so dass man dann entweder tief in die Trickkiste langen muss oder eben zu VC++. Aber solange Du nicht in den Featrue-Manager schreiben willst etc. geht Delphi oder VB allemal. ------------------ CAD, FEM: http://www.acesgmbh.de SolidWorks-Tools: http://www.ecocom.com Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Baltenweck Mitglied Konstrukteur
Beiträge: 170 Registriert: 13.03.2001 Früher brauche man 3 Comodore, um zum Mond zu fliegen - heute braucht man 1 Ghz um Windows zu starten...
|
erstellt am: 09. Okt. 2001 09:05 <-- editieren / zitieren --> Unities abgeben:
Irgenwie hab ich mir das so einfach vorgestellt wie Stefan das beschrieben hat. Muesste so aehnlich wie in C++ funktionieren. Nur wie ? Vielleicht gibt es ja doch noch unter Euch den einen oder anderen Delphi-Programmierer ? Gruß Patrick Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Baltenweck Mitglied Konstrukteur
Beiträge: 170 Registriert: 13.03.2001 Früher brauche man 3 Comodore, um zum Mond zu fliegen - heute braucht man 1 Ghz um Windows zu starten...
|
erstellt am: 11. Okt. 2001 09:52 <-- editieren / zitieren --> Unities abgeben:
Vielen Dank fuer Eure Hilfe. Habe mich paralell mal in einem Delphi-Forum umgehoert und kam zu dem Ergebnis dass die API genauso einfach anzusprechen ist wie in VBA. Aussage dort war dass alles was mit VBA geht auch erst recht mit Delphi funktioniert, sogar angeblich noch besser. Fuer Delphi-Interessierte die Aufloesung: Uses ComObj; Var swApp, Modeldoc : OLEVariant; swApp := CreateOLEObject('SldWorks.Application'); Modeldoc := swApp.ActiveDoc; ModelDoc.SelectByID('Ebene1','PLANE',0,0,0);
in VBA waers zum Vergleich so gewesen: ModelDoc.SelectByID "Ebene1","PLANE",0,0,0 Ich hoffe ich finde noch jemand der auch Delphi+SWX interressiert ist.
Gruss Patrick
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 15. Okt. 2001 12:19 <-- editieren / zitieren --> Unities abgeben: Nur für Baltenweck
Auch ich sage herzlichen Dank für den Tipp! Auch ich bin auf diese Delphi6-Version gestoßen und habe mich an meine guten alten Turbo-Pascal-Tage erinnert. Mit diesen (vor Allem dem letzten) Tipp sollte es dann eigentlich klappen. klaus ------------------ Klaus Massler Alois Kober GmbH http://www.al-ko.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |