Spectragram

[EWeiss]

Projekt entfernt..

[Luckie]

Windows 7 Starter
Spectragram.part1
Beim Klicken auf die Schaltfläche, um eine MP3 Datei auszuwählen:

Code:

---------------------------
Anwendungsfehler
---------------------------
Exception EAccessViolation in Modul Spectragram.exe bei 00052135.

Zugriffsverletzung bei Adresse 00452135 in Modul 'Spectragram.exe'. Lesen von Adresse 00000000.


---------------------------
OK   
---------------------------

Wo merkt sich dein Programm eigentlich welchen Hintergrund ich eingestellt habe? Ich würde das Programm gerne wieder irgendwie sauber von meinem Rechner bekommen.

Nachtrag: Gleiches Problem mit der Exe in Spectragram.part2

[EWeiss]

Zitat von Luckie:

Windows 7 Starter
Spectragram.part1
Beim Klicken auf die Schaltfläche, um eine MP3 Datei auszuwählen:

Code:

---------------------------
Anwendungsfehler
---------------------------
Exception EAccessViolation in Modul Spectragram.exe bei 00052135.

Zugriffsverletzung bei Adresse 00452135 in Modul 'Spectragram.exe'. Lesen von Adresse 00000000.


---------------------------
OK   
---------------------------

Wo merkt sich dein Programm eigentlich welchen Hintergrund ich eingestellt habe? Ich würde das Programm gerne wieder irgendwie sauber von meinem Rechner bekommen.

Nachtrag: Gleiches Problem mit der Exe in Spectragram.part2

Erst mal benötigt man beide Archive um die Dateien zu entpacken ich dachte eigentlich das wäre bekannt.
AppData/Brewideas/Spectragram.

Warum sauber deinstallieren wird doch nichts Installiert.
Mal geschaut warum das nicht läuft.. Source ist doch dabei. Hmmm.. Nun gut.
Kann ich schließen öffnen wann ich will kann kein Problem feststellen.

Kein Problem hier siehe Pic.

Zitat:

Nachtrag: Gleiches Problem mit der Exe in Spectragram.part2

Boahh eh.. Nochmal ich dachte eigentlich das wäre bekannt das dies ein Multipart Archiv ist.
Und es zwingend nötig ist das Archiv Part1 und part2 zu laden
Part1 wird extrahiert der Rest folgt automatisch.

Ist der erste Part fertig werden die restlichen Teile aus dem Part2 Archiv extrahiert.
Und die EXE ist die gleiche denn sie gehört zum Archiv (Spectragram) das lediglich geplittet wurde weil ich hier keine Anhänge mehr als 5MB hochladen kann.


gruss

[Luckie]

Ich besitze kein Entpacker der Rar Archive entpacken kann. Der Freecommander kann jedes Archiv einzeln ohne Probleme entpacken. Keine Ahnung , ob er erkennt, dass es ein Multipartarchiv ist. Ich bekomme entsprechend zwei Ordner. Siehe Anhang. In beiden Ordner befinden sich wohl identische Dateien.

Ich kann dir nur berichten, was bei mir passiert. Beweis siehe Anhang. Debuggen kann ich es auf dem Netbook nicht, da ich hier kein Delphi installiert habe. Und ich weiß gar nicht, ob sich dein Code mit dem BDS2006 überhaupt kompilieren lässt.

Es kann ja sein, dass es bei dir funktioniert. Bei mir tut es das jedenfalls nicht. Und ich bin bestimmt nicht zu doof eine Exe zu starten und einen Button anzuklicken.

Auch wenn nichts installiert wird und ich es einfach lösche, bleibt doch noch Müll übrig, den ich eben auch gerne loswerden wollen täte. Sonst habe ich nach zehn Testprogramme nur noch Müll auf dem Rechner, der nicht mehr benötigt wird.

Und ich würde dich bitte deinen Ton mir gegenüber etwas zu ändern. Ich bin kein vollkommener Idiot.

[EWeiss]

Zitat:

Und ich würde dich bitte deinen Ton mir gegenüber etwas zu ändern. Ich bin kein vollkommener Idiot.

Bitte ?

Wo war ich unfreundlich..
Ich kann nichts dafür wenn dir nicht klar ist das es hier um ein Multipart Archiv geht.
Sorry aber das weis meine Nichte schon und die ist 5.

Das es nicht starte wird wohl daran liegen das du alle Design spezifische Dinge in deinem System deaktiviert hast.
Da geht kein Aero oder sonstiges das kann dann zu deinem Fehler führen.
Aber das kann ich selber testen.

Aber kein Problem

Jedenfalls war ich nicht unfreundlich und als Idiot habe ich dich auch nicht angesprochen.
Bitte sachlich bleiben. Besonders als Mod!

Zitat:

Und ich bin bestimmt nicht zu doof eine Exe zu starten und einen Button anzuklicken.

Hat niemand behauptet.. Schlecht geschlafen ? Oder noch gar nicht.

Es ist aber offensichtlich das der Freecommander wohl keine Multipart Archive entpacken kann denn da fehlt der Ordner "Src" (Source).
Oder ich habe ihn nicht gesehen auf deinen Bildern.
Was ich noch feststellen muss durch die Veränderung der Anhänge das addieren Unterschiedlicher Zahlen zu jedem Archiv ist das Multipart Archiv quasi zerstört.

Dann bitte wieder umbenennen nach
spectragram.part1.rar
spectragram.part2.rar

Ansonsten funktioniert das Entpacken nicht.


gruss

[Luckie]

Der Ton macht die Musik:

Zitat:

Boahh eh.. Nochmal ich dachte eigentlich das wäre bekannt das dies ein Multipart Archiv ist.

Das mit den Archiven hat sich geklärt. Wenn ich nur Part1 habe, sagt mir der Freecommander, dass es kein gültiges Archiv ist. Daran liegt es also nicht.

Windows 7 Starter kennt kein Aero. Und auf meinem Windows 7 Home habe ich es deaktiviert. Es würde also auch da abstürzen, weil es zwingend Aero voraussetzt?

[Rollo62]

Zitat:

Ich besitze kein Entpacker der Rar Archive entpacken kann.

Nimm einfach 7-Zip für Alles

Rollo

[jaenicke]

Unter Windows 10 funktioniert das Programm nicht.

Das ist aber ein Paradebeispiel dafür, dass die Versionsprüfung nicht ein Problem behebt, sondern schafft. Das ist genau der Grund weshalb Microsoft ab Windows 8 nicht mehr immer die reale Versionsnummer ausliefert, wenn man sie abfragt, sondern einfach die, für die das Programm laut Manifest erstellt wurde.

Du prüfst nämlich leider nicht, ob es sich mindestens um Vista handelt, sondern, ob es Vista oder Windows 7 ist. Wenn du das korrigierst (und nebenbei ist die Prüfung dann auch mit Bordmitteln viel einfacher), funktioniert der Dialog auch unter Windows 10:

Delphi-Quellcode:

// alt
  if (SKAERO_GetOS = OsVista) or (SKAERO_GetOS = OsWindows7) and SKAERO_IsCompositionEnabled then

// neu
  if (Win32MajorVersion >= 6) and SKAERO_IsCompositionEnabled then

Beim zweiten Aufruf des Öffnen-Dialogs knallt es dann aber in der SK_Aero.dll. Da es immer unterschiedliche Pointerprobleme zu sein scheinen, sieht das aber nicht nach einem Problem mit Windows aus, sondern nach einem logischen Problem.

Die Datei kann ich dann zwar auswählen (allerdings finde ich den Standarddialog sehr viel ergonomischer), aber danach passiert nichts mehr.

// EDIT:
Dass bei einem Multimediatool wie diesem Aero vorausgesetzt wird, sollte auch kein Problem sein. Denn wenn die Grafikkarte so schwach ist, dass man kein Aero einsetzen kann, wird so ein Tool meistens ohnehin nicht benutzt werden. Und wenn die Grafikkarte schnell genug für Aero ist, wird man normalerweise den Rechner nicht durch Deaktivieren von Aero langsamer machen.

Zitat von EWeiss:

AppData/Brewideas/Spectragram.

Warum sauber deinstallieren wird doch nichts Installiert.

Das ist auch eine Installation, nur dass dein Programm selbst die Konfigurationsdateien dort ablegt. Das Problem ist in so einem Fall, dass es so eben keinen Deinstaller gibt und die Dateien dort liegen bleiben, wenn man das Programm löscht.
Für ein Projekt wie dieses hier ist das allerdings natürlich kein Problem.

[EWeiss]

Zitat:

Du prüfst nämlich leider nicht, ob es sich mindestens um Vista handelt, sondern, ob es Vista oder Windows 7 ist. Wenn du das korrigierst (und nebenbei ist die Prüfung dann auch mit Bordmitteln viel einfacher), funktioniert der Dialog auch unter Windows 10:

Ja das weis ich Danke..
Es soll auch nicht mit W10 Arbeiten aus dem einfachen Grund weil es unter W10 keine DWM API mehr gibt.

Das Problem liegt auch eher hier! und hat nichts mit der Abfrage <> W10 zu tun.

Delphi-Quellcode:

{$REGION 'procedure AddBrowseForFileControls'}
procedure AddBrowseForFileControls(hMain: HWND);
begin
  BrowseForFile := CTRL_BrowseForFileCreate;
  BrowseForFile.Width := 612;
  BrowseForFile.Height := 412;
  BrowseForFile.PanelImagePath := SKAERO_FOLDER + 'Panel.png';
  BrowseForFile.SysImagePath := SysButton.ImagePath;
  BrowseForFile.PanelDirListImagePath := SKAERO_FOLDER + 'Frame3d.png';
  BrowseForFile.ListSelectedImg := SKAERO_FOLDER + 'List\ListSelect.png';
  BrowseForFile.SkinConfigFile := PWideChar(DefSkin);
  BrowseForFile.ComboButtonImagePath := SKAERO_FOLDER + 'List\combo.png';
  BrowseForFile.ButtonImagePath := SKAERO_FOLDER + 'BTN_Push.png';
  BrowseForFile.VPageImg := SKAERO_FOLDER + 'VScroll\VSPage.png';
  BrowseForFile.VBotImg := SKAERO_FOLDER + 'VScroll\VSBot.png';
  BrowseForFile.VUpImg := SKAERO_FOLDER + 'VScroll\VSUp.png';
  BrowseForFile.VThumbImg := SKAERO_FOLDER + 'VScroll\VSThumb.png';
  BrowseForFile.FileListMask := '.mp3';
  BrowseForFile.UseVistaBlur := CheckAeroBlur.GetCheckButtonStatus(CheckAeroBlur.Handle);
  BrowseForFile.UseVistaCrystal := CheckCrystal.GetCheckButtonStatus(CheckCrystal.Handle);
  BrowseForFile.GlassOpacity := trbGlassOpacity.GetTrackValue(trbGlassOpacity.Handle);
  BrowseForFile.CreateWindow(hMain);
end;
{$ENDREGION}

in der uControls.

ersetzen durch

Delphi-Quellcode:

procedure AddBrowseForFileControls(hMain: HWND);
begin
  BrowseForFile := CTRL_BrowseForFileCreate;
  BrowseForFile.Width := 612;
  BrowseForFile.Height := 412;
  BrowseForFile.PanelImagePath := SKAERO_FOLDER + 'Panel.png';
  BrowseForFile.SysImagePath := SysButton.ImagePath;
  BrowseForFile.PanelDirListImagePath := SKAERO_FOLDER + 'Frame3d.png';
  BrowseForFile.ListSelectedImg := SKAERO_FOLDER + 'List\ListSelect.png';
  BrowseForFile.SkinConfigFile := PWideChar(DefSkin);
  BrowseForFile.ComboButtonImagePath := SKAERO_FOLDER + 'List\combo.png';
  BrowseForFile.ButtonImagePath := SKAERO_FOLDER + 'BTN_Push.png';
  BrowseForFile.VPageImg := SKAERO_FOLDER + 'VScroll\VSPage.png';
  BrowseForFile.VBotImg := SKAERO_FOLDER + 'VScroll\VSBot.png';
  BrowseForFile.VUpImg := SKAERO_FOLDER + 'VScroll\VSUp.png';
  BrowseForFile.VThumbImg := SKAERO_FOLDER + 'VScroll\VSThumb.png';
  BrowseForFile.FileListMask := '.mp3';
  
  if Assigned(CheckAeroBlur) then
  begin
    BrowseForFile.UseVistaBlur := CheckAeroBlur.GetCheckButtonStatus(CheckAeroBlur.Handle);
    BrowseForFile.UseVistaCrystal := CheckCrystal.GetCheckButtonStatus(CheckCrystal.Handle);
    BrowseForFile.GlassOpacity := trbGlassOpacity.GetTrackValue(trbGlassOpacity.Handle);
  end;
  BrowseForFile.CreateWindow(hMain);
end;

Die Checkboxen bzw.. diese Controls sind alle NIL wenn Aero nicht existiert.
CheckAeroBlur, CheckCrystal, trbGlassOpacity

Deshalb kracht es.
Wundert mich das sich der Dialog bei dir überhaupt öffnet.
Zumal die DriveList Combo mit DWM in Kombination LayeredWindow erstellt wird.
Was bedeutet das die aufgeklappte Combo Transparent ist.

Das geht nun mal nicht mit W10 oder deaktivierter Desktopgestaltung dementsprechend kann man dann auch kein Laufwerk auswählen.

Zitat:

Dass bei einem Multimediatool wie diesem Aero vorausgesetzt wird, sollte auch kein Problem sein. Denn wenn die Grafikkarte so schwach ist, dass man kein Aero einsetzen kann, wird so ein Tool meistens ohnehin nicht benutzt werden. Und wenn die Grafikkarte schnell genug für Aero ist, wird man normalerweise den Rechner nicht durch Deaktivieren von Aero langsamer machen.

Dazu kann ich nur sagen das dieses Tool 0% CPU bei mir verwendet.
Inklusive der ganzen Visuellen Komponenten.
Ich denke eher es ist uninteressant für diejenigen die W10 benutzen da gibt es nun mal kein DWM mehr ein Grund warum ich kein W10 verwende.
Man hätte das aktiviert lassen können es war immer möglich es auszuschalten.
Aber gut es ist wie es ist.

Zitat:

allerdings finde ich den Standarddialog sehr viel ergonomischer

Ich finde das auch.
Das Problem ist nur diesen auf meinen Visuellen Style anzupassen

Zitat:

wird so ein Tool meistens ohnehin nicht benutzt werden

Das ist richtig zumal es für die LIB im ganzen > W7 eh zu spät ist.
Aber für die 6 Jahre die ich vielleicht noch habe reicht es mir Weltuntergang LOL.


gruss

[jaenicke]

Wie kommst du darauf, dass es unter Windows 10 keinen DWM mehr gibt? Die Transparenz usw. funktionieren dort problemlos, also die von dir genannten Controls.