XProfan

Dieter
Zornow

Hello Thomas,

have it times under Win 7 32 bit tested. your Treeview shows not The right Files on. If I z.B. user open comes there ca. 10 time a directory "Windows" otherwise nothing. If I programs open becomes there only a File displayed The not at all there drin is.
as i my PDF-Reader link wished could I not, because Yes in programs nothing displayed becomes. ex this Time could I in List view then neither More scroll. More could I do not testing, since the integral things not funktionierten.

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

Thomas
Freier

Hello Dieter,
this is but pity. goes your example (zipper-attachment)?
then should I the Ordnerinhalt hold moreover Show.

treeview.zip	6 kB

Hochgeladen:	01/07/11

Downloadcounter:
		Download

Gruß Thomas
Windows XP SP2, XProfan X2

Dieter
Zornow

Hello Thomas,

the functions neither, depends well with the virtual Verzeichnissen of Win 7 together. the directory programs is Yes Real Program Files, becomes but as programs displayed. i think is under 64 bit yet worse, there it there Yes two Program Files gives. there must probably the whole Einleseroutine the Treeviews umgeändert go. it go only any Systemverzeichnisse wrong read, The normalen weg.

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

Thomas
Freier

Hello Dieter,

goes because The "Ordnerwahl" for "Dateipfade" under "Einstellung ändern" in the "A5 book Tool" ? go since the Ordner displayed and can select go?
having to that Filebrowser already "Pascal" kontaktiert, whether it Problems, what it verneinte, famous are. it operates but at a new Version.

Gruß Thomas
Windows XP SP2, XProfan X2

Uwe
''Pascal''
Niemeier

Hi Thomas!

having to that Filebrowser already "Pascal" kontaktiert, whether it Problems, what it verneinte, famous are. it operates but at a new Version.

have but too only XP

SeeYou
Pascal

Dieter
Zornow

Hello Thomas,

at A5 book Tool I had nothing tested, I me only on your pretended Files concentrate having.

@Pascal

the Filebrowser power XP too Problems, if it in Documente and Settings goes. in the Userbereich come here incorrect directories, teste time everything through. the I had then already fixes. under programs is with XP everything ok.

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

Thomas
Freier

means with Pascals Treeview are missing me XP in the List "schreibgeschützte", or. "versteckte", Ordner and Files.
Dieter, my question was: listet WIN 7 with @ChooseDir$("Verzeichnis dial:")
all the folders on?

Gruß Thomas
Windows XP SP2, XProfan X2

Thomas
Freier

good tommorrow Dieter,
have you got pleasure The d&d-Variante To testing?
be not happy so. through GetMessage have I plenty Problems with shell and LoadFile $. becomes then unending again opened. have one WaitMouse installed but the can't The Solution his. often helps only once The Notes to open and To close so d&d again goes. Z.Z. have I no Solution parat. Subproc?

Compile Mark Separation

while 1

    '  waitinput 1
    GetMessage
    case %umessage=16:break
    Case (Menuitem(109)) OR (Menuitem(2006)):BREAK
    '--------------------------------------------------------------further inquire
    plv_HitSortsLV(hList&)

    IF (%message=563)

        Let anzahl&= DragQueryFile(&WParam,$FFFFFFFF,PFilename#,261);
        Let i%=0

        While Lt(i%,anzahl&)

            DragQueryFile(&WParam,i%,PFilename#,261);
            filename$=String $(PFilename#,0)' caution, max 255 characters
            AddStrings filename$
            Inc i%

        Wend

        DragFinish(&WParam);

        WhileLoop GetCount(0)

            find$= @GetString$(0,(&loop-1))

            If substr$(find$,-1,".")="pdf"

                way$ = removeFileSpec(find$)+"\"
                x%=-1
                IS_ITEM

                if x%=-1

                    plv_SetRow(hList&, GetCount(hList&),(way$ + "|" + substr$(find$,-1,"\")),-1,0)

                endif

            EndIf

        EndWhile

        Clearlist
        setfocus(%hwnd)

    Elseif Menuitem(2002)

        shell "control printers"
        WaitMouse
        setfocus(%hwnd)

    Elseif Menuitem(2004)

        clear PDF_Druck$
        Text$=LoadFile $("Acrobat.exe, AcroRd32.exe, PDFXCview.exe","exe | *.exe")
        case substr$(Text$,-1,"\")="Acrobat.exe" : PDF_Druck$=Text$
        case substr$(Text$,-1,"\")="AcroRd32.exe" : PDF_Druck$=Text$
        case substr$(Text$,-1,"\")="PDFXCview.exe" : PDF_Druck$=Text$
        SetText Stat&, 1, "PDF-software: " + substr$(PDF_Druck$,-1,"\")
        WaitMouse
        setfocus(%hwnd)
        ' ......moreover inquire

    EndIf

EndWhile

pdf-serien-print-dd.exe	569 kB

Hochgeladen:	01/08/11

Downloadcounter:
		Download

Gruß Thomas
Windows XP SP2, XProfan X2

01/08/11 ▲

Dieter
Zornow

Hello Thomas,

@ChooseDir$("Verzeichnis dial:") shows everything correctly. on. by me functions your D&D not. I bring no Files in that Program.

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

01/08/11 ▲

Thomas
Freier

Hello Dieter,
I had this View source [...]

uses. goes the with you solo?

I lay the first time aside and there we none Frost More having I will in the river whom "Grönländern" nachstellen. After success finally again freshly gebeitztes Filet.

Gruß Thomas
Windows XP SP2, XProfan X2

01/08/11 ▲

Dieter
Zornow

Hello Thomas,

the code functions by me neither reliably. I use for me a something others code and important, I definiere WM_Dropfiles (563) as usermessage, the goes then by me very reliably.

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

01/09/11 ▲