[[Crandel]]

Hola davitcito,

usa el estilo Delphi, para que tu codigo se entienda mejor.

Te recomendaria usa el TList, para no limitarte al numero de servicios. Puedes hacer algo asi:

Código Delphi [-]
type

  nodoServicios = record
    nombre: string;
    masinfo: string;
  end;
  pServicios = ^nodoServicios;

  Servicios: TList;   // o TThreadList;

luego para crear la lista o ingresar usuarios, haces:

Código Delphi [-]

var
  Servicio: pServicios
begin
  new(Servicio);
  Servicio.info := "algo";
  Servicio.masinfo := "algo mas";
  Servicios.Add(Servicio);

lo mismo puedes hacer con la lista de clientes, en donde uno de los atributos es la lista de servicios.

En realidad, el TThreadList lo podes usar para la lista de clientes y el TList para la lista de servicios

Suerte