Abrir archivo Delphi

[Maria85]

Hola otra vez a todos!!

Estoy intentando crear un método que pulsando en un botón me abra un archivo...Me sale el diálogo de abrir bien, pero cuando selecciono uno y le doy a aceptar me sale el siguiente error:

Object reference is not set to an instance object

Si alguien pudiera decirme algo...
Os pongo aqui abajo el método:

Código Delphi [-]
 
 
procedure TTFormMain.OpcionAbrir(Sender: TObject);
var
  nombreArchivo: string;
  i: integer;
  ficheroAbierto: integer;
begin
  ficheroAbierto:=0;
  if DialogoAbrir.Execute then
    begin
        inc(numeroPestana);
        for i:=0 to numeroPestana-1 do
          begin
                if (numeroPestana<>0) and
                    (compareText(DialogoAbrir.FileName,listaVentanas[i].pestana.hint)=0) then
                  begin
                    nombreArchivo:='EL FICHERO: '+DialogoAbrir.FileName+' YA ESTA ABIERTO';
                      ShowMessage(nombreArchivo);
                    dec(numeroPestana);
                    ficheroAbierto:=1;
                  end;
          end;

       if ficheroAbierto=0 then
         begin
                AbrirEditor(DialogoAbrir.FileName);
                listaVentanas[numeroPestana].editor.Lines.LoadFromFile(DialogoAbrir.FileName);
                listaVentanas[numeroPestana].guardado := true;
                listaVentanas[numeroPestana].carpetaTrabajo := DialogoAbrir.FileName;
                nombreArchivo := ObtenerNombrePestana(listaVentanas[numeroPestana].carpetaTrabajo);
                delete(listaVentanas[numeroPestana].carpetaTrabajo,
                       pos(nombreArchivo,listaVentanas[numeroPestana].carpetaTrabajo),
                       length(listaVentanas[numeroPestana].carpetaTrabajo));
         end;
    end;
end;

[Neftali [Germán.Estévez]]

¿Has ejecutado paso a paso?
¿Podrías decirnos en qué línea te está fallando?

[Maria85]

El problema es que soy nueva en Delphi...lo he ejecutado entero y compila bien. Solo me da el error cuando le doy a abrir...pero una vez ejecutado el programa...

[Neftali [Germán.Estévez]]

Empezado por Maria85

El problema es que soy nueva en Delphi...lo he ejecutado entero y compila bien. Solo me da el error cuando le doy a abrir...pero una vez ejecutado el programa...

OK. No hay problema.
Desde el editor, colocate en la línea:

Código Delphi [-]
if DialogoAbrir.Execute then

Y pulsa F5. verás que en esa línea se coloca un BreakPoint (la marca roja sobre la línea).



Ahora ejecuta el programa y cuando llegue a ese punto se parará y te indicará con una flecha verde la línea actual que se está ejecutando.



Y vas pulsando F8 se irá ejecutando el programa "paso a paso" hasta que llegues a la línea que falla. De esta forma puedes saber con más detalle en qué lugar está fallando.

[Maria85]

Vale, se me para cuando llega a la linea:

inc(numeroPestana);

asi que supongo que tendrá que ser que no obtengo bien el numero de pestaña o algo así.seguiré investigando...

gracias por ayudarme

[Neftali [Germán.Estévez]]

¿Como tienes definida esa variable?
Prueba con:

Código Delphi [-]
  num := num + 1;