Forum: Object-Pascal / Delphi-Language
Delphi
by teebee,
27. Sep 2005
Habe gerade festgestellt, dass mein Beispiel ab einschl. Delphi 6 nicht problemlos funktioniert. Ab da wird nämlich eine OPENFILENAME-Strukur verwendet, die zusätzliche Felder beinhaltet (für Windows 2000 aufwärts), u. a. ein Flag zum Ein- und Ausschalten der Places-Bar. Setzt man jetzt die Strukturgröße mitofn.lStructSize := sizeof(ofn);erkennt Windows, dass man die neue Struktur verwendet und...
Forum: Object-Pascal / Delphi-Language
Delphi
by teebee,
26. Sep 2005
Der 'neue' Style heisst Explorer-Style, siehe mein erstes Posting.
Gruß, teebee
Forum: Object-Pascal / Delphi-Language
Delphi
by teebee,
26. Sep 2005
:gruebel: Ich weiss nicht so recht, wo das Problem ist. Meine Lösung kannst Du einfach in ein Projekt pasten, Formular mit einem Button, OnClick-Event verbinden, fertig. Dann kannst Du von da aus schrittweise Erweiterungen vornehmen. Wie Olli schon gesagt hat, nicht vergessen, CommDlg einzubinden.
Gruß, teebee
Forum: Object-Pascal / Delphi-Language
Delphi
by teebee,
26. Sep 2005
Das ganze ist ja schön und gut, hat aber einen kleinen Haken: Wenn man den Dialog im Explorer-Style haben möchte, kommt in der Hook-Procedure kein WM_CTLCOLORDLG an. Windows erzeugt dann nämlich den neuen Dialog als Child eines unsichtbaren Standard-Dialogs und die DialogProcedure des Standard-Dialogs bekommt die Nachricht. Man muss also irgendwie in die DialogProc des unsichtbaren Parents der...