trotz alledem das ich die texturen lösche wird der Speicher nicht freigegeben
Delphi-Quellcode:
if assigned(quadTexture) then
begin
for I := 0 to QuadCount - 1 do
begin
glDeleteTextures(i, @quadTexture);
quadTexture[i] := 0;
end;
end;
glDeleteTextures(1, @BackTexture); // Texture für Hintergrund
glDeleteTextures(1, @GradientTex); // Texture für DiskSpectrum
glDeleteTextures(1, @MeterTexture); // Texture für VUMeter
glDeleteTextures(1, @PeaksTexture); // Texture für Peaks
glDeleteTextures(1, @SpectrumTexture); // Texture für Spectrum
glDeleteTextures(1, @BarTexture); // Texture für Slider
glDeleteTextures(1, @PrivateTexture); // Texture für CDLabel
woran kann es liegen ?
Wüßte jetzt nicht was da falsch ist.
gruss Emil