Noch ein kleines Problem.
Warum werden die property zu spät ausgeführt?
Delphi-Quellcode:
private
FAppVolume: boolean;
procedure SetAppVolume(Value: boolean);
published
property AppVolume: boolean read FAppVolume write SetAppVolume;
procedure TAudioVolume.SetAppVolume(Value: boolean);
begin
if Value = FAppVolume then
exit;
FAppVolume := Value;
end;
Ich addiere ne neue Komponente zur Form
Anschließend ändere ich die Eigenschaft von AppVolume auf True.
Die Eigenschaft wird aber nicht direkt ausgeführt.
Delphi-Quellcode:
constructor TAudioVolume.Create(AOwner: TComponent);
var
HR: HResult;
N: Cardinal;
MyRegistry: TRegistry;
ISessionEvents: TAudioSessionEvents;
IAudioEndpointEvents: TAudioEndpointEvents;
begin
inherited Create(AOwner);
if not FAppVolume then
SetComponents;
Bei der 5 Komponente wo die Eigenschaft auf True steht springt sie trotzdem in SetComponents hinein.
Erst danach wird erkannt das FAppVolume eigentlich True ist.
Wie kann ich das erzwingen.
gruss