Wieder mal Shellexecute

[sminds]

Habe mir einige Posts angeschaut, jedoch will das Shellexecute auf Windows 98 - Rechnern nicht funktionieren

z.B.

Delphi-Quellcode:

ShellExecute(Application.Handle, 'open',
                     pchar('test.doc'),
                     nil,
                     PChar('c:\'),
                     sw_ShowNormal);

ShellExecute(0, 'open',
                     pchar('c:\test.doc'),
                     nil,
                     '',
                     sw_ShowNormal);

ShellExecute(Application.Handle, '',
                     pchar('c:\test.doc'),
                     nil,
                     '',
                     sw_ShowNormal);

funktioniert unter Windows XP ohne Probleme, unter Windows 98 jedoch nicht (es öffnet sich nichts).
Wenn ich im Explorer die Dateien anklicke, öffnen sie sich mit Word. Laut Microsoft müßte Shellexecute ab Windows 95 und NT 3.5 funktionieren, ....

Wäre Dankbar, wenn mir jemand helfen könnte... vielleicht gibt es eine alternative Funktion, Dateien in Delphi 7.x zu öffnen.

Egon.

[mh166]

sVielleicht liegts daran:

Zitat von Der PSDK:

Windows 95/98/Me: ShellExecute is supported by the Microsoft Layer for Unicode. To use this, you must add certain files to your application, as outlined in Microsoft Layer for Unicode on Windows 95/98/Me Systems.

Keine Ahnung, obs das is, aber such einfach mal im PSDK/MSDN danach.

mfg, mh166

[MathiasSimmack]

Daran liegt´s nicht. "ShellExecute" geht auch unter 9x/ME problemlos.

[sminds]

Laut Microsoft sind dies die Voraussetzungen und diese habe ich überprüft.

Minimum DLL Version shell32.dll version 3.51 or later
Custom Implementation No
Header shellapi.h
Import library shell32.lib
Minimum operating systems Windows NT 3.1, Windows 95
Unicode Implemented as ANSI and Unicode versions

@MathiasSimmack: kannst Du mir bitte sagen, welche shell32.dll Du bei Windows 98 verwendest?


Danke,
Egon.

[MathiasSimmack]

Kann ich dir nicht sagen. Ich habe gerade keinen 98er-Rechner zur Hand. Das spielt aber auch keine Rolle, weil ich bisher noch nie Probleme mit "ShellExecute" hatte. Die Nummer ist aber 4.noch was, AFAIK.

Andere Fehlerquellen kannst du mit Sicherheit ausschließen?

[sminds]

Zitat von MathiasSimmack:

Kann ich dir nicht sagen. Ich habe gerade keinen 98er-Rechner zur Hand. Das spielt aber auch keine Rolle, weil ich bisher noch nie Probleme mit "ShellExecute" hatte. Die Nummer ist aber 4.noch was, AFAIK.

Andere Fehlerquellen kannst du mit Sicherheit ausschließen?

Habe z.B. das Program Exelnk getestet, das freundlicherweise hier gepostet wurde. Unter XP werden alle LNK geöffnet, unter 98 nicht.

[MathiasSimmack]

Schon mal das ausprobiert. Nur zum Testen. Wenn das auch nicht geht, dann würde ich mal behaupten, stimmt entweder mit deinem Windows oder mit deiner Delphi-Version was nicht.

[sminds]

Zitat von MathiasSimmack:

Schon mal das ausprobiert. Nur zum Testen. Wenn das auch nicht geht, dann würde ich mal behaupten, stimmt entweder mit deinem Windows oder mit deiner Delphi-Version was nicht.

Vielen Dank , damit geht es bei mir auf NT, 98 & XP.