Hola
la llamada la hago en la siguiente funcion
Código Delphi
[-]
procedure cTienda.pedirVez(c:cConsumidor);
begin
if (c.ClassName = 'cConsumidor') then
begin
c.setTurno(self.visor.GetTiketN);
self.visor.SetTiketN(self.visor.GetTiketN+1);
end
else
begin
c.setTurno(self.visor.GetTiketE);
self.visor.SetTiketE(self.visor.GetTiketE+1);
end;
self.Attach(c);
end;
c si qué está cargado con los datos del consumidor.
Tengo que reescribir alguna funcion de tObserver en el consumidor.
Muchas Gracias, es muy urgente