Observe no trecho de código abaixo a implementação do chamado padrão de projeto singleton em Delphi:
type
TFila = class
private
…
public
constructor Create;
class function getInstance:TFila;
…
end;
implementation
var
Fila : TFila;
class function TFila.getInstance: TFila;
begin
if not assigned(Fila) then
Fila := TFila.Create;
result := Fila;
end;
Em relação ao prefixo class, usado na declaração do método de classe getInstance, é correto afirmar que: