ExplorerListGadget - Verknüpfung [..] Ordner fehlt ??

[ts-soft]

hm, wer hat sich denn da die scheinbare Unterstützung ausgedacht?

Wenn ich das wüßte. Werde nachher mal im engl. Orginal nachsehen ob Andrè oder jemand anders aus dem PB-TEAM

Sollte man mal im Hilfethread erwähnen.

Das darfste als moderater Mensch gerne tun

Mir ist es aber auch gerade erst aufgefallen, nutze diese Explorer... Gadgets
eigentlich nicht, schränken doch etwas ein.

[AddMe]

Hallo ts-soft,

Mir ist es aber auch gerade erst aufgefallen, nutze diese Explorer... Gadgets eigentlich nicht, schränken doch etwas ein.

Hm, da ich Anfänger bin, sei mir dir Frage noch gestattet, was benutzt Du denn??

Gruß
Michael

[ts-soft]

Hm, da ich Anfänger bin, sei mir dir Frage noch gestattet, was benutzt Du denn??

Für eine Frage nutze ich nur ein Fragezeichen

Ich nutze ein ListIconGadget, das ich selber fülle (ExamineDirectory) und
selber sortiere.

Kannste hier mal in Action sehen.

[Andesdaf]

Ich nutze ein ListIconGadget, das ich selber fülle (ExamineDirectory) und
selber sortiere.

Ich auch (hab mal nen Dateicommander angefangen). Diese ExplorerListGadgets
kannste nicht so gut an deine eigenen Wünsche anpassen.

>Das darfste als moderater Mensch gerne tun
Der Moderator-Mensch wirds dann mal tun.

[Shardik]

Wenn man ts-softs Beispiel-Code ausführt und einen Doppelklick auf eine Excel-Datei (bzw. einen Dateinamen in einem ExplorerListGadget) ausführt, dann erscheint die Debug-Meldung, bei einem Doppelklick auf einen Ordner allerdings nicht!

[Shardik]

Man muß sich eigentlich nur einmal in der Hilfe die für das ExplorerListGadget beschriebenen zahlreichen Kontroll-Funktionen genauer ansehen, dann ist die Erkennung eines Doppelklicks auf einen Ordner- oder Dateinamen eigentlich kein Problem und mit PB-Bordmitteln lösbar:

Code: Alles auswählen

If OpenWindow(0, 216, 0, 600, 250, "ExplorerList",  #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ExplorerListGadget(0, 20, 20, 450, 160, "*.*") 

  Repeat
    Event = WaitWindowEvent()
   
    Select Event
      Case #PB_Event_Gadget
        If EventGadget() = 0
          If GetGadgetState(0) = -1
            If DoubleClickReported = #False
              Debug "Doppelklick auf Verzeichnis " + GetGadgetText(0)
              DoubleClickReported = #True
            Else
              DoubleClickReported = #False
            EndIf
          Else
            If EventType() = #PB_EventType_LeftDoubleClick
              Debug "Doppelklick auf Dateiname " + GetGadgetItemText(0, GetGadgetState(0))
            EndIf
          EndIf
        EndIf
    EndSelect
 
  Until Event = #PB_Event_CloseWindow
EndIf