Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: bitmap32 and xor

   
    by Aphton, 17. Sep 2011
  Ach echt? Habs ja auch nicht getestet, nur schnell hingetippt. Mal kucken...
  Ok. Stimmt sry, habe dec(Count) in der Schleife vergessen:
  
  
  procedure XorMemBlock(Source1, Source2, Destination: PByte; Count: Integer);
  begin
  while Count > 0 do
  begin
  Destination^ := Source1^ xor Source2^;
  inc(Source1);
• Forum: Win32/Win64 API (native code)

  AW: bitmap32 and xor

   
    by Aphton, 17. Sep 2011
  Oh warte mal. (Alles wieder löschen...)
  
  Deine MemoryAsString() ist auch fehlerhaft. Per CopyMemory kopierst du nicht einzelne Bits, sondern ganze Bytes. Deshalb ist diese Codesequenz auch falsch:
  
  CopyMemory(@buffer, p, 1);
  if buffer then
  result := result + '1'
  
  Dh. der Output ist womöglich auch inkorrekt!
• Forum: Win32/Win64 API (native code)

  AW: bitmap32 and xor

   
    by Aphton, 17. Sep 2011
  1. Ich verstehe nicht, was das Problem ist, weil du es nicht genau formuliert hast.
  Was genau ist der Fehler; was soll geschehen, was geschieht?
  
  2. In der Funktion IntToBin() ist ein potenzieller Fehler:
  Wenn Digits < als Anzahl der tatsächlichen Stellen (Index Fehler, da digits < 1 aber einer gewissen Anzahl von Schleifendurchläufen -> anders lösen)!