Beiträge von mumpel

Danke! TOP!

Zitat von eukalyptus

Oder schau dir das Beispiel zu _GUICtrlToolbar_LoadBitmap an

Kenne ich schon. Ich finde aber keine passenden Icons. Früher gab es sowas mal im Internet. )

Hallo!

Ich habe erfolgreich eine Toolbar integriert (https://www.autoitscript.com/autoit3/docs/l…lbar_Create.htm). Funktioniert auch wie es soll. Aber wo stehen die Iconnamen (z.B. $STD_FILEOPEN). Ich bräuchte z.B. "Schließen". In der GuiToolbar.au3 finde ich nichts. Danke!

Gruß, René

Problem gelöst. Ich habe einfach Opt('GUIOnEventMode', 1) und GUISetOnEvent($GUI_EVENT_CLOSE, '_CloseMainGui') entfernt. Jetzt kann ich mit GUIGetMsg arbeiten.

Ich danke allen Helfern!

Danke! Sehr gut! Da sind auch Datei-Icons drin. Aber wo baue ich da jetzt meine Schaltflächen ein (siehe Code aus dem anderen Script)?

          Switch GUIGetMsg()
                     Case $GUI_EVENT_CLOSE, $idButton_Close
                             ExitLoop
                     Case $idButton_Open
                          Global $sFile = FileOpenDialog("Wähle eine PDF-Datei", @ScriptDir, "PDF Files(*.pdf)", 3) ; put your own start folder here
                                      If @error Then
                                          MsgBox("", "Hinweis", "Es wurde keine Datei ausgewählt")
                                     Else
                                          $oIE.navigate($sFile)
                                     EndIf
          EndSwitch

Danke! Top! Funktioniert. Leider kann man wohl Office-Dateien nicht mehr im WebBrowser-Control anzeigen. Das Problem lässt sich aber nicht lösen, da man an die IE-Einstellungen nicht mehr rankommt. Der IE existiert ja nicht mehr.

BTW:

Auf meinem Desktop-PC deaktivieren sich immer die Line-Numbers. Kann man die irgendwie dauerhaft aktivieren? Auf meinem Notebook sind sie immer aktiv.

Danke! So funktioniert schon mal die Dateityp-Einschränkung. Die Umsetzung in Treeview ist schwierig.

Das Backslash wird automatisch hinzugefügt (If StringRight($sSourceFolder, 1) <> "\" Then $sSourceFolder &= "\"), wenn es nicht mit übergeben wurde. Startpfad ist @ScriptDir, befindet sich darin eine PDF-Datei, dann funktioniert es, ist da keine PDF-Datei drin wird der Ordner auch nicht rekursiv durchlaufen.

Local $hSearch = FileFindFirstFile($sSourceFolder & "*.pdf") hatte ich schon probiert, da bleibt die Liste leer.

Die Ordnerstrukur passt. Leider läuft jetzt "ishidden"in einer Endlosschleife. Eine Bschränkung auf PDF geht auch nicht.

Danke! Ich möchte es natürlich erstmal selber versuchen.

Ein bisschen weiter bin ich nun. Nur die richtige Ordnerstrukur und die Beschränkung auf PDF-, Word- und Excel-Dateien bekomme ich nicht hin. Word und Excel lasse ich jetzt direkt in den Programmen öffnen, PDF-Dateien im WebBrowser-Control. Vielleicht hat noch jemand eine Idee?

Danke! Schon sehr gut Nur erscheint die MsgBox nicht, und ich kann die Dateiformate nicht einschränken (auf *.pdf, *.doc*, *.xls*), das bekomme ich irgendwie nicht hin. Und die Ordnerstruktur passt nicht (siehe Bilder).

Zitat von water

"Das selbe" Ergebnis zu bekommen ist sehr, sehr aufwändig.

Ist es nicht. Ich bleibe beim WebBrowser-Control. Es geht jetzt nur noch darum, die Treeview-Inhalte richtig auszuwerten (vor allem auch die Elternknoten "zu finden", um daraus den korrekten Pfad zusammen zu stellen). Wenn ich im Treeview z.B. "Blinklichtanlage am Pedelec3.pdf" anklicke, soll das Dokument geladen werden. Da tue ich mich etwas schwer, passende Codes zu finden.

Zitat von water

Da Du in einer Firmenumgebung unterwegs bist

Nein, ich mache das privat, nicht für die Firma. Dann habe ich wenigstens was zu tun, und kann dazulernen. Ob der AG mal ein solches Regelwerks-Kompendium als Offline-Anwendung anbietet ist offen (Den Vorschlag habe ich schon eingereicht). Und wenn er das anbietet, dann sicher nur für Firmen-PCs mit Windows. Offiziell gibt es die Regelwerke nicht auf Privat-PCs (Zugang zur KRWD bisher nur über Firmengeräte).

Das ist einfach nicht das selbe.

Ich hatte auch schon etwas gefunden (ObjCreate("AcroPDF.PDF.1")). Das funktioniert aber entweder extrem träge, oder gar nicht. Da ist das WebBrowser-Control schon besser (das funktioniert, und auch schnell)

Zitat von water

Ich gehe mal suchen

Ich suche schon seit gestern. Ergebnisse nur für WebBrowser-Control. PDF funktioniert ja damit.

Zitat von water

Mit welcher Software erstellen die verschiedenen Berufsgenossenschaften ihr "Kompendium Arbeitsschutz"?

Das wird vom Jedermann-Verlag im Auftrag der Berufsgenossenschaften programmiert (Nicht jede BG gibt das Geld dafür aus). Das ist natürlich nichts für Hobby-Anwender/Programmierer, viel zu teuer. Da sind die Dokumente auch nicht im Klarformat abgelegt, sondern in komprimierten Dateien (Die werden temporär ins Temp-Verzeichnis extrahiert). Das Kompendium nutzt übrigens auch nur die IE-Engine, mal schauen wie lange das noch funktioniert.

Zitat von water

Vielleicht kann man das Tool beschaffen und somit das Problem elegant lösen?

Schon (vor langer Zeit) angefragt. Keine Chance. Ich hatte schon die Idee, das Kompendium so zu erweitern, dass man eigene Dokumente hinzufügen oder enthaltene Dokumente ändern kann (Dann müsste man auch nicht 3 Monate oder länger warten bis Gesetzesänderungen eingepflegt werden).

Zitat von water

Kann man davon ausgehen, dass auf den PC's Word, Excel und ein PDF Reader installiert ist?

Natürlich.

Zitat von water

Von welchen Formaten gehen wir aus? DOC und XLS (aslo binäres Format) oder DOCX und XLSX (also komprimiertes XML)?

I. d. R. die "neuen" XML-Formate. Die stellt das WebBrowser-Control (IE-Engine) aber nicht dar, und die Reaktion des IE kann nur über die Registrierungsdatenbank geändert werden (wird aber nicht gemacht), die Office-Dateien werden dann mit der standardmäßig verknüpfte Anwendung geöffnet. Oder der Anwender muss dann doch die Dateien in PDF konvertieren.

Anbei mal ein Bild mit der Struktur (in Zukunft können das auch mehrere Unterordner sein, auch weitere Unterordner in den Unterordnern. Ich habe auch den aktuellen Stand der au3 angehängt.

Zitat von water

Auf die Schnelle:
Suche nach "All type file Reader for Windows 7 free download" bringt z.B. https://windowsfileviewer.com/
Suche nach "Kostenlose Dateibetrachter" bringt z.B. https://pdf.wondershare.de/how-to/free-file-viewer.html

Das ist nicht das selbe wie das "Kompendium Arbeitsschutz".