Antworten / Aufrufe | Themen mit dem Stichwort crator | |
---|---|---|
0 Antworten 6181 Aufrufe |
Touch Pack for Windows 7 Begonnen von ossinator
28. Mai 2009, 11:13:11 microsoft treiber mobile einstellungen fehlermeldung windows7 win7 vista download go-windows verweigert software zugriff 2010 programmieren windows programme fehler creator undefined probleme forum erstellen bing themen installieren welt touch booten microsofts | |
14 Antworten 18710 Aufrufe |
PDFCreator - wie unter WordVBA programmieren? Begonnen von Jean Raul
03. Juli 2008, 22:35:12 Hat schon mal jemand versucht, mit dem (kostenlosen) PDFCreator http://www.pdfforge.org/ WordVBA zu programmieren? Im Prinzip schaffe ich es ja mit dem mitgelieferten Beispielprogrammen. Ich habe aber Probleme damit, den Dateinamen zu programmieren, unter dem die pdf ausgegeben werden soll. Die PDF wird immer mit dem Pfad und Namen ausgegeben, der den Autosave-Optionen des Programms entspricht, aber nicht mit dem Namen, den ich im Programm vorgebe und haben will. So lautet mein VBA-Skript. Es soll die aktuell in Word geöffnete Datei ohne weitere Benutzereingriffe als PDF in den Pfad <PDFPfad$> unter dem Namen <PDFName$> speichern: [code] Public Function PDFDruck(Optional OhneMsg As Boolean) Dim Zwi$, PDFPfad$, PDFName$, pdfjob PDFPfad$ = "C:\Zwi" 'Ermittelt den Namen des aktiven Dokuments: Zwi$ = ActiveDocument.Name If InStr(1, Zwi$, ".", vbTextCompare) > 1 Then PDFName$ = Mid(Zwi$, 1, InStr(1, Zwi$, ".", vbTextCompare) - 1) Else PDFName$ = "Unbenannt" End If Set pdfjob = New PDFCreator.clsPDFCreator With pdfjob If .cStart("/NoProcessingAtStartup") = False Then MsgBox "PDFCreator kann nicht initialisiert werden. Bitte beenden Sie die PDFCreator-Prozesse.", vbCritical + _ vbOKOnly, "PrtPDFCreator" GoTo Ende End If .cOption("UseAutosave") = 1 .cOption("UseAutosaveDirectory") = 1 .cOption("AutosaveDirectory") = PDFPfad$ .cOption("AutosaveFilename") = PDFName$ .cOption("AutosaveFormat") = 0 '0 = PDF .cDefaultPrinter = "PDFCreator" .cPrinterStop = False .cClearCache ActiveDocument.PrintOut Background:=False End With '!!!!!!!!!!!!!!!!Wartet ab, bis fertig gedruckt ist:!!!!!!!!!!!!!! Dim sleepTime, maxTime, c sleepTime = 250 maxTime = 10 c = 0 Do While (pdfjob.cOutputFilename = "") And (c < (maxTime * 1000 / sleepTime)) c = c + 1 Sleep 200 Loop '!!!!!!!!!!!!!!!Ende des Abwartens!!!!!!!!!!!!!! Ende: Zwi$ = pdfjob.cOutputFilename pdfjob.cClose Set pdfjob = Nothing If Not OhneMsg Then If Len(Zwi$) > 0 Then MsgBox "Das Dokument wurde nach " & Zwi$ & " gespeichert.", vbInformation Else MsgBox "Beim Speichern als pdf ist ein Fehler aufgetreten!", vbCritical End If End If PDFDruck = Zwi$ End Function [/code] Auch die anderen COM-Funktionen des Programms sind mir ein Buch mit sieben Rätseln, da die Funktionen nach meiner Ansicht sehr schlecht dokumentiert sind. Weiß jemand mehr? Anbei die "Dokumentation" und die Beispieldateien: |
Microsoft wird das Touch Pack for Windows 7 den Herstellern von Windows-7-Rechnern anbieten, die Multitouch unterstützt. Für alle anderen User wird Microsoft voraussichtlich das Microsoft Touch Pack per Download und vermutlich gratis anbieten.
[b]Microsoft Surface Globe[/b]
Die Anwendung nutzt die 3D-Engine von Virtual Earth, um auf dem Bildschirm die Weltkugel einzublenden. Mit den Fingern kann die Ansicht gezoomt werden oder man springt an den gewünschten Punkt an der Erde.
[b]Microsoft Surface Collage[/b]
Bei dieser Applikation können aus einer Reihe von Bildern per Fingersteuerung Collagen erstellt werden. Dabei kann man die Bilder beliebig auf dem Bildschirm ablegen, vergrößern oder drehen.
[b]Microsoft Surface Lagoon[/b]
Hierbei handelt es sich um einen Bildschirmschoner, der auf Bildschirm-Berührungen reagiert. Hält man beispielsweise den Finger auf die virtuelle Wasseroberfläche, dann kommen neugierige Fische angeschwommen und positionieren sich rund um den Finger.
[b]Microsoft Blackboard[/b]
Blackboard ist ein Physik-Puzzle-Spiel. Mit den Fingern können auf der virtuellen Tafel Maschinen gebaut werden. Über Gesten können Gegenstände rotiert oder deren Größe verändert werden.
[b]Microsoft Rebound[/b]
Bei diesem Spiel tritt man gegen den Computer oder gegen einen menschlichen Gegenspieler an. Ziel ist es, mittels des Fingers den Ball in die Zone des Gegners zu steuern.
[b]Microsoft Garden Pond[/b]
In dem entspannenden Spiel gilt es Origami-Figuren per Fingergesten zum Ziel zu führen. Dabei tippt man auf die Wasseroberfläche, um die Figuren sanft anzustupsen und in die gewünschte Richtung zu lenken.
[size=8pt][i]Quelle: PCWelt.de / Microsoft.de[/i][/size]