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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.12.2010, 18:28   #1
Megafono4ka
Пользователь
 
Регистрация: 06.10.2010
Сообщений: 12
Восклицание Delphi. StringGrid

Почему не выводит матрицу из файла в сетку?
Код:
procedure read_file(var a:mas);
var f:textfile;
    i,j:integer;
begin
assignfile(f,'laba6.dat');
reset(f);
for i:=1 to 5 do
for j:=1 to 5 do
begin
read(f,a[i,j]);
Form1.StringGrid1.Cells[j-1,i-1]:=IntToStr(a[i,j]);
end;
closefile(f);
end;
Делала в другой программе, работало...
Megafono4ka вне форума Ответить с цитированием
Старый 21.12.2010, 18:36   #2
Ybn2
Форумчанин
 
Регистрация: 18.11.2010
Сообщений: 183
По умолчанию

Ты как то странно считываешь массив, файл текстовый, а a:integer; Да и как файл выглядит?
Ybn2 вне форума Ответить с цитированием
Старый 21.12.2010, 18:45   #3
Megafono4ka
Пользователь
 
Регистрация: 06.10.2010
Сообщений: 12
По умолчанию

1. Где вы увидели, что a integer?
2. файл laba6.txt только тип у него dat, а не txt
Megafono4ka вне форума Ответить с цитированием
Старый 21.12.2010, 19:51   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
read(f,a[i,j]);
Я бы не стал использовать его в качестве считывателя для текстовых файлов.
И вообще для хранения целых лучше описать file of integer а не textfile;
Цитата:
Где вы увидели, что a integer?
Ну и ну... А это что?
Цитата:
IntToStr(a[i,j]);
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 21.12.2010, 20:07   #5
UltimaBeaR
Форумчанин
 
Аватар для UltimaBeaR
 
Регистрация: 21.12.2010
Сообщений: 199
По умолчанию

1)что такое mas?
2) в файле строки - читаешь через какой-нибудь readln в строку, а из строки вытаскиваешь числа
3) и правда лучше прям числами и писать
UltimaBeaR вне форума Ответить с цитированием
Старый 21.12.2010, 22:25   #6
Megafono4ka
Пользователь
 
Регистрация: 06.10.2010
Сообщений: 12
По умолчанию

Разобрались, спасибо, переменная a=mas была не прописана var
Megafono4ka вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
StringGrid в delphi TaYgA Помощь студентам 5 10.01.2010 13:23
Delphi StringGrid kGxDD Помощь студентам 2 19.10.2009 17:15
StringGrid (Delphi) VadEr Помощь студентам 4 09.06.2009 12:49
StringGrid в Delphi Ратмир Помощь студентам 11 01.04.2009 12:29
StringGrid в Delphi 7 Sanakan Помощь студентам 4 05.03.2009 19:00