AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi D11.2 64Bit inaccessible value (gelöst)
Thema durchsuchen
Ansicht
Themen-Optionen

D11.2 64Bit inaccessible value (gelöst)

Ein Thema von venice2 · begonnen am 9. Sep 2022 · letzter Beitrag vom 9. Sep 2022
 
venice2
(Gast)

n/a Beiträge
 
#1

D11.2 64Bit inaccessible value (gelöst)

  Alt 9. Sep 2022, 01:12
Seit D11.2 tritt unter 64Bit folgender Fehler auf.

Beim initialisieren von lPixel bekomme ich "inaccessible value"
Der selbe Quelltext unter 32Bit funktioniert.
Unter D11 hat auch 64Bit funktioniert jetzt plötzlich nicht mehr.

Hat vielleicht jemand eine Info was geändert wurde?

Delphi-Quellcode:
procedure TSkinEngine.CreateFormRegion(hParent: HWND; TransColor: COLORREF);
var
  p32: PByte;
  lPixel: PRGBQuad;
begin
  // nur relevanter Quelltext des Fehlers
  p32 := PByte(integer(bm.bmBits) + (bm.bmHeight - 1) * bm.bmWidthBytes);
  for Y := 0 to bm.bmHeight - 1 do
  begin
    X := 0;

    while X < bm.bmWidth do
    begin
      M := X;

      lPixel := PRGBQuad(integer(p32) + X * sizeof(cardinal));
      while X < bm.bmWidth do
      begin
        try"
          K := MakeColor(0, lPixel^.rgbRed, lPixel^.rgbGreen, lPixel^.rgbBlue) and $FFFFFF; // Fehler "lPixel^.rgbRed" usw. inaccessible value
        except
          K := 0;
        end;

Geändert von venice2 ( 9. Sep 2022 um 03:21 Uhr)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:32 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz