muss noch mal posten
Hab den Fehler gefunden.
alte
Delphi-Quellcode:
// fill all Quads with NoCoverTexture
if FileExists(Path + UpperCase('Data\images\CompDisk\Default\NoCover.BMP')) then
begin
LoadTexture(Path + 'Data\images\CompDisk\Default\NoCover.BMP', NoCoverTexture, False);
for q := 0 to QuadCount do
QuadTexture[q] := NoCoverTexture;
end else
NoCoverTexture := 0;
neue
Delphi-Quellcode:
// fill all Quads with NoCoverTexture
if FileExists(Path + UpperCase('Data\images\CompDisk\Default\NoCover.BMP')) then
begin
LoadTexture(Path + 'Data\images\CompDisk\Default\NoCover.BMP', NoCoverTexture, False);
for q := 0 to QuadCount -1 do
QuadTexture[q] := NoCoverTexture;
end else
NoCoverTexture := 0;
Jetzt sagt mir mal jemand warum der Debuger das nicht korrekt erkennt .
Sehr traurig selbst VB6 kann das
gruss Emil