MemoryStream / Bitmap header

[EWeiss]

@Namenloser

Ohhh sorry muss dir recht geben.
Diese Zeile stand zu tief unter meiner abfrage da kann es nicht gehen.
Dann hat sich das erledigt.

CaptureX.BitmapStream.Position := 0;

Vielleicht kann ich das noch anhängen.

Code:

reader.ReadBytes(14); // skip bitmap file info headerbyte[] 
pixelData = reader.ReadBytes((int)(stream.Length - stream.Position));
byte[] bmiInfoHeader = reader.ReadBytes(4 + 4 + 4 + 2 + 2 + 4 + 4 + 4 + 4 + 4 + 4);
byte[] pixelData = reader.ReadBytes((int)(stream.Length - stream.Position));

Wie kann ich die 4 zeilen auf CaptureX.BitmapStream.ReadBuffer umlegen?

Danke

gruss

[EWeiss]

Kann mir niemand sagen wie ich den Stream auf der Basis dieser 4 zeilen auslesen kann?
Habe vieles vergessen
Und langsam schon peinlich wegen solcher dinge zu fragen.

gruss

[Aphton]

Die vier Zeilen da sind hässlicher Code!
Was soll denn bitte
reader.ReadBytes(4 + 4 + 4 + 2 + 2 + 4 + 4 + 4 + 4 + 4 + 4);
bedeuten?

Wer hat diesen Unfug programmiert? Für soetwas deklariert man structs und verwendet dann sizeof().
Es ist auf Anhieb nicht ersichtlich, was da geschieht.

Geh auf diese Seite, such die die BMP Spezifikation. BMP ist ganz einfach.
Man hat da nur ein zwei Header und das wars. Anschließend folgen Pixeldaten.
Versuchs mal mit selber schreiben anstatt zu übersetzen.. deine Quelle ist hässlich!

Ich hoff ich hab mich hiermit nicht im Ton vertan!

PS: Wenn ich mir die vier Zeilen nochmal genauer anschaue, ergibt das von vorne bis nach hinten logisch keinen Sinn. Zuerst werden 14 Bytes
übersprungen (mit "14" -.-), dann wird die Variable pixelData verwendet - hier muss man davon ausgehen, dass sie bereits irgendwo zuvor
deklariert wurde -> aber nein, zwei zeilen drunter wird sie erst deklariert?!
Zeile 2 und 4 sind identisch?!

[EWeiss]

Zitat:

Die vier Zeilen da sind hässlicher Code!

Jo mag ja sein
Das ist Original.

Code:

BinaryReader reader = new BinaryReader(stream);
stream.Position = 0; // ensure that what start at the beginning of the stream.
reader.ReadBytes(14); // skip bitmap file info header
byte[] bmiInfoHeader = reader.ReadBytes(4 + 4 + 4 + 2 + 2 + 4 + 4 + 4 + 4 + 4 + 4);
byte[] pixelData = reader.ReadBytes((int)(stream.Length - stream.Position));
atmoLiveViewCtrl.setPixelData(bmiInfoHeader, pixelData);

Zitat:

Wer hat diesen Unfug programmiert? Für soetwas deklariert man structs und verwendet dann sizeof().

Jemand bei MediaPortal ich komme mit dem bmiInfoHeader auch nicht klar.

die Function sieht so aus..
function setPixelData(bitmapInfoHeader: PSafeArray; pixelData: PSafeArray): HResult; stdcall;

Zitat:

Versuchs mal mit selber schreiben anstatt zu übersetzen

Ohne API und interner Informationen sollte das schwer fallen.
Versuche doch mal im net über AtmoWin und die Ansteuerung mit Delphi etwas zu finden.
Also bleibt mir letztendlich nichts anderes übrig als auf quellen zuzugreifen die vorhanden sind
auch wenn der Code (C#) noch so schlecht sein mag.

Zitat:

Ich hoff ich hab mich hiermit nicht im Ton vertan!

Nö ist kein Problem. steht dir frei zu sagen was du denkst (auch wenn es mir nicht weiter hilft)

Auf der anderen seite habe ich hier schon so viel Quelltext veröffentlicht als ich noch kein Aneurysma im Kopf hatte.
Wovon einige hier mit Sicherheit profitieren.
Warum macht man jetzt wegen 4 Zeilen einen solchen Aufstand.
Also entschuldige wenn ich versuche auf die ein oder andere Art versuche zurück zu erlangen was ich verloren habe!


gruss

[Zacherl]

Sofern dein Stream ein MemoryStream ist und PSaveArray einfach nur ein Pointer auf ein ByteArray ist, müsste folgendes funktionieren:

Delphi-Quellcode:

SetPixelData(
    Pointer(NativeUInt(Stream.Memory) + SizeOf(TBitmapFileHeader)),
    Pointer(NativeUInt(Stream.Memory) + SizeOf(TBitmapFileHeader) + SizeOf(TBitmapInfoHeader)));

[EWeiss]

Zitat von Zacherl:

Sofern dein Stream ein MemoryStream ist und PSaveArray einfach nur ein Pointer auf ein ByteArray ist, müsste folgendes funktionieren:

Delphi-Quellcode:

SetPixelData(
    Pointer(NativeUInt(Stream.Memory) + SizeOf(TBitmapFileHeader)),
    Pointer(NativeUInt(Stream.Memory) + SizeOf(TBitmapFileHeader) + SizeOf(TBitmapInfoHeader)));

Danke werde es mal versuchen.

Habe das Speicherleck auch gefunden
Nach jeden Durchlauf habe ich das Array von "posin" mit FillChar wieder auf 0 gesetzt.
Das führte dazu das der Speicher alle 1- 2 Min sich um 1 MB erhöht hat.
Hatte ich vorher auch noch nie so ein Problem.

gruss

[EWeiss]

Fehler gibt es keinen aber beim senden ändern sich die Farben nicht.
Muss mich da bei MP noch mal schlau machen.

Delphi-Quellcode:

  PSafeArray = ^TSafeArray;
  {$EXTERNALSYM tagSAFEARRAY}
  tagSAFEARRAY = record
    cDims: Word;
    fFeatures: Word;
    cbElements: Longint;
    cLocks: Longint;
    pvData: Pointer;
    rgsabound: array[0..0] of TSafeArrayBound;
  end;
  TSafeArray = tagSAFEARRAY;
  {$EXTERNALSYM SAFEARRAY}
  SAFEARRAY = TSafeArray;

Gruss und nochmal Danke für deine Hilfe.

Edit:
Ich muss den TMemoryStream an ein PsafeArray übergeben einmal für den Header und eins für die Pixeldaten.