Ver Mensaje Individual
  #1  
Antiguo 13-05-2020
Javierus Javierus is offline
Miembro
 
Registrado: jun 2017
Posts: 88
Reputación: 7
Javierus Va por buen camino
Problema con "class of"

Necesito hacer algo como ésto, pero el compilador dice que así no...
Código:
Type
  Tuno = class 
    loquesea: integer;
  end;
  Tdos = class(Tuno) 
     mascosas: string;
  end;
  TunoClass = class of Tuno;
  TdosClass = class of Tdos;

var
   a: TunoClass;
begin
...
  if a is TdosClass then  <-  Error: Operator not applicable to this operand type
    ...
Responder Con Cita