 Подключение мыши, (программа Кроссворд) |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| -LOVE133- |
 19.04.2006 11:12
Сообщение
#1
|
|
Гость  |
скачала несколько юнитов для работы с мышью, но при запуске программы требует файл типа TPU , а все юниты просто с расширение PAS. что в этих ситуациях обычно делают?
|
 
|
|
  |
Ответов
| Бродяжник |
5.05.2006 14:37
Сообщение
#2
|
|
Бывалый  Группа: Пользователи Сообщений: 206 Пол: Мужской Репутация:  3  |
Уважаемая Love (можно без 133?),
я тем временем немного поправил циклы, так что меню уже почти работает. Единственное, что накладываются друг на друга сообщения, так что их надо как-то очищать, когда они уже не нужны. Я обвел кнопки рамочками по размеру области для MouseIn, чтобы четко видеть, где отлавливается щелчок. И я уже почти закончил рекурсивную модельку, которая по заданной сетке подбирает гнезда и заполняет их, следя за пересечениями. Думаю, что сегодня и закончу. Она с массой ограничений, но схема там работает. А уже завтра гляну на Ваш материал. Прикрепленные файлы 
1.pas ( 5.39 килобайт )
Кол-во скачиваний: 147 |
   |
|
Сообщений в этой теме
-LOVE133- Подключение мыши 19.04.2006 11:12
volvo Обычно - просто компилируют PAS файл модуля, и ком... 19.04.2006 11:16 Гость а еще хотела спросить в вашем юните в МИККИ что об... 19.04.2006 13:43 volvo Там же написано:
19.04.2006 13:49 LOVE133 пытаюсь реализовать такой алгоритм :
1) есть сетка... 19.04.2006 14:31 Бродяжник Вот примитивная заготовка, чтобы понять основные м... 19.04.2006 16:40 LOVE133 а нет процедуры. которая определяет, в каком месте... 19.04.2006 21:25 volvo Чем
Procedure GetMouseXY(VAR KoordX,KoordY:Word );... 19.04.2006 21:34 LOVE133 все.... перепутала просто один юнит с другим :) ... 19.04.2006 21:38 volvo Если не хочешь получать после вывода графики и дви... 19.04.2006 21:41 LOVE133 у меня есть сетка (line(x1,y1,x2,y2)) которые деля... 19.04.2006 21:47 volvo Пишу прямо здесь, так что могут быть мелкие помарк... 19.04.2006 22:07 LOVE133 Немного доработала.Теперь в процессе создаю матри... 20.04.2006 21:35 LOVE133 вчера вечером посидела, вот что получилось
proce... 23.04.2006 17:11 volvo program IncMassive;
type
setArray = array[1..10,... 23.04.2006 18:36 LOVE133 в данном случае мне нужно, что б он проверил матри... 23.04.2006 18:51 LOVE133 скачала словарь существительных, теперь его пытаюс... 26.04.2006 22:05 Бродяжник Словарь скачивать пока влом, поэтому маленький воп... 27.04.2006 8:23 LOVE133 да, я его специально переделывала из текстового в ... 27.04.2006 12:45 Бродяжник ладно, уговорили. Скачаю Ваш словарь, отсортирую, ... 27.04.2006 12:49 LOVE133 так это и надо было, просто для того чтобы это сде... 27.04.2006 13:04 Бродяжник Это типа словарь 27.04.2006 13:25 LOVE133 пасибки )) то что нужно и даже больше ))
я где-то ... 27.04.2006 13:33 Бродяжник Ох...
Это очень сильно зависит от того, какой буде... 27.04.2006 15:20 LOVE133 смысл понятен, только как проверять подходит слов... 3.05.2006 15:47 Бродяжник Структура самого гнезда очень простая - координаты... 3.05.2006 16:22 LOVE133 Setka[Gnezdo[1].x][Gnezdo[1].y+i] := Slovo[i+1];
... 3.05.2006 16:31 Бродяжник Slovo - это слово из словаря, которое мы сейчас пр... 3.05.2006 16:39 LOVE133 понятно, теперь сижу втыкаюсь ... вот еще косяк ... 3.05.2006 16:47 volvo Какой именно? У тебя их 3... 3.05.2006 17:00 LOVE133 они по моему все не работают, один общий, то есть ... 3.05.2006 17:11 LOVE133 Вот что у меня получилось . структура данных
Tg... 4.05.2006 8:45 Бродяжник if horizontal then
begin
okgor:=true;
... 4.05.2006 10:20 LOVE133 конечно, интересно мне все.С мышью я тоже мучалась... 4.05.2006 15:13 Бродяжник Я позволил себе
1) сделать так, чтобы клетки меня... 4.05.2006 17:28 LOVE133 циклы должны работать так
1) New- создать новую ... 4.05.2006 18:07 LOVE133 Уважаемый Бродяжник , посидели вчера , покумекали,... 5.05.2006 11:09 Бродяжник Хотя бы в какой-то степени оно работает!
(Я со... 5.05.2006 16:03 LOVE133 Вчера посидела с реализацией своей рекурсивной мод... 6.05.2006 7:38 Бродяжник Когда сдавать-то? :) 6.05.2006 8:06 LOVE133 сдавать демо-версию завтра, а у меня кроме веселог... 6.05.2006 10:37 Бродяжник Сочувствую...
В том файле, который Вы прикрепили п... 6.05.2006 13:30 LOVE133 а так , если пользоваться вашей программой. как е ... 6.05.2006 13:33 Бродяжник ща посмотрим...
Правка:
Жаль, но чтобы привести эт... 6.05.2006 14:08 LOVE133 завтра как-нибудь еще отверчусь, скажу, что все в ... 6.05.2006 14:33 LOVE133 вот... только теперь выясняется, что память в паск... 7.05.2006 14:52 Бродяжник Привет!
В последнем выложенном файле есть как ... 10.05.2006 9:41 LOVE133 Доброго времени суток ))
все координально передела... 12.05.2006 20:09 Бродяжник Вот, сыскал в сети... русские фонты для BGI. 15.05.2006 10:57 Бродяжник И еще есть замечания по рекурсии.
Во-первых, что д... 15.05.2006 12:05 LOVE133 после многочисленных тестов пришла к выводу что ре... 15.05.2006 16:24 Бродяжник Я уже почти заставил его работать, хотя тут, конеч... 16.05.2006 10:14 Бродяжник Оно работает!
Это еще актуально? 16.05.2006 11:17 LOVE133 Конечно актуально ))) допуск до экзамена )) тут не... 16.05.2006 12:45 Бродяжник Ладно, кладу то, что пока есть.
Те несколько кросс... 16.05.2006 13:30 LOVE133 пасибо вам огроменно , не знаю, что б я делала ))... 16.05.2006 13:41 Бродяжник Хорошо!
С интерфейсом Вы справитесь, Вы жутко ... 16.05.2006 17:18 LOVE133 Вчера докрутила, перестала мышь работать... не раб... 17.05.2006 15:49 Бродяжник :unsure: У мя все работает... и причин ему не рабо... 18.05.2006 15:13 LOVE133 надеюсь - это окончательный вариант... Только есть... 19.05.2006 13:51 Бродяжник Read this. 19.05.2006 16:16 LOVE133 Volvo , очень прошу вас прокомментировать код... ... 21.05.2006 22:01 pascal65536 Извините, что вмешиваюсь.
Просто Вы затронули инте... 23.05.2006 6:07 LOVE133 Я с удовольчствием рассмотрю все предложения ))) К... 23.05.2006 7:33 Бродяжник Love133
Если потерпите, завтра выложу версию с про... 24.05.2006 10:28 GoodWind тут вот какая мысль возникла... а ведь большинство... 24.05.2006 11:50 LOVE133 а потому словарь отсортирован по алфавиту и длине... 24.05.2006 12:50 pascal65536 GoodWind
Это поначалу так, что слова начинаются на... 24.05.2006 15:47 LOVE133 Paskal , как там насчет наработок ? мне было бы и... 24.05.2006 16:30 pascal65536 LOVE133
Думаете, быстрее? Нифига подобного. СтОит ... 24.05.2006 16:35 Бродяжник Oops...
Зашился я с работой, так что не до кроссво... 25.05.2006 16:43 LOVE133 давайте хоть черновик )))как-нибудь доковыряю, смы... 25.05.2006 19:22 pascal65536 Выкладываю исходник, для общего ознакомления.
Толь... 25.05.2006 21:19 Бродяжник Вот.
Читайте ReadMe.txt
Может, стоит подумать над ... 26.05.2006 9:31 LOVE133 Пасибки огромное ))) потихоньку разбераюсь, все ра... 27.05.2006 10:06
Бродяжник Удачи! 29.05.2006 9:07 |
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 8.08.2025 4:22 |