|
VBasic : AutoCAD und Delphi
BloodyMess am 01.04.2006 um 16:09 Uhr (0)
Hallo Ankaa,mag die Sprache Delphi zwar nicht so gern, aber habe es trotzdem geschafft dein Problem zu lösen. Wenn Du Acad schon öffnen kannst, hast sicher unter uses AutoCAD_tlb und ComObj schon eingebunden.Der Code für ein Button auf einem Formular mit ClickEvent zeichnet Dir einen Punkt bei der Koordinate (6, 6, 6).Weitere Beispiele kannst Du ja nun selber ausprobieren.Code:procedure TForm1.Button1Click(Sender: TObject);var Acad: AcadApplication; Doc: AcadDocument; Point: AcadPoint; p : OleVariant;b ...
|
| In das Form VBasic wechseln |
|
VBasic : AutoCAD und Delphi
Ankaa am 04.04.2006 um 09:16 Uhr (0)
Hallo.Tut mir leid, dass ich erst jetzt antworte, aber ich hatte in den letzten Tagen Probleme mit dem Internet. Da ich auch jetzt nicht zu Hause bin kann ich leider grad keinen Quelltext beifügen, werde dies aber schnellstmöglich tun. Wenn ich zu Hause bin werde ich den Code mal ausprobieren und hoffen, dass er funktioniert. Allerdings habe ich bisher nicht mit Acad: AcadApplication;sondern lediglich mitAcad: OLEVariant;gearbeitet. Funktioniert es trotzdem? Tut mir leid, ich kenn mich leider mit OLE-Progr ...
|
| In das Form VBasic wechseln |
|
VBasic : AutoCAD und Delphi
scj am 04.04.2006 um 10:20 Uhr (0)
Hier http://www.autocad.ru/cgi-bin/f1/board.cgi?p=42 sollten Informationen dazu zu finden sein.Mit besten Grüßen aus der RhönJochen www.black-cad.de
|
| In das Form VBasic wechseln |
|
VBasic : AutoCAD und Delphi
BloodyMess am 04.04.2006 um 22:35 Uhr (0)
Hi Ankaa,der Unterschied ist einfach nur, dass wir bei Acad einen anderen ObjektTyp festlegen. Ein Variant ist kann alles mögliche sein! Du kannst dort Strings, Doubles oder eben auch Objecte übergeben. Was das tolle an OleVariant-Typen ist kann ich Dir nicht sagen, aber sowas versucht man zu vermeiden. Zudem wir ja wissen, von welchem Typ unser Objekt ist -- AcadApplication .. genauso ist es mit AcadDocument und AcadPoint. Der Vorteil liegt darin, dass diese Objekte Eigenschaften und Methoden haben! Da ...
|
| In das Form VBasic wechseln |
|
VBasic : Dateinamen für die Änderung des Dateidatums verw. ...
ADM am 07.04.2006 um 19:53 Uhr (0)
Hallo VB-Gemeinde,ich habe folgemdes Problem:Ich habe z.B. eine Datei "scene20060315 17.25.53.jpg" und brauche die Änderung des Dateidatums und der -Uhrzeit an Hand des Strings des Filenamens. Das würde dann sein: 15.03.2006 & 17:25:53 bzw. 17:25 !!!Hintergrund:Videos mit dem Scenelyzer digitalisieren und damit super Standbilder machen. Diese tragen aber weder einen EXIF-Header noch das Dateidatum der Aufnahme - sondern das der Erstellung beim Überspielen. Einen TS gleich in das Bild einzubrennen ist der P ...
|
| In das Form VBasic wechseln |
|
VBasic : Dateinamen für die Änderung des Dateidatums verw. ...
ADM am 07.04.2006 um 22:25 Uhr (0)
Sorry - wir haben wohl aneinander vorbeigeredet ...Ein Bekannter sagte probiere es mal mit VB! Also ich suche ein Sript oder ein fertiges Programm mit dem ich die o.g. Dateien, die in einem Verzeichnis liegen, in einem Rutsch modifizieren kann.Beispiel:Ein kleines Programm (habe Windows XP), dem ich sage welches Verzeichnis ich bearbeiten will, und es ändert für mich das Datum und die Zeit aller Dateien in diesem Verzeichnis an Hand der Dateinamens, die Alle nach dem obigen Schema heißen. Natürlich ändern ...
|
| In das Form VBasic wechseln |
|
VBasic : AUTO-CAD / Menüzeile
Stelli1 am 28.04.2006 um 17:18 Uhr (0)
Zitat:Original erstellt von Cadzia:Hi Marando,am einfachsten, Du stellst die Frage nochmal im richtigen Board; hier wird sie nur schwer gefunden -- AutoCAD VBAStelli------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form VBasic wechseln |
|
VBasic : txt Datei
WERA am 20.06.2006 um 15:31 Uhr (0)
Habe so mein Anfänger SchwierigkeitenWill eine bestehende txt, in Notepad erstellt, Datei Zeile für Zeile auslesen. Zu meinem Entsetzen wurden alle Daten gelöscht.Nicht nur dass es so heiß ist, auch das noch Code:Public Class Form1 Dim Openfiledialog1 As String, Zeile As String Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Openfiledialog1 = "C:wickeldraehtewickeldraehte.txt" FileOpen(1, Openfiledialog1, OpenMode.Output) ...
|
| In das Form VBasic wechseln |
|
VBasic : txt Datei
WERA am 20.06.2006 um 16:03 Uhr (0)
http://msdn2.microsoft.com/de-de/library/microsoft.visualbasic.openmode.aspx Las das gerade:Wenn Sie sie für eine Eingabe öffnen, wird der Inhalt der Datei auch dann überschrieben, wenn Sie nicht direkt in die Datei schreiben. --Das gelesen: http://msdn2.microsoft.com/de-de/library/microsoft.visualbasic.filesystem.fileopen.aspx ------------------ wera [Diese Nachricht wurde von WERA am 20. Jun. 2006 editiert.]
|
| In das Form VBasic wechseln |
|
VBasic : txt Datei
WERA am 20.06.2006 um 16:27 Uhr (0)
Nochmal was probiert.Tatsächlich wird die Datei schon beim öffnen neu angelegt. Das ist gemein------------------ wera
|
| In das Form VBasic wechseln |
|
VBasic : txt Datei
Axel.Strasser am 20.06.2006 um 17:13 Uhr (0)
Hallo Wera,nehme mal an du bist inzwischan auf .net . ich habe das mit der Textdateiauswertung kürzlich so gelöst:Code: Private Sub Datei_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPPDatei.Click Dim i As UInteger Zählvariable Datei auswählen With dlgOpenDatei .ShowDialog() End With If dlgOpenDatei.FileName = "" Then txtDatei.Focus() Else txtDatei.Text = dlgOpenDatei.FileName DateiArray = IO.File.ReadAllLines(txtDatei.Text) i = 0 Do Until i DateiArray ...
|
| In das Form VBasic wechseln |
|
VBasic : txt Datei
WERA am 20.06.2006 um 18:07 Uhr (0)
nehme mal an du bist inzwischan auf .net --Ja habe so ähnliches was Du schreibst auch gelesen,war mir aber neu. Sehe schon ich sollte es wohl auch so machen.Danke erst mal .------------------ wera
|
| In das Form VBasic wechseln |
|
VBasic : txt Datei
Axel.Strasser am 20.06.2006 um 18:32 Uhr (0)
So wie ich es unter Deinen Links noch gesehen habe hast Du den Access Parameter gar nicht definiert:FileSystem.FileOpen(FileNumber, FileName, Mode, Access, Share, RecordLength)Access Optional. Eine Enumeration, die die für eine offene Datei erlaubten Operationen angibt: Read, Write oder ReadWrite. Wird standardmäßig auf ReadWrite festgelegt.Daraus ergibt sich Standard = readWriteWenn Du also auf dem "Alten" bleiben willst , dann solltest Du es mal mit dem Parameter versuchen.Axel
|
| In das Form VBasic wechseln |
