TAudioVolume Komponente incl. System Mixer

[EWeiss]

Noch nicht ganz fertig aber zum Testen\Spielen sollte es reichen.
Wie gesagt immer noch die Event Probleme...
Nebenbei kein MemoryLeak auch nicht bei den Icons..

Wegen der CPU! Das muss ich alles noch optimieren.

gruss

[KodeZwerg]

Zitat von EWeiss:

Noch nicht ganz fertig aber zum Testen

Das andere Beispiel mit dem Event wo was krachen soll habe ich weder zum krachen noch sonst was bekommen, Edit1 blieb Edit1.

Zitat von EWeiss:

zum Spielen sollte es reichen.

Auf jeden Fall, funktioniert super bei mir (Windows 7 x64)

Zitat von EWeiss:

Wie gesagt immer noch die Event Probleme

Ist damit per timer/event zu prüfen ob ein Prozess dazugekommen/beendet wurde gemeint?

Zitat von EWeiss:

Wegen der CPU! Das muss ich alles noch optimieren.

Da mag ich nicht in Deiner Haut stecken, das sieht ja jetzt schon verdammt kompliziert aus.

Zitat von EWeiss:

Nebenbei kein MemoryLeak auch nicht bei den Icons

Dann bleib dem Treu, super Arbeit, mir gefällts

[EWeiss]

Zitat:

Da mag ich nicht in Deiner Haut stecken, das sieht ja jetzt schon verdammt kompliziert aus.

Den Timer auf 60ms hochsetzen wirkt schon wunder.
Das Problem ist halt das es keine Windows gibt die Controls bestehen nur aus reinen Bitmaps.
Deshalb muss ich um diese zu aktualisieren UpdateWindow verwenden und das verbraucht einiges an CPU.
Na ja mal schaun.

Zitat:

Das andere Beispiel mit dem Event wo was krachen soll habe ich weder zum krachen noch sonst was bekommen, Edit1 blieb Edit1.

Wenn man das starte und anschließend eine Audio Anwendung starte sollte es krachen..
Tut es bei mir zumindest.

Zitat:

Ist damit per timer/event zu prüfen ob ein Prozess dazugekommen/beendet wurde gemeint?

Richtig! Solange kann ich nicht darauf reagieren wenn die Events nicht funktionieren.

gruss

[KodeZwerg]

Zitat von EWeiss:

Richtig! Solange kann ich nicht darauf reagieren wenn die Events nicht funktionieren.

Könnte man das eventuell so Regeln?
Bei Programm Start wird ja Ermittelt was da so alles für Prozesse laufen die auch noch mit dem Mixer verbunden sind.
Da kann man doch bestimmt so etwas wie eine Liste anlegen für "hab diesen Prozess" oder noch besser, limitieren auf den Namen den dein Programm für die Prozesse anzeigt.
Nun ein Timer und die gleiche Prozedur durchlaufen lassen wie beim Start nur das dabei eine zweite Liste erstellt wird.
Die könnte man doch dann Gegenprüfen und bei Veränderung alles von vorne zeichnen wie bei Programm Start. Nur so ein Gedanke, ob der umzusetzen ist weiß ich nicht.

[EWeiss]

Zitat von KodeZwerg:

Zitat von EWeiss:

Richtig! Solange kann ich nicht darauf reagieren wenn die Events nicht funktionieren.

Könnte man das eventuell so Regeln?
Bei Programm Start wird ja Ermittelt was da so alles für Prozesse laufen die auch noch mit dem Mixer verbunden sind.
Da kann man doch bestimmt so etwas wie eine Liste anlegen für "hab diesen Prozess" oder noch besser, limitieren auf den Namen den dein Programm für die Prozesse anzeigt.
Nun ein Timer und die gleiche Prozedur durchlaufen lassen wie beim Start nur das dabei eine zweite Liste erstellt wird.
Die könnte man doch dann Gegenprüfen und bei Veränderung alles von vorne zeichnen wie bei Programm Start. Nur so ein Gedanke, ob der umzusetzen ist weiß ich nicht.

Das wäre zwar ohne Aufwand möglich aber nicht sinnvoll.
Das Event muss von Windows selber kommen.
Ansonsten muss ich in einem Thread immer diese Liste überprüfen das wäre .. hmmm sagen wir mal schlecht.

Schade nur das niemand sagen kann woran es liegt und bereit ist zu helfen.

Nebenbei wenn ich wollte kann ich alle Controls zur Laufzeit auf andere Positionen verschieben.
Dazu muss ich nur eine einzelne Zeile deaktivieren.

gruss

[TiGü]

Beispiel für die Anwendung der Events, Notifications und Callbacks in der Hauptkomponente TAudioVolume. Beachte die neuen Methoden am Ende der Unit AudioVolume.pas.

Sollte in Delphi 2010 das hier nicht verfügbar sein: TThread.Current.ThreadID dann kannst du das mit GetCurrentThreadId ersetzen.

[EWeiss]

Zitat von TiGü:

Beispiel für die Anwendung der Events, Notifications und Callbacks in der Hauptkomponente TAudioVolume. Beachte die neuen Methoden am Ende der Unit AudioVolume.pas.

Sollte in Delphi 2010 das hier nicht verfügbar sein: TThread.Current.ThreadID dann kannst du das mit GetCurrentThreadId ersetzen.

Danke!
Werde es mir mal reinziehen.

gruss