Bild speichern -> Exception

[Airblader]

Hi,
ich versuche gerade mal selbst ne Kompo zu erstellen, allerdings hab ich ein Problem.

Wenn ich eine BitMap speichern will, bekomm ich folgendes:

Zitat:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt Project1.exe ist eine Exception der Klasse EFCreateError aufgetreten. Meldung: 'Datei C:\Programme\Borland\Delphi6\Projects\18-03-2005\21-51-03.bmp kann nicht erstellt werden'. Prozeß wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.
---------------------------
OK Hilfe
---------------------------

Zuweisen tu ich das ganze Ding so:

Delphi-Quellcode:

pPath := ExtractFilePath(ParamStr(0)) + StringReplace(DateToStr(Date),'.','-', [rfReplaceAll]) + '\' + StringReplace(TimeToStr(Time),':','-', [rfReplaceAll]) + '.bmp';

if fileexists(pPath) then
begin
     i := 1;
     while fileexists(pPath) do
     begin
          pPath := ExtractFilePath(ParamStr(0)) + StringReplace(DateToStr(Date),'.','-', [rfReplaceAll]) + '\' + StringReplace(TimeToStr(Time),':','-', [rfReplaceAll]) + '_' + IntToStr(i) + '.bmp';
          Inc(i);
     end;
end;

Naja, mach ich jedenfalls nen "Hardcoded"-Dateinamen a la "I:\datei.bmp"; funktioniert es tadellos.

Kann mir jemand sagen was ich schon wieder übersehen hab? *g*

MfG,
air