¿La mejor manera de verificar si una variable es nula?

Question

Una condición común que todos los programas deberían hacer es verificar si las variables están asignadas o no.

tomar las siguientes afirmaciones:

(1)

if Assigned(Ptr) then 
begin 
    // do something 
end; 

(2)

if Ptr <> nil then 
begin 
    // do something 
end; 

¿Cuál es la diferencia entre Assigned(Ptr) y Ptr <> nil?

Answer 1

Por lo general es el mismo ... excepto cuando se echa una función ...

function mfi: TObject; 
begin 
    Result := nil; 
end; 

procedure TForm1.btn1Click(Sender: TObject); 
type 
    TMyFunction = function: TObject of object; 
var 
    f: TMyFunction; 
begin 
    f := mfi; 

    if Assigned(f) then 
    begin 
    ShowMessage('yes'); // TRUE 
    end 
    else 
    begin 
    ShowMessage('no'); 
    end; 

    if f <> nil then 
    begin 
    ShowMessage('yes'); 
    end 
    else 
    begin 
    ShowMessage('no'); // FALSE 
    end; 
end; 

Con la segunda sintaxis, se comprobará el resultado de la función, no la propia función ...

Answer 2

En cuanto a rendimiento, no hay diferencia. Personalmente prefiero la segunda forma ya que los humanos pueden analizar el significado más rápido.