Einzelnen Beitrag anzeigen

Benutzerbild von Jens Hartmann
Jens Hartmann

Registriert seit: 11. Jan 2009
Ort: Wilnsdorf
1.439 Beiträge
 
Delphi XE2 Professional
 
#15

Re: Einlesen von alten Datensätze (Textdatei) in Datenbank

  Alt 4. Okt 2009, 09:36
Hallo nochmal zusammen,

habe die ganze Sache jetzt wunderbar am laufen. Dank auch an Lucki für die gute Ausarbeitung und Beschreibung.

FINDALLFILES

Jetzt aber mal noch eine Frage dazu. Die Progressbar, die in der Demo genutzt wird, wird durch die Ordnerebenen errechnet.

Delphi-Quellcode:
    FFM_MAXFOLDERS:
      begin
        ProgBarGesamt.Max := Msg.WParam;
und dann über den aktuellen Ordner zum laufen gebracht.

Delphi-Quellcode:
    FFM_PROGRESS:
      begin
        ProgBarGesamt.Position := Msg.WParam;
        Caption := IntToStr(Msg.WParam * 100 div ProgBarGesamt.Max) + '%';
Gibt es eine Möglichkeit PorgBarGesamt.Max auf die Anzahl der TXT Dateien zu setzten, die sich in all den Ordner befinden und die ProgBarPosition darüber laufen zu lassen.

Danke schon mal

MFG

Jens
Jens Hartmann
Das Leben selber ist zu kurz, also nutze jeden Tag wie er kommt.
  Mit Zitat antworten Zitat