|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
20.02.2019, 19:53 | #1 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
Работа с классами
Я уже создал тему по работе с клеточным автоматом. но этот вопрос там явно потеряется, постоянные пользователи просто перестают следить за темой, как видно по просмотрам. так что ответвление сделаю. тем боле что админ мне раньше не ответил. что делать в таких случаях.
Программа до ошибки и после ошибки отличается цифрой 1 в конце. спасибо. тема материнская вот тут http://programmersforum.ru/showthrea...=326513&page=5 Назрел вопрос. Сначала введу в курс дела: есть класс TField,в нём двумерный массив ( таблица) FArea. При нажатии на кнопку старт создается Farea через конструктор Create. Потом массив FArea заполняется с помощью fillField случайными FArea надо скопировать в стрингГрид. СтрингГрид находиться в TForm2. Из из таблицы-массива класса TFiield , мне нужно отправить числа в таблицу Стринг грид класса Tform2. Я пытаюсь поменять procedure TForm2.fillStiringGrid, что бы все это сделать. Туда раньше подавалось: (var sg: TStringGrid; rowCount, colCount, maxValue: integer); А теперь я внутрь заголовка добавляю еще var field:Tfield: procedure TForm2.fillStiringGrid(var field:Tfield; var sg: TStringGrid; rowCount, colCount, maxValue: integer); при вызове процедуры подаю я в сюда эту переменную через procedure TForm2.Button1Click.: fillStiringGrid(field, StringGrid1, i, j, 10); Что бы это сделать, я в var процедуры добавил переменную класса Field: procedure TForm2.Button1Click(Sender: TObject {ACol, ARow: Integer; Rect: TRect; State: TGridDrawState}); var i, j: Integer; res:integer; field: TField; Все эти сделанные мною перемены кода привели меня к работающей программе, её можно скачать по ссылке дропбокс или она прикрепелена: https://www.dropbox.com/s/sk77ptjo6n..._step.rar?dl=0 Для того. что бы у меня стринг грид заполнялся случайными числами не внутри стринг грида класса Tform2, а что бы он заполнялся теми случайными числами. которые были сгенерированы внутри класса Tfield... Я меняю процедуру TForm2.fillStiringGrid, а именно: sg.Cells[i, j]:=inttostr(Random(maxValue));Вопрос в том. что вот тут возникают проблемы в строчке : Вместо Random(maxValue я пытаюсь вставать field[i,j] sg.Cells[i, j]:=inttostr(field[i,j]); и получаю ошибку [dcc32 Error] Unit2.pas(113): E2149 Class does not have a default property Прикрепляю файл. https://www.dropbox.com/s/e8aeobqn10...step1.rar?dl=0
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
|
20.02.2019, 20:17 | #2 |
Лис
Старожил
Регистрация: 18.09.2015
Сообщений: 2,409
|
Ругается он на то что не знает что надо к FArea обращаться.
1. Вариант первый. field[i,j] замените field.FArea[i,j] 2. Вариант второй и добавьте то что компилятор просит. А именно поле по умолчанию. Код:
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
У дзен программиста программа делает то что он хотел, а не то что он написал . |
20.02.2019, 21:29 | #3 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
поле по муолчанию через проперти мне пока сложновато...попробую по первому варианту. спасибо!
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
|
20.02.2019, 21:31 | #4 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
сработало. а я думал наобороте, надо делать Ffield.Area[]
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
|
20.02.2019, 22:24 | #5 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
дальше у меня точно такие же проблемы пошли. но с другим классом...создам видео и выложу. как я их решил
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
|
01.03.2019, 16:49 | #6 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
не решил.
Ошибка [dcc32 Error] Unit2.pas(265): E2096 Method identifier expected Из FArea-массива класса TFiield , я отправляю числа в таблицу Стринг грид класса Tform2 , с помощью procedure TForm2.fillStiringGrid. После заполнения стрингГрид я окрашиваю стринг грид, Окрашиваю те ячейки, в которых есть пометка Fiield[i,j].exist=true Вот код процедуры . Ошибка подсвечена Код:
вот файл проекта https://www.dropbox.com/s/y3b7cf36dw..._step.rar?dl=0
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
Последний раз редактировалось anaschu; 01.03.2019 в 17:26. |
01.03.2019, 17:30 | #7 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
На всякий случай даю весь код.
подсвечено оранжевым то, о чём я говорил в предыдущем сообщении Код:
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
|
07.03.2019, 16:25 | #8 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
Новый вопрос этого же класса был создан мною по запарке в другом месте. Почти этот вопрос решается в теме
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
|
07.03.2019, 18:50 | #9 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
а объясните, зачем Вы одновременно несколько тем ведёте про одни и то же?
Мало того, что это дублирование называется кросспостинг и запрещено правилами форума, так это же банально неудобно - один и тот же вопрос/код публиковать в разных темах, отслеживать разные темы, отвечать то там, то там... Вас это не напрягает? |
08.03.2019, 13:03 | #10 |
Форумчанин
Регистрация: 21.09.2012
Сообщений: 372
|
да, неудобно получилось...тогда в основной теме буду оставлять ссылку на побочную
Занимаюсь:1.зверьком- покемончиком для компьютерного затончика. 2 IT-грибами,что бы скушать потом их с вами.3. цифровым обезьянками, как куны ударяют за тянками
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Работа с классами | doss | Помощь студентам | 26 | 05.10.2014 17:45 |
Работа с классами | Fadey001 | Microsoft Office Excel | 7 | 15.08.2014 15:25 |
Работа с классами | cooper30 | C# (си шарп) | 9 | 05.11.2013 16:57 |
Работа с классами | RomiKon | Помощь студентам | 4 | 26.03.2013 21:21 |
Работа с классами и STL | Blad47 | Помощь студентам | 3 | 31.03.2011 01:07 |