AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Mastervolume mit WENIG PERFORMANCE verändern ;)

Mastervolume mit WENIG PERFORMANCE verändern ;)

Ein Thema von cRayZo · begonnen am 2. Nov 2007 · letzter Beitrag vom 2. Nov 2007
Antwort Antwort
cRayZo

Registriert seit: 30. Jul 2007
156 Beiträge
 
Delphi 6 Personal
 
#1

Mastervolume mit WENIG PERFORMANCE verändern ;)

  Alt 2. Nov 2007, 19:43
Hi ich hab das Problem, dass ich die Mastervolume verschiedener PCs in einem Netzwerk in abhängigkeit berechnen und veränndern möchte ( hier der Vorgänger-thread: *klick*)

Problem ist aber dass die Funktion, die ich mir faulerweise einfach mal kopiert hab, um die Lautstärke zu ändern zu viel Performance kostet, als dass ich die Lautstärke 30 mal für jeden PC berechnen lassen kann und das so schnell wie möglich.

Der Code ist ja im *klick*^^
habt ihr iwelche Ideen
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Mastervolume mit WENIG PERFORMANCE verändern ;)

  Alt 2. Nov 2007, 19:51
Da wirst du nichts dran ändern können. Die API-Funktionen sind nun mal so langsam. Der Rest vom Code, die Initialisierung der Strukturen usw., ist vernachlässigbar.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
cRayZo

Registriert seit: 30. Jul 2007
156 Beiträge
 
Delphi 6 Personal
 
#3

Re: Mastervolume mit WENIG PERFORMANCE verändern ;)

  Alt 2. Nov 2007, 19:54
okay..schade^^

und wenn ich den sound, den ich abspiele in delphi lade und dort die Volume ändere? Das Problem ist halt dass es teilweise 10 gleichzeitig laufende soundstreams sind. Wäre die Performance dann trotzdem noch besser?
  Mit Zitat antworten Zitat
fLaSh11
(Gast)

n/a Beiträge
 
#4

Re: Mastervolume mit WENIG PERFORMANCE verändern ;)

  Alt 2. Nov 2007, 22:45
also ich änder das MasterVolume immer über MMSystem:
Delphi-Quellcode:
uses
  {...} MMSystem

//...

procedure SetVolume(const volL, volR: Word);
var
  hWO: HWAVEOUT;
  waveF: TWAVEFORMATEX;
  vol: DWORD;
begin
  FillChar(waveF, SizeOf(waveF), 0);
  waveOutOpen(@hWO, WAVE_MAPPER, @waveF, 0, 0, 0);
  vol := volL + volR shl 16;
  waveOutSetVolume(hWO, vol);
  waveOutClose(hWO);
end;
Keine Ahnung, ob das schneller ist, als dein Code...
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:35 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz