Mehrere Komponenten per Code erstellen - Zugriffsproblem

[Yheeky]

Hi,

ich erstelle per Code mehrere ClientSocket-Komponenten. Dies sieht wiefolgt aus:

Delphi-Quellcode:

var I : smallInt;
    Client : TClientSocket;
begin
for I := 1 to 9 do
    begin
    Client := TClientSocket.Create(nil);
    Client.Name := 'Client' + IntToStr(I);
    end;

Wenn ich nun wiefolgt auf die Komponenten zugreifen möchte, funktioniert das nicht

Delphi-Quellcode:

for i := 0 to Application.ComponentCount - 1 do
    if Application.Components[i] is TClientSocket then
       if TClientSocket(Application.Components[i]).Name = 'Client1' + User then
       begin
       ShowMessage('Komponente sichtbar');
       Exit;
       end;

Scheint so, als wären die Komponenten nicht global sichtbar...Was mache ich falsch?