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 TOpenDialog (https://www.delphipraxis.net/24841-topendialog.html)

Insider2004 27. Jun 2004 11:54


TOpenDialog
 
Hallo,

kann man beim OpenDiaog die Einstellungen wie z.B. Ansicht-Optionen, Fenstergrösse
irgendwie ermitteln/abspeichern, damit man nicht bei jedem Aufruf neu rummachen muss ?

:wall:

mirage228 27. Jun 2004 12:00

Re: TOpenDialog
 
Hi,

möchtest du es in einer Datei oder in einer Variable speichern?

mfG
mirage228

Insider2004 27. Jun 2004 12:08

Re: TOpenDialog
 
egal. Ist da ein Unterschied?

mirage228 27. Jun 2004 12:15

Re: TOpenDialog
 
Zitat:

Zitat von Insider2004
egal. Ist da ein Unterschied?

Naja,

wenn du es in eine Variable speicherst, ist es nur solange gültig solange dein Programm läuft.
Speicherst du es in eine Textdatei kannst du die Einstellung beim Programmstart wieder laden.

Du kannst das ganze in eine Variable des Typs TOpenOptions und diese dann immer dem entsprechendem OpenDialog zuweisen.

Speichern bzw. Laden ginge dann so (Ini-Datei)
Delphi-Quellcode:
uses
  IniFiles, TypInfo;

// ...
var
  i: Integer;
begin
  // Speichern
  with TIniFile.Create('datei.ini') do
  begin
    for i := integer(low(TOpenOption)) to integer(high(TOpenOption)) do
      WriteBool('settings', GetEnumName(TypeInfo(TOpenOption), i),
        TOpenOption(i) in OpenOptions);
    Free;
  end;

  // Lesen
  with TIniFile.Create('datei.ini') do
  begin
    OpenOptions := [];
    for i := integer(low(TOpenOption)) to integer(high(TOpenOption)) do
      if ReadBool('settings', GetEnumName(TypeInfo(TOpenOption), i),
        False) then
          Include(OpenOptions, TOpenOption(i));
    Free;
  end;
end;
OpenOptions ist hier die Variable die benutzt um die Einstellungen zu speichern.

Ich hoffe das hilft dir weiter.

mfG
mirage228

Insider2004 27. Jun 2004 12:29

Re: TOpenDialog
 
... nicht schlecht, Danke. Ich brauch aber erstmal nur die Ansicht-Option (grosse Symbole, kleine Symbol, ...,Minaturansicht)
und die Fenstergrösse. Die Ansicht-Option ist, soviel ich gesehen habe, nicht in TOptions enthalten.

Keldorn 27. Jun 2004 12:30

Re: TOpenDialog
 
Hallo

@mirage228: bist du da sicher? was nützt dir das? Topenoptions ist nichts, was man auch im Opendialog einstellen könnte. größe und die ansichtoptionen ist per Eigenschaft gar nicht möglich.

@insider: such mal im Forum nach "Opendialog" und autor toms, dort ist ein codeschnippsel, wie du den opendialog zumindestens in eine Ansichtoption bewegst, ob du die aber abfragen kannst weiß ich nicht.

Mfg Frank

mirage228 27. Jun 2004 12:31

Re: TOpenDialog
 
Zitat:

Zitat von Keldorn
Hallo

@mirage228: bist du da sicher? was nützt dir das? Topenoptions ist nichts, was man auch im Opendialog einstellen könnte. größe und die ansichtoptionen ist per Eigenschaft gar nicht möglich.
Mfg Frank

Ups, sorry, hatte Insider's Beitrag nicht ganz zu Ende gelesen... :oops:

mfG
mirage228

Insider2004 27. Jun 2004 12:43

Re: TOpenDialog
 
@Keldorn: das ist genau mein Thema:

http://www.delphipraxis.net/internal...ght=opendialog

Leider ist das ziemlich Fake'ig gemacht (mit messages etc.). Geht wohl nicht einfacher. Die VCL unterstütz das gar nicht so richtig.


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:52 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