La verdad con tu explicación para nada ya que no me contas nada nuevo. :rolleyes:
Estas explicándome que hace el código y que es self :p:p:p:p.
Lo que quiero saber es porque razón un puntero a la nada (nil) es seguro.

Saludos.

De hecho (aunque no lo voy a jurar :)) esto es seguro:

Código Delphi [-]
type
  TPersona = class
    procedure Saluda;
  end;

procedure TPersona.Saluda;
begin
  ShowMessage('Hola');
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Persona: TPersona;

begin
  // No construyo el objeto
  Persona.Saluda;
end;

// Saludos

Exacto.

Tenes razón, aunque a simple vista parezca voladura.

Para agregar a la charla y enriquecerla , un post sobre los efectos colaterales de la forma en que esta implementado, sobre todo cuando usas tareas:

link

Saludos.

Jeje, hasta que deje de serlo. ;)

FPC se queja con ese código, por lo tanto prefiero escribir código seguro que experimenta con lo que se banca la VCL. :)

Saludos

Nosotros también, pero también preferimos no redundar. No hace falta evitar el caso nil por lo que expliqué arriba.

En el ejemplo anterior, la llamada Persona.Saluda realmente genera este código:

Se llama a una función que sí existe, no hay una referencia a una memoria inválida.

Si tuviéramos

Código Delphi [-]
type
  TPersona = class
    Saludo: String;
    procedure Saluda;
  end;

procedure TPersona.Saluda;
begin
  ShowMessage(Saludo);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Persona: TPersona;

begin
  // No construyo el objeto
  Persona.Saluda;
end;

entonces sí que habría problemas, porque no ha sido asignada memoria a ningún objeto y por tanto el campo Persona.Saludo no existe aún.

// Saludos

... me están estressanndo :D

;)

Sal%&(/% Invalid pointer operation.

Por eso lo tengo comentado:

// Saludos

no vaya a ser... :D

// Saludos

Al igual que lepe me dejaron frito el cerebro.:o:confused:

Leí el link que señala Donald y la verdad es que no lo entendí:( ¿Dónde está el problema?:confused:

Saludos,

Ya, ahora veo, al igual que Román, que lo que te preocupa es en sí el uso de una falsa instancia cuando su apuntador es Nil.

Tratándose de objetos, debes recordar que el código compilado de las rutinas (métodos) se guarda en ubicaciones de memoria distintas a donde se alojan los campos de datos de una instancia. De hecho, por dentro, el bloque de memoria que ocupa una instancia de objeto es meramente una "estructura" del estilo Record, teniendo un primer "campo" invisible que guarda un apuntador a donde se encuentra definida la clase a la que pertenece, su herencia, métodos y otros elementos de RTTI.

El código compilado está disponible para el programa desde que arranca la aplicación, así que los métodos que el compilador incluyó en el programa ejecutable pueden (mas no necesariamente "deben") ser llamados sin necesidad de usar una instancia real de por medio, como bien lo ejemplificó Román más arriba.

Lo inseguro es hacer esto con un método que emplee uno de los campos de la instancia o algún otro dato de memoria cuya disponibilidad (existencia) dependa de que el objeto sea "real", como ya también lo ejemplificó Román.

El método Free no "toca" nada de la memoria de datos. Se limita a preguntar si Self es otra cosa distinta de Nil, para luego llamar al destructor con seguridad. Por ello es que no preocupa su uso con un objeto Nil. Fue concebido tal como es para que el programador no tuviese que preguntar si una variable objeto es Nil antes de intentar liberar dicho objeto.

Esa referencia es harina de otro costal. Si no me equivoco (mi inglés es lento), habla del conflicto que presenta la función FreeAndNil cuando se intenta hacer referencia a la variable objeto durante la destrucción del mismo, momento en el cual tal variable ya tiene asignado un valor de Nil.

No le encuentro sentido a esto último que dices, ¿podrías explicarte, por favor? :)

Espero haber ayudado a esclarecer un poco el asunto.

Saludos a todos y no se estresen porque me estreso. :p

Al.

P.D. Cabe mencionar que la llamada a métodos virtuales con un objeto Nil sí es totalmente inviable y en todos los casos elevará una excepción. Porque, para hacer el late binding, se necesita conocer cuál es la clase real de la instancia, es decir, leer ese primer campo invisible que está alojado en los primeros cuatro bytes de la memoria del objeto. Siendo el objeto Nil (dirección de memoria 0), no hay tal dato. En todo caso el programa intentará leer los primeros cuatro bytes de la RAM, posición de memoria no accesible. Free NO es virtual, carecería de sentido si lo fuera.

A pesar de tu inglés entendiste bien. O casi, porque decís que es harina de otro costal? :rolleyes:

FPC no acepta el uso del código escrito por román, Probalo.

Saludos

No sé porqué, pues es sólo una esquema, pero eso que explicas Al, a mi se me quedó muy grabado con esta imagen




del libro Delphi in a Nutshell de Ray Lischner

Bueno, Delphi también protesta:

aunque no lo impide. Desde luego tiene sus riesgos usarlo regularmente como si fuese una característica del lenguaje. Pero en el caso que nos ocupa, como ya se ha visto, es perfectamente seguro.

// Saludos

¿ que es nil ? :confused::confused:

jojojojo

Aquí su origen:

http://www.heideggeriana.com.ar/textos/nihilismo_3.htm

ja, ja, ja

// Saludos

changos, era broma maese Roman :p :D

Te agradezco Al, por aclarar (y aclararme de paso;)) las cosas. Ya mi brain estaba por hacer ¡PUM!. Y mi inglés es super lento... El haber leído singleton por aqui, y allí provocó unos cuantos corto circuitos. ¡Me mete patrones donde no hay!:D

Ahora si, a ver si la consola de mi cabeza empieza a mandar comandos PANIC OFF.:):p:D

Saludos,

Porque el punto de la discusión donde hiciste esa referencia («un post sobre los efectos colaterales de la forma en que esta implementado, sobre todo cuando usas tareas») era que no entendías o no dabas por válido el uso del método Free con un objeto Nil. Como si ese artículo de Miller pudiera llevarnos a concluir que la práctica del "ObjetoNil.Free" fuese algo desaconsejable.

Quizá pregunte una estupidez, pero ¿qué es FPC? Google me llevó a la página del Fútbol Profesional Colombiano. :confused:

Mi pregunta se refería a eso de «prefiero escribir código seguro que experimenta con lo que se banca la VCL».

En espera de tus apreciaciones.

Saludos.

Al González. :)

No, como bien dice el texto lo que trae complicaciones es la manera en que esta implementado FreeAndNil, si no se toman las medidas del caso al accesarlo desde varias tareas.

:p:p:p Free Pascal Compiler.

Exacto, me refería a que prefiero escribir código que cualquier compilador pascal acepte, no solo Delphi.

Saludos.

Un bello esquema, sin duda. Si mal no recuerdo yo lo aprendí de la ayuda de Turbo Pascal y después lo reforcé con la ayuda de Delphi. Me parecía entonces muy interesante todo lo que los ingenieros de software hacían para abrirle paso en la historia a la fabulosa POO que hoy día disfrutamos. :)

Además, leer tanto texto sin Internet y un diccionario en la mano me ayudó a conseguir mis primeras nociones reales del idioma inglés.

Un abrazo esquemático y textual.

Al González. :)

Bueno, eso mismo ya se había mencionado. Y aunque no se trate de una aplicación multihilo el problema es susceptible de presentarse según comenté más arriba. Pero sigo sin comprender qué tiene que ver esto con tu desapego al uso de ObjetoNil.Free.

Sabía que te causaría gracia, romper el hielo no es malo. :p

Ahora sé qué es FPC. Pero entonces acláranos una cosa por favor, ¿Free Pascal Compiler no acepta ese uso del método Free, que en Delphi es de lo más estable, tradicional, útil y seguro? :confused:

Y si realmente sí es aceptado por FPC, al contrario de lo que das a entender, ¿no sería mejor que externaras tus conclusiones claras y reales respecto al empleo del método Free con objetos Nil, una vez consideradas las explicaciones dadas en mensajes anteriores? De lo contrario, algunos lectores futuros del este hilo podrían albergar dudas respecto a la validez y seguridad de usar ObjetoNil.Free. En buen plan. :)

Un abrazo por la verdad.

Al González.

Nada amigo, solo fue un comentario relacionado al tema, hasta donde quieres llegar?

Ja, y siempre se llega a lo mismo. Gracias maestro. :p:p:p:p