Представьте себе матрицу, 20Х20, теперь представьте числа внутри матрицы, от 1 до 16,  я хочу чтоб у меня по матрице строилось изображение(ну это просто canvas и прочие методы) но теперь я хочу щелкнуть мышью на одну из этих прорисованных штучек и чтоб у меня в какую то переменную записалось число матрицы соответствующего этой клеточке, как это лучше реализовать, пока словами расскажите, может пойму. Да и еще если на соответствующей области изображение прорисованное не умещается я бы хотел чтоб была возможность прокрутки , но прокручивая я также мог достать значения матрицы которые соответствуют клеточкам. У меня пока в мыслях только как сделать прорисову без прокрутки, а как перехват мышью и прокрутку совершенно не представляю

M Girder

Название темы должно отражать ее суть!

 

Название темы должно отражать её суть!
Вот что сказано в SDK:


Добавлено @ 22:07 
И вообще, юзай WM_MOUSEMOVE, WM_LBUTTONDOWN, WM_RBUTTONDOWN.
Вопрос неоднократно обсуждался. Воспользуйся поиском по этим сообщениям. 

Скажешь мое название не отражает??? я спрашиваю как захватывать обьекты, точнее принцип захвата, и как он работает, СЛОВАМИ!! код мне пока не нужен, я хочу в этом разобраться, потом кодить

Добавлено @ 22:11 
бать может координаты мышки проверяются на форме, типатого , иф координата у = координата у обьекта энд координата х = координата х обьекта, зен реад своиство обекта и присвоить переменнаь обьект.его клетка 

Попробуйте компонент  TDrawGrid
у него и прокрутка есть и события
onDrawCell
onMouseDown

также удобный метод
DrawGrid1.MouseToCell(); - по координатам определить номер ячейки
также
DrawGrid1.CellRect(); координаты и размеры указанной ячейки

 

А картинки можно поставить в ячейки? и еще можно убрать серые поля?, и если можно в двух словах об основных методах расскажите

Добавлено @ 08:28 
и вообще о всем обьекте, Как у каждой ячейки проверять? там ведь только весь обьект целиком! если картинки в ячейки вставлять нельзя, то мне не подойдет 

А вообще как в ДЕлфи прога выполняется? в паскале все понятно там код, ну из юнитов чето иногда грузится, а в делфи я поля основной программы незаметил, там сразу юниты, если я к примеру хочу чтоб в процедуре проверялась какая то переменная глобальная, и по этой переменной в процедуре делалось то или иное действие, я пробую над процедурой(относящейся к кнопке событие онклик, главная форма) присвоить переменной тру или фолз, но ошибка, так как это юнит я это собственно и сам понимаю, но не знаю как переменной присвоить значение, есть мысль что по событию формы Oncreate надо этой переменной присвоить значение, так чтоли?

Добавлено @ 09:08 
но все же непонятно где код программы который не в юнитах

Добавлено @ 09:20 
относится ко всей теме. Если можете помоч то учтите.
Я пытаюсь сделать аналог графического редактора, с крупными "пикселями", где каждым "цветом" выступает определенная картинка (подгружаемая из файла *.bmp). То что нарисовали должно быть сохранено в файле. Была бы матрица по которой строится изображение, точнее матрицу то я сделать могу , но потом чтоб её вывести это проблема , и предположим выбрал я элемент домик, а на построенном по матрице изображении в ячейке 4по горизонт,5по верт травка, щелкнул бы по этому элементу, предварительно выбрав элемент карандаш(или кисть) и вместо травки бы получился домик, и в матрице значение элемента( 4по горизонт,5по верт )  бы поменялось с 1 на 2, и на изображении графически я бывсе это увидел. 

в Project1.exe
svarogik  - ОДИН ВОПРОС ОДНА ТЕМА !!!


fixedcols -> 0
fixedrows -> 0


что проверять?


Там же вам передаются все параметры каждой ячейки - прямоугольник т.е. rect рисуйте в указаной области на canvase drawgrida любой рисунок. У drawgrida - есть куча событий на перерисовку - в них и отрисовывайте все ваши картинки.

Почитайте справку!
OnColumnMoved
OnDrawCell
OnRowMoved
OnSelectCell
OnMouseDown
OnMouseUp
OnClick
                

             

Зачем стразу картинку то грузить? Почему бы просто не закрашивать ячейку? 

Тогда я делаю не графический редактор, а редактор карт для игры, теперь понятно зачем? а где события смотреть для каждой ячейки?

Добавлено @ 12:11 
и можно сделать типа цикла, 


код плохо представляю пока только принцип 

Нет. 
Любой цвет можно нарисовать самому!


У ячеек нет событий. События есть у StringGrid'а

 

у DrawGrid1.MouseToCell(); первыми формальными параметрами что делать?

Добавлено @ 12:21 
если нет событий как по щелчку изменить цвет отдельной ячейки? 

Как же нет MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);


просто в  MouseDown пишем


после вызова в Col, Row - будут нужные значения строки и столбца -куда нажали 

вот что получилось остановился курсор после mousetocell(x,y,col,     и вот что говорит
[Hint] MapEditor.pas(110): Variable 'buff' is declared but never used in 'TEditor.N4Click'
[Hint] MapEditor.pas(155): Variable 'buff' is declared but never used in 'TEditor.N3Click'
ну на это можно забить,
[Error] MapEditor.pas(205): Types of actual and formal var parameters must be identical
[Error] MapEditor.pas(41): Unsatisfied forward or external declaration: 'TEditor.DrawGrid1Click'
[Error] MapEditor.pas(42): Unsatisfied forward or external declaration: 'TEditor.MouseToCell'
[Fatal Error] Map_Editor.dpr(7): Could not compile used unit '..\MapEditor.pas'

Добавлено @ 12:52 
я понимаю что типы должны быть разные, почему ты сделал разными?

Добавлено @ 12:53 
тоесть одинаковые, зачем сделал разные? 

svarogik, А это компилятор капризничает
ладно тогда так

это называется строгая проверка типов, формально Longint и Cardinal разные типы, реально на 100% тоже самое!

Добавлено @ 12:56 
что касается

так не надо ж было с заголовком копировать!
у меня он просто называется drwgrd1 вместо обычного DrawGrid1! 

а это что за лажа [Error] MapEditor.pas(194): Undeclared identifier: 'MouseToCell' 




Добавлено @ 13:05 

спокойно, с этим я разобрался сам

Добавлено @ 13:12 
а если я добавлю  то он останавливается напротив строки в добавлениях процедур

Добавлено @ 13:14 
и говорит вот че [Error] MapEditor.pas(42): Unsatisfied forward or external declaration: 'TEditor.MouseToCell'
[Fatal Error] Map_Editor.dpr(7): Could not compile used unit '..\MapEditor.pas' 

Конечно, если не считать, что один тип знаковый, а другой беззнаковый, то всё верно - они одинаковые. Стало быть и многие другие типы - одинаковые 

Добавлено @ 13:31 
 
Извиняюсь за небольшой оффтопик. 

Это сообщение отредактировал(а) Yanis - 14.7.2006, 13:31

нет меня интересует непонятная ошибка, когда я прописал процедуру до имплементэйшн там ступорится прога 

короче так сделал и все, программа запускается, только что делает не понятно
 

Извините тут уже я заглючил  


а вот это 

я просто показал какие параметры она принимает - этого не нужно было никуда писать

Добавлено @ 14:12 

Ниченого не делает просто мы получили номер ячейки по которой кликнули.

да согласен не совсем верно (хотя и размер одинаковый) 

спасибо очень продвинули конечно, а можно теперь узнать как цвет выбранной ячейки сменить 

Это совсем просто



Добавлено @ 14:43 
Вообще так делать не правельно!
нужно сохранять где-то цвета, а затем
в procedure TForm1.drwgrd1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
отрисовывать каждую своим цветом!

Добавлено @ 14:45 
Например, сделать динамический массив соответствующей размерности  

Это сообщение отредактировал(а) alexeis1 - 14.7.2006, 14:58

цвета будут сохранятся в матрице а по ней придумаю как прорисовать  (оох как все сложно в паскале графика какой элементарной былаа...) 

Зачем придумывать когда есть событие DrawCell, как только кликнул, так сразу должен вызваться обработчик, чтоб перерисовать!
Причем он же позволяет рисовать только те которые стерлись или изменились 

тэкс... поподробней можешь? 

При кликаньи рисуется рамочка, значит изображение клетки "попортилось", любая порча изображения вызовет событие, в данном случае это будет onDrawCell, в нем предлагают програмисту написать код который дорисовыват что-то в клетке(по усмотрению програмиста)
если мы знаем какого цвета была ячейка, то рисуем ее
 

пытаюсь прорисовку так сделать, но почему то не работает

Добавлено @ 15:31 
по идее должен появится в ячейке 1.2 клеточка с постоянным зеленым цветом не реагирующим на щелчки 

А зачем цикл событие возниает для каждой ячейки отдельно!
Если надо обнавить все то просто вызвать
 DrawGrid1.Invalidate;
тогда события по перерисовке возникнут для всех ячеек по очереди без всяких циклов! 

не, а как установить соответствие между матрицей и прорисовкой таблицы? матрица грузится из файла а по ней рисуется 

а это к чему?


я пологаю надо было


и дальше просто

 

у меня на этом событии и так много не хотел все пихать в одну кучу, этож только для отладки 

так это без разницы, заранее загрузить и все! 

сделал как советуешь, даже засунул орм креейт, но теперь совсем нехорошо выскакивает ошибка, причем когда прога уже запущена, вылетает, потом ставится зеленая стрелочка напротив   

Покажи инициализацию
matrix 

непонимаю 

matrix - это динамический массив или статический?
Если динамический, то покажи, как устанавливается его размер
Если статический, то как обявлен в разделе var

Добавлено @ 16:25 
такое ощущение, что его размер меньше размера Грида... 

matrix: array of array of integer;

setLength(matrix,4,4);


 

Поставь брекпоинт перед этой строчкой и посмотри содержимое
matrix в окне watch (как в паскале по ctrl+F5) создан ли массив? 

создан только у него все по нулям а одно значение какое то 32000 

Присоединённый файл ( Кол-во скачиваний: 28 )
 Editor.part1.rar 107,42 Kb

вот второй том

Добавлено @ 16:55 
там две процедуры с одинаковыми названиями одна закоментирована, если закоментировать другую а её разкоментировать то программа начнет работать, ну только без прорисовки клеток

Добавлено @ 16:57 
 процедура TEditor.DrawGrid1DrawCell, остальноез акоментированное лучше не трогать 

Присоединённый файл ( Кол-во скачиваний: 28 )
 Editor.part2.rar 89,40 Kb

Странно экзешник у меня запустился нормально!, а вот кода ни одного модуля я не обнаружил   

тут вот еще что надо 

Присоединённый файл ( Кол-во скачиваний: 3 )
 nado.rar 4,43 Kb

Да работает он нормально(я подрезал его чуть-чуть  )
Лови 
 

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

Присоединённый файл ( Кол-во скачиваний: 2 )
 vot.rar 15,70 Kb

После урезки всего лишнего твой код и так запустился   

ну так не полноценно же 

Добавлено @ 18:10 
а что ты изменил то? невероятно, запустилось и работает! как??? только вместо красивых белых ячеек все остальные стали черные

Добавлено @ 18:13 
а как сохранить все в отдельной папке с перенесением всех ссылок и библиотек в новую папку, а то неприкольно шастать по куче папок собирая части кода

Добавлено @ 18:16 
И почему когда я щелкаю по рабочему полю правой кнопкой, оно окрашивается в зеленый сразу, и сохраняет окраску, а левой только двойной щелчек окрашивает, да и то до следующего клика?

Добавлено @ 18:17 
Ладно, короче, большое спасибо тебе alexeis1

M Girder

Прошу не забывать!: "Одна тема-один вопрос"

  

svarogik, 

потому что осталсось окрашивание в OnButtinDown, а я его удалил в последнем фрагменте
Я удалил почти все что мне было непонятно и ссылки да другие модули, который отсутствовали на тот момент.


да работает нормально без проблем, а процедуру клика в этом случае надо переделать

Добавлено @ 20:11 

надо в файле проекта короткие пути (типа in ../folder/myunit.pas) заменить на имена файлов
(myunit.pas) 

Процедуру клика надо сделать примерно такой

по идее после клика должна произойти перерисовка, которая сама и нарисует эту ячейку нужным цветом (ведь мы занесли правельный цвет в массив)  

Это сообщение отредактировал(а) alexeis1 - 14.7.2006, 20:11

 а картинки получается никак вставить нельзя?  

Почему это нельзя

это метод который отрисует изображение, например bitmap, загруженный, в TBitmap или jpeg, или Метафайл, а если будут дополнительные компоненты, то любой другой  .
x, y - левый верхний угол изображения

Добавлено @ 22:09 
вызвать его можно вместо canvas.fillrect, в обработчике события onDrawCell 

Извините, конечно, за offtop, но по-моему, даже если alexeis1 тебе поможет, тебе всё равно необходимо выучить азы Delphi. Так как всегда помогать тебе никто не сможет... И ещё:
Тебе в Центр Помощи!
Один топик - один вопрос! 

Товарищ гуедда представляете но это уже не азы, я неплохо знаю паскаль, и кое что из делфи, так называемые азы, иначе я бы спрашивал что есть делфи, а этот форум для того и создан чтоб вопросы задавать! так на любую тему можно сказать "иди учи делфи", мой топик же целиком посвящен обьекту Tdrawgrid и его методам если бы мне не хотели помоч то мне бы и не ответили, топик бы уже давно затерялся на 2-ой странице 

Я думаю следует провети небольшие изменения

Тема вышла из границ одной цельной темы и имеет смысл разбить на две части 
1) По DrawGrid и работе с ним (оставить здесь)
2) По графике в Делфи и работе с TCanvas и картинками - в разделе про графику!
Все таки это форум, а не чат, а сообщения затем используются другими пользователями для решения подобных вопросов.
Если договорились - то вторую тему в раздел графика