XProfan

- Page 2 -

Jörg
Sellmeyer

I meant too The SubClassProc. What is because in Your directory drin. As I said: by me crashes it too more frequently with "A" ex but even too with others Verzeichnissen.

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

07/16/09 ▲

Frank
Abbing

Stell time sure, that on the Pfadende no "/", or. "" standing. or. that it there standing, habs not any more so well in recollection. I mean, I had already these Problems so had with list view.dll.

07/16/09 ▲

Dieter
Zornow

thanks for Tipps, but it changes itself nothing.

@If: my subclassing is Perhaps unusual and simply, but it functions correct and might accordingly permitted his. If I the Subclassing herausnehme and on einfachen Click respond changes itself nothing on the crash.
@Jörg in the directory are normal Files, has but so too nothing To do, there it with the names BAdressen without trouble goes.
@Frank in the direction is everything ok, have me already any Paths Show let.

there it apparently no Solution gives, must I the thing well forsaking, though it me brennend interested what the reason is.

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

If one The subClassProc umgestellt has, then reicht one
Compile Mark Separation

Proc AddAssociatedIcon

    Parameters name$,i&,Imagelist&
    return 0//<--/pre>

so nothing crashes.

I Have of course with imageListen yet nothing started but without Icons can I in each directory change.

look time:
Compile Mark Separation

Proc AddAssociatedIcon

    Parameters name$,i&,Imagelist&
    var Hicon&= External("Shell32","ExtractAssociatedIconA",%hinstance,addr(name$),addr(i&))
    External("comctl32.dll","ImageList_AddIcon",Imagelist&,HIcon&)       Icon in Imagelist hinzufügen
    External("USER32.DLL","DestroyIcon",HIcon&)                         Handle löschen
    messagebox str$(imageList&),name$,0
    var a&=External("comctl32.dll","ImageList_GetImageCount",Imagelist&)
    messagebox "5","",0
    return a&

oc

without:
Compile Mark Separation

Proc PlusBackslash

    parameters pfad$
    declare pfad#,result$
    Dim pfad#,len(pfad$)+1
    string pfad#,0 = pfad$
    External("shlwapi","PathAddBackslashA",pfad#)
    result$ = string$(pfad#,0)
    Dispose pfad#
    return result$

oc

crashes the program not any more ex, at least that here: [...]

. I have simply bisl backward "geproggt" (in the senses the Minimalbeispieles) To it fehlerfrei working. the means naturally not, that Error not too on others to put emerged his can, but a working Base is seldom badly to that Fehlerfinden. ^^

Dieter
Zornow

OK, thanks

i'll it time try, if the by me too runs, I will whom Error certainly find, through hinzutun step for step.

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

Dieter
Zornow

@IF Thanks your preparatory work functions it now by me correct. I can Adressen zig time open. I have To Beginn first time any Api-functions so umgestellt How in your example, of Addr() To area# and with the Stringzuweisung of/ one Memory-Variables one zero-byte appended. already the has it brought. is me though unverständlich Profan ought to the right make and with String area#,0 already one zero-byte append. with addr(variable) must then apparently too very softly-softly bypass, best none use. in the attachment is the new version with icons and everything, could someone test times whether it now everywhere functions, the would super if it so would.

On each drop cordial Thanks, I had The hope already almost given, here yet weiterzukommen.

griddir.zip	5 kB

Hochgeladen:	07/17/09

Downloadcounter:
		Download

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

gladly happen!

from such reagierendem ListView could one too one Control make, then had one it always and everywhere and should not ums Drumherum concern. create("loadFile",getDir$("@"),10,10,200,200)

Frank
Abbing

your code liesse itself sure yet optimize. so see The Icons unfortunately right humble from, something fit not yet so integrally.
left a Fileliste through list view.dll, right the Result with your code.

Screen 17.07.2009, 20 Uhr 58, 58 Sek.png	30 kB

Hochgeladen:	07/17/09

Downloadcounter:
		Download

- Page 3 -

Dieter
Zornow

Yes, The Icons are blasser, probably because the origin differently is. with list view.dll have I but by me fixes, that not each File one Icon get, therefore have I another origin chosen. time see what itself there make can.

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

07/18/09 ▲