TFileStream Fehler

[himitsu]

Ohh, dann hatten se das unbemerkt irgendwann behoben. (im XE war es noch $FFFF, wo ich gestern nur mal schnell in den Code schaute )

Wer hätte den ahnen können, dass es nach 20 Jahren mal repariert wird.

[samso]

Zitat von himitsu:

(im XE war es noch $FFFF, wo ich gestern nur mal schnell in den Code schaute )

Sorry, aber das glaube ich nicht, denn in der offiziellen Dokumentation steht etwas anderes VCL/XE/en/Classes

[himitsu]

Als wenn jemals in der Hilfe immer die Wahrheit drin stand.

Ich war mir ganz sicher gestern noch ein

Delphi-Quellcode:

const 
  fmCreate = $FFFF;

gesehn zu haben, als ich nach fmShareExclusive suchte.

Hmmm, stimmt, du hast Recht.

Aber fand grade nur noch diese Stelle (vermutlich diese Stelle im Augenwinkel gehabt)

Delphi-Quellcode:

constructor TFileStream.Create(const AFileName: string; Mode: Word; Rights: Cardinal);
var
  LShareMode: Word;
begin
  if (Mode and fmCreate = fmCreate) then
  begin
    LShareMode := Mode and $FF;
    if LShareMode = $FF then
      LShareMode := fmShareExclusive; // For compat in case $FFFF passed as Mode

und dich denke nicht, dass mir die Reste der alten Delphi 4, 7, TurboPascal und FreePascal unter die Augen kamen.