Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.06.2009, 18:10   #1
smithana
 
Регистрация: 04.06.2009
Сообщений: 7
По умолчанию непонятная ошибка в Delphi

вообщем вот такая простенькая прожка, пытаюсь разобраться с вводом выводом:
Код:
program Text;

{$APPTYPE CONSOLE}

uses
  SysUtils;

type
  Tmatrix = class
    public
      constructor Create;
      procedure input;
    private
      matrix1:array [1..4, 1..5] of double;
  end;

  constructor Tmatrix.Create;                   //по умолчанию
  var
      i,j: Integer;
    begin
      for i:=0 to 4 do
        for j:=0 to 5 do
          matrix1[i,j]:=0;
    end;

  procedure Tmatrix.input;                   //метод ввода
    var
      i,j: Integer;
    begin
      WriteLn('Input matrix:');
      for i:=0 to 4 do
        for j:=0 to 5 do
          Read(matrix1[i,j]);
      for i:=0 to 4 do
        for j:=0 to 5 do
          Write(matrix1[i,j]);
  end;

Var
  obj: Tmatrix;

begin
  obj:=Tmatrix.Create();
  obj.input();
  ReadLn;
end.
не пишет никаких ошибок, но как запускаешь так сразу вылетает окошко с:
Project Project2.exe raised exception class EAccessViolation with message 'Access violation at address 00404315 in module 'Project2.exe'. Read of adress FFFFFFFE4'

даже и подумать то не на что(( подскажите пож
smithana вне форума Ответить с цитированием
Старый 07.06.2009, 18:36   #2
Mixasik
New Delphi Coder
Форумчанин Подтвердите свой е-майл
 
Аватар для Mixasik
 
Регистрация: 20.07.2008
Сообщений: 874
По умолчанию

У тебя матрица имеет границы
Код:
matrix1:array [1..4, 1..5] of double;
А ты идешь по матрице от индекса ноль - такого элемента нет, вот и выскакивает ошибка доступа к памяти.
Страх это слабость и потому, кто испугался уже побежден.
Mixasik вне форума Ответить с цитированием
Старый 07.06.2009, 19:18   #3
smithana
 
Регистрация: 04.06.2009
Сообщений: 7
По умолчанию

ох чёрт, спасибо огромное, просто щас курсовую делаю на трёх языках, в голове всё смешалось уже(
smithana вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Непонятная ошибка. program123 Общие вопросы Delphi 12 12.04.2009 23:07
Непонятная ошибка Juri Помощь студентам 6 07.11.2008 19:28
Непонятная ошибка RealSHELS Общие вопросы Delphi 16 24.10.2008 20:49
Непонятная ошибка!!! Delphi Dimon88 Помощь студентам 7 06.05.2008 00:14
Непонятная ошибка Slash Общие вопросы Delphi 6 19.06.2007 14:45