Autor Beitrag
Terra
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 307

Windows 7 Ultimate
Delphi® XE3
BeitragVerfasst: Mo 25.09.06 12:15 
Hallo !

Wollte mal fragen, ob mir jemand beschreiben kann mit welchen Befehlen ich die ersten 10 Bits in einer Datei löschen kann. Also nicht überschreiben sondern wirklich entfernen.

Wäre nett, wenn mir evtl. sogar jemand bissel source zur verfügung stellen kann. Oder halt ne sehr gute Beschreibung, da ich in diesem Bereich nicht so Fit bin.

Terra


Zuletzt bearbeitet von Terra am Mo 25.09.06 13:18, insgesamt 1-mal bearbeitet
wulfskin
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1349
Erhaltene Danke: 1

Win XP
D5 Pers (SSL), D2005 Pro, C, C#
BeitragVerfasst: Mo 25.09.06 12:32 
Hallo Terra,
die einfachste, aber möglicherweise nicht effizienteste Art, ist die Datei in einen TMemoryStream zu laden und danach ab der Position 11 zurück in die Datei zu schreiben.
Eleganter geht es wohl, wenn du die Datei für lese und schreibzugriff öffnest und ab der 11. Position einließt und direkt wieder schreibst. Es ist mir keine Funktion bekannst, welche die ersten 10 Bytes löschen kann!

Gruß Hape!

_________________
Manche antworten um ihren Beitragszähler zu erhöhen, andere um zu Helfen.
MrSaint
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1033
Erhaltene Danke: 1

WinXP Pro SP2
Delphi 6 Prof.
BeitragVerfasst: Mo 25.09.06 12:36 
Das würde die ersten 10 _Byte_ löschen. Er will aber die ersten 10 _Bit_ löschen. Mir ist direkt nichts bekannt, wie man das machen könnte. Die Datei ist ja in 8 Bit "Blöcke" aufgeteilt (wenn du ne Datei in einem Texteditor öffnest hat jedes Ziehcen 8 Bit). Das macht es schwierig die ersten 10 _Bit_ zu löschen, da du ja da über die Grenzen von 8 Bit hinauskommst... Wenn du dann einfach jedes Zeichen neu berechnest (praktisch ein Bitshift nach links um 10 Bit über alle Zeichen des Files hinweg) wird das ein bisschen ein gefrickel und ziemlich langsam! Was bessseres fällt mir aber nicht ein...


MrSaint

_________________
"people knew how to write small, efficient programs [...], a skill that has subsequently been lost"
Andrew S. Tanenbaum - Modern Operating Systems
Terra Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 307

Windows 7 Ultimate
Delphi® XE3
BeitragVerfasst: Mo 25.09.06 13:17 
Ach gagge .... meinte natürlich Byte und nicht Bit .. irgendwann bekomm ich den unterschied gebacken.

Terra