Einzelnen Beitrag anzeigen

Kunoishi

Registriert seit: 26. Dez 2002
Ort: Berlin
140 Beiträge
 
Delphi 5 Standard
 
#1

beim Programm öffnen die Daten automatisch laden

  Alt 19. Sep 2009, 18:32
ich habe ein kleines Programm mit den ich meine Adressen verwalte. Diese Daten speichere ich mit *.dat ab.
Beim laden der Daten muß ich immer über das Fenster "öffen" gehen. zumindest derzeit
da ich das ganze über
Delphi-Quellcode:
procedure TMDIChild.FileOpenClick(Sender: TObject);
begin
  OpenDialog1.Title := 'Adressdaten Öffnen';
  OpenDialog1.DefaultExt := '.dat';
  OpenDialog1.Filter := 'Adress-Daten (*.dat)|*.dat|Alle Dateien (*.*)|*.*';
  OpenDialog1.Options := [ofAllowMultiSelect, ofPathMustExist,ofShowHelp];
  OpenDialog1.Options := [ofPathMustExist,ofShowHelp];
  if OpenDialog1.Execute then
   begin
    szUDatei := Opendialog1.Filename;
    Adressliste.Load(Opendialog1.Filename);
    Adressliste.Show(Adressuebersicht);
    bUChange:=false;
   end;
jetzt möchte ich aber, dass die Daten automatisch beim Programmstart mit da sind ohne das ich was anklicke oder aussuchen muß.
habt ihr eine Idee.
  Mit Zitat antworten Zitat