Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Dateivorschau unter Windows 7? (https://www.delphipraxis.net/156517-dateivorschau-unter-windows-7-a.html)

Whookie 4. Dez 2010 22:29

Dateivorschau unter Windows 7?
 
Ich habe einen eigenen Dateivorschaudialog gebaut (genauso wie Delphi 2007 das auch macht) um eigene Daten speichern bzw. laden zu können.

Das funktioniert aber unter Windows 7 nicht mehr, nun also die Frage, weiß jemand, wie man die Vorschau in den Dateidialog einbaut und geht das überhaupt?

Whookie 5. Dez 2010 11:09

AW: Dateivorschau unter Windows 7?
 
So, zumindestens hab ich einmal eine Lösung um den alten Dateidialog unter Windows 7 anzuzeigen. Der Orignialsourcecode (den ich von ExtDlgs übernommen habe) sieht wie folgt aus (Execute-Methode):

Delphi-Quellcode:
  if NewStyleControls and not (ofOldStyleDialog in Options) and not
     ((Win32MajorVersion >= 6) and UseLatestCommonDialogs) then
    Template := 'DLGTEMPLATE'
  else
    Template := nil;
Durch Ändern der Abfrage auf
Delphi-Quellcode:
(Win32MajorVersion >= 7)
wird zumindestens wieder die alte (XP) Variante des Dialogs angezeigt.

Das ist zwar eine Übergangslösung, aber schöner wäre es natürlich schon, wenn ich meine Vorschau (und zusätzlich ist da auch noch eine Auswahl was genau gespeichert werden soll drin) auch im neuen Windows 7 SaveDialog anzeigen könnte.

jfheins 5. Dez 2010 11:20

AW: Dateivorschau unter Windows 7?
 
Was denn für eine Vorschau? Kannst du vll. einen Screenshot davon machen?

Whookie 5. Dez 2010 11:59

AW: Dateivorschau unter Windows 7?
 
Zitat:

Zitat von jfheins (Beitrag 1066296)
Was denn für eine Vorschau? Kannst du vll. einen Screenshot davon machen?

Verwende einfach einmal einen TOpenPictureDialog oder einen TSavePictureDialog oder einen TOpenTextFileDialog oder einen TSaveTextFileDialog (Sourcecode findest Du unter %programfiles%\%Lieblings-Firma%\rad studio\x.0\Source\Win32\VCL\ExtDlgs.pas)

Whookie 6. Dez 2010 19:48

AW: Dateivorschau unter Windows 7?
 
*push*

Gibts wirklich niemanden der das mit der Dateivorschau in Windows 7 schon mal versucht hat?

Bummi 6. Dez 2010 20:32

AW: Dateivorschau unter Windows 7?
 
Ich schätze eher es versteht niemand wo dein Problem liegt....

s.h.a.r.k 6. Dez 2010 20:33

AW: Dateivorschau unter Windows 7?
 
*** delete ***

Whookie 6. Dez 2010 21:51

AW: Dateivorschau unter Windows 7?
 
Liste der Anhänge anzeigen (Anzahl: 4)
Zitat:

Zitat von Bummi (Beitrag 1066708)
Ich schätze eher es versteht niemand wo dein Problem liegt....

Also nochmal mit Bildern:

Zitat:

Zitat von Whookie (Beitrag 1066305)
Verwende einfach einmal einen ... TSavePictureDialog ..

... das sieht dann etwa so aus:
http://www.delphipraxis.net/attachme...1&d=1291671501

Zitat:

Zitat von Whookie (Beitrag 1066305)
... Sourcecode findest Du unter %programfiles%\%Lieblings-Firma%\rad studio\x.0\Source\Win32\VCL\ExtDlgs.pas)

Das ist bei mir konkret C:\Program Files (x86)\CodeGear\RAD Studio\5.0\source\Win32\vcl\ExtDlgs.pas .. hängt aber von Deiner Delphi-Version und Deinem Betriebssystem ab ...

Zitat:

Zitat von Whookie (Beitrag 1066243)
Ich habe einen eigenen Dateivorschaudialog gebaut ... um eigene Daten speichern bzw. laden zu können.

http://www.delphipraxis.net/attachme...1&d=1291671776

Zitat:

Zitat von Whookie (Beitrag 1066243)
Das funktioniert aber unter Windows 7 nicht mehr..

... denn da sieht der Dialog nun so aus:

http://www.delphipraxis.net/attachme...1&d=1291671846

Zitat:

Zitat von Whookie (Beitrag 1066243)
... nun also die Frage, weiß jemand, wie man die Vorschau in den Dateidialog einbaut ...

... damit zum Beispiel so aussieht:

http://www.delphipraxis.net/attachme...1&d=1291671922

Sherlock 7. Dez 2010 11:06

AW: Dateivorschau unter Windows 7?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Du brauchst also sowas wie im Anhang? Eventuell musst Du nur nachschauen, wie der kleine Button für das Einblenden des Vorschaufensters sichtbar gemacht werden kann.

Edith fand:
Delphi-Quellcode:
TFileOpenDialog.Options := [fdoForcePreviewPaneOn]
Sherlock

Whookie 7. Dez 2010 17:42

AW: Dateivorschau unter Windows 7?
 
Zitat:

Zitat von Sherlock (Beitrag 1066809)
Du brauchst also sowas wie im Anhang? Eventuell musst Du nur nachschauen, wie der kleine Button für das Einblenden des Vorschaufensters sichtbar gemacht werden kann.

Das ist es leider nicht so ganz, ich will ja keine Vorschau einer bestehenden Datei machen (dazu müsste man das IPreviewHandler-Interface implementieren), ich möchte vor dem Speichern ein paar Werte eingebbar machen (und auch eine grafische Auswahl der zu speichernden Daten ermöglichen - symbolisiert durch den grünen Stern in den Bildern).


Zitat:

Zitat von Sherlock (Beitrag 1066809)
Edith fand:
Delphi-Quellcode:
TFileOpenDialog.Options := [fdoForcePreviewPaneOn]
Sherlock

Ah sehr gut, das kommt ins Archiv, diese Funktion habe ich auch schon gesucht!


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:12 Uhr.

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