[BDWONG]

Bueno gracias por su ayuda he resulto varias dudas, por ultimo estuve leyendo que en un programa secuencial que solo maneja
datos primitivos no era necesario destruir el objeto.

Pero estaría mal si lo hiciera un ejemplo:

Código Delphi [-]
TYPE
  Ttrasporte=class(TObject)
    Tipo_Trasporte:string;
    constructor create(tipo:string);
    procedure Arrancar;
    procedure Frenar;

  end;

constructor Ttrasporte.create(tipo: string);
begin
    self.Tipo_Trasporte:=tipo;
end;

procedure Ttrasporte.Arrancar;
begin
    Writeln('EL ',self.Tipo_Trasporte,' arranco');
end;

procedure Ttrasporte.Frenar;
begin
    Writeln('EL ',self.Tipo_Trasporte,' freno');
end;

var
auto:Ttrasporte;
begin
  try
  auto:=Ttrasporte.create('Mustang');
  auto.Arrancar;
  auto.Frenar;
  finally
    FreeAndNil(auto);
  end;
  readln;
end.

Gracias saludos...