Einzelnen Beitrag anzeigen

Benutzerbild von Coder
Coder

Registriert seit: 27. Feb 2004
Ort: Bochum
206 Beiträge
 
Delphi 3 Professional
 
#1

Dateien mit 3, GB mit Delphi 3 beatbeiten/Editieren möglich?

  Alt 29. Aug 2008, 17:36
Hallo, ich möchte 2 Dateien bearbeiten, die aber je ca. 3 GB groß sind.
Unter Delphi erhalte ich nur eine
Zitat:
Exception der Klasse EFOpenError.folgende Datei [Dateipfad+Name] kann nicht geöffnet werden
.
Wenn ich eine kleinere Datei (getestet mit 1,78 GB Datei) öffne habe ich keine Probleme.

Hab schon mit Delphi5 versucht und daher den Code mit int64 angepaßt. Erfolglos.
Gleiche Fehlermeldung.
Delphi-Quellcode:
procedure TForm1.Button4Click(Sender: TObject);
var fn: TFileName;
  newSize: int64;
Siz, i, v: integer;
  dd, t, s: string;
begin
if Edit1.Text = 'then exit;
     fn := Edit1.Text;
      with TFileStream.Create(fn, fmOpenReadWrite) do
      begin
        s := inttostr(Size);
        Free;
      end;
      Label5.Caption := 'Dateigröße: ' + s + ' Byte';
    end;
      Siz:=Strtoint64(dd);
end;
Woran liegt das?
hat das was mit Dateien mit weniger als 214483647 Bytes und TStream zu tun?
was kann ich tun?

Besonders, wenn ich später mal die SIZE vom TStream/ der Datei verändern möchte?
ICQ: 204141443
Delphi 3 Professional, Intel 2x 2,4Ghz, 3 GB-Graka, Sound-onBrd, --
außerdem D2S, D3Pro, D4S, D5S, D6S, D7S + Indy, Lazarus, VB5Std, VC++5Pro, Tasm4+5 - was braucht man mehr?
-
  Mit Zitat antworten Zitat