как сохранить/загрузить массив байтов в/из файла? delphi

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by 1n0y, 9 Sep 2011.

  1. 1n0y

    1n0y Active Member

    Joined:
    9 May 2009
    Messages:
    268
    Likes Received:
    266
    Reputations:
    2
    сабж. примеры из гугла после тяжелого дня мне не помогают :(
     
  2. DooD

    DooD Moderator

    Joined:
    30 Sep 2010
    Messages:
    1,173
    Likes Received:
    434
    Reputations:
    288
    а в чем собсно проблема?паскальным методом assignfile,reset,write... или через Tfilestream,либо апи.Толком изложи что не выходит?
     
    _________________________
  3. 1n0y

    1n0y Active Member

    Joined:
    9 May 2009
    Messages:
    268
    Likes Received:
    266
    Reputations:
    2
    как оказалось, проблемы в сохранении файла нет. юзаю такое:

    и это, слава богу, работает.
    но есть проблема в загрузке из этого файла - незнаю даже как подступится. массив: [1..21000000]
     
  4. DooD

    DooD Moderator

    Joined:
    30 Sep 2010
    Messages:
    1,173
    Likes Received:
    434
    Reputations:
    288
    блочное чтение попробуй
     
    _________________________
    1 person likes this.
  5. 1n0y

    1n0y Active Member

    Joined:
    9 May 2009
    Messages:
    268
    Likes Received:
    266
    Reputations:
    2
    справился-таки:

    PHP:
    var
      
    fs:TFileStream;
      
    Size Integer;
    begin
     fs
    :=TFilestream.Create(afile,fmOpenRead);
      try
       
    fs.Seek(0,soFromBeginning);
       
    fs.Read(arr,21000000);
      finally
        
    fs.Free;
      
    end;
    end;
    DooD, спасибо :)
     
Loading...