Dobrý den, před pár dny sme dostali na střední škole domácí práci. Udělat si vlastní komprimátor.. V delphi umíme mírn pokročilý základy a s tímhle si nevím rady. komprimační algoritmy bych tak nějak zvládl ( nemusí zmenšovat ale prostě fungovat). začal sem s tímhle soubor : file of byte;
a_byte: byte;
dál
if openDialog1.Execute
then begin
assignfile(soubor,openDialog1.FileName);
reset(soubor);
ShowMessage(\'Soubor : \'+openDialog1.FileName+\' byl načten!\');
ShowMessage(inttostr());
end;
a dál nevím jak s tím souborem pracovat , potřeboval bych si to bud někam vypsat nebo převíst, žádný readbyte mi nefunguje nebo třeba byteto něco .. Děkuju za jakoukoliv radu.