Filestream Datei nicht gefunden bei FOpenWrite

[EWeiss]

Delphi-Quellcode:

          if (FileExists(FileOne)) then
          begin
            GetImageSizeFromFile(FileOne, Width, Height);
            FileStream := TFileStream.Create(FileOne, fmOpenRead);

            if FileStream.Handle <> INVALID_HANDLE_VALUE then
            begin
              BufferSize := FileStream.Size;
              SetLength(sBuffer, BufferSize);

              FileStream.Read(sBuffer[0], BufferSize);
              if Assigned(sBuffer) then
              begin
                Offset := BufferSize + 1;
                FileStream.Free;

                FileStream := TFileStream.Create(FileOut, fmOpenWrite);

Compiler meldet Datei nicht gefunden..
Logisch die will ich doch mit

TFileStream.Create(FileOut, fmOpenWrite);

erst erstellen.
Hab ich da nen Denk Fehler ?

Mit
CreateFile(PWideChar(FileOut), GENERIC_WRITE, 0, nil, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);

funktioniert es mit dem FileStream aber nicht.


gruss

[samso]

Zitat von EWeiss:

Compiler meldet Datei nicht gefunden..

Der Compiler?

Probiere es mal mit fmCreate.

[EWeiss]

Zitat von samso:

Zitat von EWeiss:

Compiler meldet Datei nicht gefunden..

Der Compiler?

Probiere es mal mit fmCreate.

Ah danke versuche es mal.
Nur kann man dann noch schreiben ?

EDIT:
Ach ich mache es mit der API.
Zuviel Stress jetzt


gruss

[Lemmy]

Zitat von EWeiss:

Ah danke versuche es mal.
Nur kann man dann noch schreiben ?

versuch es... oder vielleicht doch mal die Hilfe anschauen?
http://docwiki.embarcadero.com/Libra...eStream.Create

[EWeiss]

Zitat von Lemmy:

Zitat von EWeiss:

Ah danke versuche es mal.
Nur kann man dann noch schreiben ?

versuch es... oder vielleicht doch mal die Hilfe anschauen?
http://docwiki.embarcadero.com/Libra...eStream.Create

Ach lass mal sagte ja schon mache es mit der API jetzt.
Aber auf deinen Tip wäre ich nicht gekommen.

Thema hat sich erledigt!
Habe es mit Win32 API mitteln gemacht.

gruss

[himitsu]

Zitat von EWeiss:

Ach lass mal

Dabei steht dort sogar das Warum.

fmCreate erstellt eine neue Datei und überschreibt notfalls eine Besehende.
fmOpenWrite öffnet eine bestehende Datei und löscht dabei den Inhalt.

Und genau das selbe Problem hat man auch mit der WinAPI, wenn man da eben statt CREATE_ALWAYS (fmCreate) ein TRUNCATE_EXISTING (fmOpenWrite) verwendet.

Zitat:

mache es mit der API jetzt

Ist also keine Lösung, wenn man dort den selben Fehler machen würde.