[DELPHI] Zmiana bajtów w pliku

[alek12]

Więc tak udało mi się coś zrobić :

 

KOD While I<>10 do

begin

 

a.position:=a.position+1;

c:=$FF;

a.write(C,1);

I:=i+1;

 

end;

end;

 

Tylko od razu po wykonaniu tej funkcji program się wiesza, i nie wiem dlaczego

 

Bez While position doskonale działa. Mi się zdaje że wina stoi w C:=$FF ale nie jestem pewien.

[alek12]

Możecie mi powiedzieć co z ta pętlą jest nie tak :

a.position:=0;

KOD for i:=0 to 10 do

begin

 

a.position:=a.position;

c:=$FF;

a.write(C,11);

a.Position:=a.Position+1

 

end;

a.free;

 

Wszystko wygląda poprawnie ale po wywołaniu tego zostały odczytane złe bajty taki cały rozsyp po pliku a miał odczytać ich 11 i zacząć od bajtu pod nr 0

[DevPort]

Żal mi Ciebie alek12, pytasz o podstawy, ktore w przypadku pisania edytora hex powinnes znac bez problemow. Pytales, czym jest position, a ja Ciebie zapytam czy wiesz czym jest google? jak go uzywac? Mocno sie zastanow czy warto 'wyplywac na tak glebokie wody' bez znajomosci podstaw.

 

ps. post pisany na ekranie k510i 160x128 px ;P (nudzi sie czlowiekowi w pracy)

[alek12]

No to ja wiem na jakiej zasadzie działa position << określa ona bajt od którego ma się zacząć odczyt/zapis. A żeby zapisać coś na tym odczytanym bajcie to złoży write. Więc zrobiłem pętle która będzie odczytywała poklei bajty i zapisywała na nich np $FF

[xevil21]

jesteś zajebisty :angry: , przykład:

 

a.position:=a.position;

 

pełna kontrola nad kodem!

[alek12]

Po **** tego dalej to samo no ale już zrobiłem Temat do zamknięcia

[alek12]

Znacie jakiś komponent który działa jak peyloaud tylko pod D7??

[Dexarz]

a co google zgubiło okulary ???

[alek12]

Jak zwykle odpowiedz na poziomie , nie ale nic nie znalazłem nie wiem pod jaką frazą

[xevil21]

Jak zwykle odpowiedz na poziomie , nie ale nic nie znalazłem nie wiem pod jaką frazą

 

Twoje pytania to dopiero trzymają poziom!

 

Pozdrawiam!

[Dexarz]

nie potrafisz myśleć ,czy wolisz mieć wszystko podane na tacy ,żeby było cacy ??

 

Szukaleś pod "peyloaud dla Delphi 7" i kombinacje ??

 

A może w pakiecie tych komponetow ,jest plik z nazwą d7 czy cos podobnego ??

[Toster]

Ok, starczy OT.