Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Dateieigenschaften anzeigen (https://www.delphipraxis.net/34738-dateieigenschaften-anzeigen.html)

Moyyer 27. Nov 2004 15:56


Dateieigenschaften anzeigen
 
Hallo Alle Zusammen!

Ich habe mir ein ID3-Tag Programm für meine MP3s geschrieben. Funktioniert alles super(Hab im Forum viel gefunden).

Nun habe ich ein Problem, was ich nicht gefunden habe. :roll: :cry:
Ich möchte von einer Datei die Dateieigenschaften öffnen, so als wenn man rechte Maustasten->Eigenschaften klickt.
Und als 2. möchte ich das er gleich auf die Registerkarte Dateiinfo geht.

Hat jem. eine Idee? thx @ all :-D

MfG Moyyer

Moyyer 28. Nov 2004 11:23

Re: Dateieigenschaften anzeigen
 
Hat keiner eine Idee? :gruebel: :coder2:

gkoeder 28. Nov 2004 11:35

Re: Dateieigenschaften anzeigen
 
Hallo!

Probiers mal hiermit:

Code:
function ShowFILEPROPERTIESDialog(hWndOwner: HWND; const FILEName: string): Boolean;
var
  Info: TShellExecuteInfo;
begin
  with Info do
  begin
    cbSize := SizeOf(Info);
    fMask := SEE_MASK_NOCLOSEPROCESS or
             SEE_MASK_INVOKEIDLIST or
             SEE_MASK_FLAG_NO_UI;
    wnd := hWndOwner;
    lpVerb := 'PROPERTIES';
    lpFILE := pChar(FILEName);
    lpParameters := nil;
    lpDirectory := nil;
    nShow := 0;
    hInstApp := 0;
    lpIDList := nil;
  end;
  Result := ShellExecuteEx(@Info);
end;
also z.B.

ShowFILEPROPERTIESDialog(Application.Handle, 'd:\testfile.txt');

Greetings,
Gerald

Moyyer 28. Nov 2004 12:59

Re: Dateieigenschaften anzeigen
 
Hi gkoeder

Vielen Dank für die Funktion. Sie funktioniert.
Leider springt sie aber nicht automatisch zu Dateiinfo.

Wenn jem. eine Idee hat, wär ich sehr dankbar.

MfG Moyyer

P.S. Man muss in der uses-klausel die unit "shellapi" hinzufügen.

-NIP- 28. Nov 2004 13:59

Re: Dateieigenschaften anzeigen
 
Geht das nicht mit dem Index vom Tab?

-NIP-

Moyyer 28. Nov 2004 21:12

Re: Dateieigenschaften anzeigen
 
Hi

Ich hab mal auf MSDN geguckt, aber bin da nich viel schlauer daraus geworden.

Ich denk mal man muss Ihm einen Parameter geben, damit er zum Tab "Dateiinfo" springt, ich hab nur k.a. welchen.

Danke für jede weitere Antwort

MfG Moyyer

Moyyer 30. Nov 2004 15:35

Re: Dateieigenschaften anzeigen
 
Habs Leider nich hingekriegt. Hat noch jem. eine Idee?

MathiasSimmack 30. Nov 2004 15:38

Re: Dateieigenschaften anzeigen
 
Das wird so, denke ich, nicht funktionieren. :(

Das mit den Parametern für den Tab-Index kenne ich nur von Aufrufen per "rundll", usw. Aber das Problem dabei ist, dass es bei verschiedenen Windows-Versionen auch verschiedene Parameter sein können. Oder nimm bspw. die Internetoptionen: Hast du einen alten IE drauf, fehlt ja das Register mit den Cookie-Optionen. Demzufolge ist auch der Index immer anders.

Wenn es nicht eine direkte Möglichkeit gibt, die Seite mit den Infos anzuspringen, dann wäre die Lösung via "ShellExecute" immerhin ein Kompromiss. IMHO.

Moyyer 30. Nov 2004 15:43

Re: Dateieigenschaften anzeigen
 
Ich möchte eigentlich nur die Dateiinfo für MP3-Dateien haben. Ich könnte vorher überprüfen ob es eine MP3-Datei ist. Weißt du die Pararmeter für WinXP?

MathiasSimmack 30. Nov 2004 15:49

Re: Dateieigenschaften anzeigen
 
Nein, leider nicht. Ich hätte dir gern geholfen. Sorry.


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:39 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz