Einzelnen Beitrag anzeigen

RGH

Registriert seit: 30. Sep 2006
Ort: Nußloch
4 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: GetFileOpenName funktioniert nicht unter TurboDelphi

  Alt 30. Sep 2006, 17:34
Hallo,

ich habe es jetzt hinbekommen: Ich habe einfach mal die commdlg.pas aus Delphi 5 (es zahlt sich eben doch aus, wenn man in die Pro-Version mit Quellcodes investiert) in mein Projektverzeichnis kopiert und siehe da, jetzt klappt es auch mit der Nachbarin, äh ... bzw. deren Windows 95 und 98!

Zuvor hatte ich natürlich die Units verglichen: DIe TOpenFile-Struktur hat in TurboDelphi ein paar Felder, 3 um genau zu sein, mehr. Der ganze Rest ist, bis auf einige Definitionen für andere Betriebssysteme, identisch. Ich nehme nun einfach an, daß Windows 95 und 98 diese Felder noch nicht kennen und daher eben den Dialog nicht anzeigen.
BTW: der CommDlgExtendedError war unter Win 9x "1", während GetLastError "0" ergab.

Kurz: Hier wäre vielleicht im Quellcode der Unit ein Compilerschalter angebracht gewesen, der zwischen Win 9.x und NT/XP unterscheidet.

Gruß
Roland
  Mit Zitat antworten Zitat