Hi Leute
erstelle zur Laufzeit mehrere comp.
nun mus eine davon an eine Procedure oder Funktion übergeben werden,
aber ich erhalte immer eine Fehlermeldung.
Delphi-Quellcode:
var
MyPlayer: TMediaPlayer;
Procedure TForm1.PlayerCreate;
var
p: Integer;
begin
for p:=1 to pindex do
begin
MyPlayer:=TMediaPlayer.Create(self);
MyPlayer.Name:='MyPlayer'+IntToStr(p);
MyPlayer.parent:=self;
MyPlayer.Visible:=false;
end;
end;
...........
..........
begin
...........
...........
SetMPVolume(TMediaPlayer(FindComponent('MyPlayer'+IntToStr(i+1))),round(tin));
..........
..........
end;
Die Fehlermeldung: Zugriffsverletzung bei Adresse xxxxxx .
ist der Aufruf Findcomponent dafür falsch?
Gruss Alf