Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#6

Re: Abfage einer FileListbox auf doppelte dateien

  Alt 2. Aug 2007, 18:58
Hallo Sascha,

warum prüfst du nicht gleich, ob die fragliche Datei auf der Platte existiert?

Delphi-Quellcode:
var
  fn: TFileName;
begin
  with FileListBox do
    fn := {Pfad + } Items[ItemIndex];
  if not FileExists(fn) or AllowReplace(fn) then
    DateiSpeichern(fn);
end;
Freundliche Grüße
  Mit Zitat antworten Zitat