|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
02.12.2016, 20:08 | #1 |
Новичок
Джуниор
Регистрация: 02.12.2016
Сообщений: 3
|
нужно доделать дартс Delphi
Нужно сделать дартс с помощью StringGrida.
Матрицу я сделал, а прицел хочу сделать с помощью 2-х ScrollBar, то есть ScrollBar замкнуты условием на движение по кругу с помощью таймера, при 1-ом щелчке мыши ScrollBar останавливается и включается второй таймер (для второго ScrollBara). Сам прицел выглядит в виде двух линий вертикальной и горизонтальной, их пересечение и есть прицел, я хотел присвоить координаты центра ползунка, на ScrollBar линии. Помогите сделать эти линии(пробовал Canvas нарисовать, но они стираются), и присвоить им координаты. Код программы: Код:
Последний раз редактировалось Mobilis123; 02.12.2016 в 20:14. |
03.12.2016, 03:32 | #2 | |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 594
|
Цитата:
Нарисуй в пэйнте картинку с прозрачным фоном и крестом-прицелом на ней. И помести эту картинку на панель. А панель сделай прозрачной... (если дельфи 2010 или старше, на семерке это не прокатит) |
|
03.12.2016, 14:39 | #3 |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 594
|
Впрочем...
В семерке тоже можно сделать! Последовательность такова: 1. Создаем новую форму, пусть это будет NewForm. 2. Задаем в конструкторе ее свойства: FormStyle->StayOnTop Color и TransparentColorValue->любой цвет, но одинаковый TransparentColor->False BorderStyle->bsNone 3. На эту форму кладем TImage с картинкой-прицелом и устанавливаем ей Transparent->True 4. В событии OnShow главной формы (или когда это будет нужно для показа прицела) добавляем строчку: NewForm.Show; Всё! Теперь можно передвигать прицел хоть по всему экрану... |
04.12.2016, 15:55 | #4 |
Новичок
Джуниор
Регистрация: 02.12.2016
Сообщений: 3
|
Я через scrollbar не случайно делал, там суть такая, при первом щелчке мыши, останавливается 1-й scrollbar(вертикальная линия) при втором щелчке останавливается 2-й scrollbar(горизонтальная линия, а пересечение этих линий и есть прицел, а ячейка на которой остановился "прицел" открывается и появляется MessageDlg с вопросом и вариантами ответа на него.
Я уже 50% написал кода, осталось сделать сам прицел, привязать его координаты, к координатам ползунка scrollbarа и написать функцию выбора ячейки при попадании на неё "прицела") P.S. надеюсь поняли, как именно это должно выглядеть. |
04.12.2016, 15:57 | #5 |
Новичок
Джуниор
Регистрация: 02.12.2016
Сообщений: 3
|
Я через scrollbar не случайно делал, там суть такая, при первом щелчке мыши, останавливается 1-й scrollbar(вертикальная линия) при втором щелчке останавливается 2-й scrollbar(горизонтальная линия, а пересечение этих линий и есть прицел, а ячейка на которой остановился "прицел" открывается и появляется MessageDlg с вопросом и вариантами ответа на него.
Я уже 50% написал кода, осталось сделать сам прицел, привязать его координаты, к координатам ползунка scrollbarа и написать функцию выбора ячейки при попадании на неё "прицела") P.S. Работаю в 10-й делфи. Надеюсь поняли, как именно это должно выглядеть. |
04.12.2016, 19:27 | #6 | |
Форумчанин
Регистрация: 27.10.2014
Сообщений: 594
|
Цитата:
Делать это через скроллбары??? Ну это примерно то же самое, что отображать содержимое таблицы БД через набор TPanel... Я вообще-то предложила вам решить ваше главное затруднение - как сделать прицел, спокойно передвигаемый по любому участку экрана... Не устраивает? Ради бога - больше не смею вас отвлекать... |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Нужно доделать программу | nightly | Помощь студентам | 3 | 24.04.2012 14:52 |
Нужно доделать игру | Chuvak ot dushi | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 22.12.2010 22:18 |
записи. доделать нужно.. | Shelena | Помощь студентам | 5 | 21.11.2010 18:26 |
Помогите доделать программу на delphi - нужно сделать отчеты в Excel. | Yoha | Помощь студентам | 0 | 15.06.2009 23:15 |
Нужно доделать 2 сайта | Irina-70 | Фриланс | 1 | 19.02.2009 15:48 |