Thema: Delphi TOpenDialog

Einzelnen Beitrag anzeigen

Benutzerbild von mirage228
mirage228

Registriert seit: 23. Mär 2003
Ort: Münster
3.750 Beiträge
 
Delphi 2010 Professional
 
#4

Re: TOpenDialog

  Alt 27. Jun 2004, 13:15
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
David F.

May the source be with you, stranger.
PHP Inspection Unit (Delphi-Unit zum Analysieren von PHP Code)
  Mit Zitat antworten Zitat