Thema: Spectragram

Einzelnen Beitrag anzeigen

EWeiss
(Gast)

n/a Beiträge
 
#11

AW: Spectragram

  Alt 22. Sep 2016, 04:35
Was wurde bei mir deaktiviert und woran siehst du das? Ich hatte vorher mal ein paar Hintergründe durch probiert bevor ich eine MP3 auswählen wollte. Das Hintergrundbild wechseln funktioniert ohne Probleme.
Wenn du unsere ScreenShots vergleichst.
Fehlen bei dir unter Move Background drei Komponente.

2x Checkboxen und eine Trackbar.

Ich habe jetzt mal das hier addiert damit müsste es eigentlich funktionieren.

Delphi-Quellcode:
      if (GetOS = OsVista) or (GetOS = OsWindows7)
        and SkinEngine.IsCompositionEnabled then
      begin
Mit IsCompositionEnabled lade ich die dwmapi.dll..

Delphi-Quellcode:
function TSkinEngine.IsCompositionEnabled: boolean;
var
  DwmIsCompositionEnabled: function(pfEnabled: PBoolean): HRESULT; stdcall;
  hDwmapi: THandle;
  Enabled: BOOL;
begin
  Result := False;
  if (Win32Platform = VER_PLATFORM_WIN32_NT) and (Win32MajorVersion >= 6) then
  begin
    hDwmapi := LoadLibrary('dwmapi.dll');
    if hDwmapi <> 0 then
      try
        DwmIsCompositionEnabled := GetProcAddress(hDwmapi, 'DwmIsCompositionEnabled');
        if Assigned(DwmIsCompositionEnabled) then
          Result := (DwmIsCompositionEnabled(@Enabled) = 0) and Enabled;
      finally
        FreeLibrary(hDwmapi);
      end;
  end;
end;
Ich denke das wird aber auch nicht ausreichen, denn was mache ich wenn die DLL nicht existiert dann kracht es auch.
Na ja oder auch nicht.. hDwmapi ist ja dann 0

Habe die geänderte DLL nochmals angehängt.
Vielleicht geht es ja damit.

gruss

Geändert von EWeiss (22. Sep 2016 um 07:15 Uhr)
  Mit Zitat antworten Zitat