Large_Integer SetFilePointerEx Error 183

[Luckie]

Kommt drauf an, was du machen willst. Willst du auf den Fehlschlag reagieren auf 0.

Zitat:

If the function fails, the return value is zero. To get extended error information, call GetLastError.

[EWeiss]

Zitat von Luckie:

Kommt drauf an, was du machen willst. Willst du auf den Fehlschlag reagieren auf 0.

Zitat:

If the function fails, the return value is zero. To get extended error information, call GetLastError.

also SetFilePointer Rückgabe = DWORD also <> 0
  if SetFilePointer(hFile, li, nil, FILE_BEGIN) <> 0 then

gleicht error 183.

SetFilePointerEx Rückgabe = BOOL
  if SetFilePointerEx(hFile, li, nil, FILE_BEGIN) = false then

Was soll da jetzt falsch sein?

gruss

[Luckie]

Ah. Das ist der Krampf mit den unterschiedlichen Definitionen von Wahrheitswerten von Delphi und WinAPI. Was ist denn Fehler 183 überhaupt?

[Zacherl]

Zitat von Luckie:

Was ist denn Fehler 183 überhaupt?

Zitat:

ERROR_ALREADY_EXISTS
183 (0xB7)
Cannot create a file when that file already exists.

Macht irgendwie wenig Sinn im Zusammenhang mit der genannten API.

@Emil:
Kannst du mal mehr Code zeigen?

[EWeiss]

Zitat von Zacherl:

Zitat von Luckie:

Was ist denn Fehler 183 überhaupt?

Zitat:

ERROR_ALREADY_EXISTS
183 (0xB7)
Cannot create a file when that file already exists.

Macht irgendwie wenig Sinn im Zusammenhang mit der genannten API.

@Emil:
Kannst du mal mehr Code zeigen?

Jo

Ich öffne die Datei auf diese weise

Delphi-Quellcode:

    if FOpen(PWideChar(wsFile), 0, 0, hFileIn) = 0 then
    begin

Delphi-Quellcode:

function TAnimatePng.FOpen(FileName: PWideChar; AccessMode: DWORD; ShareMode: DWORD;
  var hFile: THandle): DWORD;
var
  AccessIs: DWORD;
  ShareIs: DWORD;
  FlagAndAttribute: DWORD;
begin
  AccessMode := min(max(AccessMode, 0), 2);
  //0 Nur lesend öffnen.
  if AccessMode = 0 then
    AccessIs := GENERIC_READ
  // 1 Nur zum schreiben öffnen.
  else if AccessMode = 1 then
    AccessIs := GENERIC_WRITE
  // 2 Zum Schreiben und lesen öffen
  else
  AccessIs := GENERIC_READ or GENERIC_WRITE;

  // Kohärenz zwischen 1-4
  ShareMode := min(max(ShareMode, 1), 4);
  // 1 Verweigerter Lese/Schreibzugriff.
  if ShareMode = 1 then
    ShareIs := 0
  // 2 Verweigerter Schreibzugriff
  else if ShareMode = 2 then
    ShareIs :=  FILE_SHARE_READ
  // 3 Verweigerter Lesezugriff
  else if ShareMode = 3 then
    ShareIs :=  FILE_SHARE_WRITE
  // 4 Vollerzugriff
  else
  ShareIs :=  FILE_SHARE_READ or FILE_SHARE_WRITE;

  if hFile = INVALID_HANDLE_VALUE then
    FlagAndAttribute := FILE_ATTRIBUTE_NORMAL or FILE_FLAG_WRITE_THROUGH
  else
  FlagAndAttribute := FILE_ATTRIBUTE_NORMAL;

  hFile := CreateFile(FileName, AccessIs, ShareIs, nil, OPEN_ALWAYS, FlagAndAttribute, 0);

  if hFile = INVALID_HANDLE_VALUE then
  begin
    Result := GetLastError();
    hFile := 0;
    exit;
  end;
  Result := 0;
end;

Hilft das ?

gruss

[Zacherl]

Zitat von EWeiss:

Hilft das ?

Jep. CreateFile sagt im Bezug auf OPEN_ALWAYS folgendes:

Zitat:

Opens a file, always.
If the specified file exists, the function succeeds and the last-error code is set to ERROR_ALREADY_EXISTS (183).
If the specified file does not exist and is a valid path to a writable location, the function creates a file and the last-error code is set to zero.

Dementsprechend vermute ich, dass bereits dieser Aufruf bereits den 183 erzeugt und durch irgendeinen Logik Fehler (evtl. Der, den Luckie schon gefunden hatte) liest deine nachfolgende Routine den alten Code aus.

Edit:
Warum machst du das ganze Gedöhns eigentlich manuell mit der WinAPI und verwendest nicht TFileStream ?

[EWeiss]

[QUOTE=Zacherl;1365342]

Zitat von EWeiss:

Hilft das ?

Jep. CreateFile sagt im Bezug auf OPEN_ALWAYS folgendes:

Zitat:

Opens a file, always.
If the specified file exists, the function succeeds and the last-error code is set to ERROR_ALREADY_EXISTS (183).
If the specified file does not exist and is a valid path to a writable location, the function creates a file and the last-error code is set to zero.

Dementsprechend vermute ich, dass bereits dieser Aufruf bereits den 183 erzeugt und durch irgendeinen Logik Fehler (evtl. Der, den Luckie schon gefunden hatte) liest deine nachfolgende Routine den alten Code aus.

Edit:

Zitat:

Warum machst du das ganze Gedöhns eigentlich manuell mit der WinAPI und verwendest nicht TFileStream ?

Dann gehe ich davon aus das ich gar nicht auf large_integer umsteigen muss oder? Hab noch keine APNG in der Größe von mehr wie 2GB gesehen.
Denn auch hier wird der selbe Fehler generiert.

Ignorieren oder was tun? Das ist die Frage. LOL

EDIT:

Zitat:

Warum machst du das ganze Gedöhns eigentlich manuell mit der WinAPI und verwendest nicht TFileStream ?

Würde ich gerne tun wenn ich wüsste wie.
Hab da noch nicht viel mit gemacht.



gruss

[Luckie]

Er will die VCL nicht einbinden. Und dazu zählen für ihn auch die nicht sichtbaren Klassen.