Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 578
от 31.08.2006, 12:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 369, Экспертов: 59
В номере:Вопросов: 6, Ответов: 8


Вопрос № 53222: Здравствуйте уважаемые эксперты портала RusFaq!!! Помогите мне разобраться: где можно найти компонент ListView, чтобы можно было присваивать иконки строкам. Или как это проделать со стондартным компонентом. Внимание: не иконки каких-то файлов, а ...
Вопрос № 53234: Доброго времени суток. Есть проблема: необходимо динамически создать несколько страниц элемента PageControl, на каждой из которых будет TImage, причем количество страниц заранее не известно. Подскажите, как это лучше всего сделать?...
Вопрос № 53269: Уважаемые Зксперты!При установке компонента CoolTrayIcon на Delphi 7 высвечивается [Fatal Error] CoolTrayIcon.pas(1): Program or unit 'CoolTrayIcon.pas' recursively uses itself.Помогите!!!Пожалуйста....
Вопрос № 53290: Здравствуйте. Как програмно скомпилировать папку с HTML файлами в CHM файл. Желательно дать ссылку на ресурс где это подробно описано, или хотя бы подсказать, какой компон ент для этого использовать. Заранее благодарен за помощь....
Вопрос № 53307: Здравствуйте, уважаемые эксперты! Я пишу игру что-то типа Лабиринта. Мне нужно найти кратчайшее расстояние от одной точки лабиринта до другой. Неподскажите какой алгоритм мне лучше использовать? Если можно с хотябы кратким его описанием. ПЛИЗ.....
Вопрос № 53324: Доброго времени суток, уважаемы эксперты. Есть проблема хочу узнать кол. строк в гриде делаю так: Label3.Caption:=InttoStr(Query1.RecordCount) получаю -1 А так Label3.Caption:=InttoStr(DBGridEh1.RowCount) получаю ...

Вопрос № 53.222
Здравствуйте уважаемые эксперты портала RusFaq!!!
Помогите мне разобраться: где можно найти компонент ListView, чтобы можно было присваивать иконки строкам. Или как это проделать со стондартным компонентом. Внимание: не иконки каких-то файлов, а простые иконки или картинки, чтобы они были слева от строчки.
Заранее огромное спасибо.
Отправлен: 25.08.2006, 11:58
Вопрос задал: xXx (статус: 5-ый класс)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Mexes
Здравствуйте, xXx!
Берете обычный ListView:TListView, устанавливаете Viewstyle="vsReport." Картинки будут браться из SmallImages, поэтому нужно ассоциировать это свойство с каким-либо ImageList.
Картинки для строчки берутся по индексу из SmallImages:
ListView.Items.Item[i].ImageIndex:={индекс нужной картинки};
Ответ отправил: Mexes (статус: 2-ой класс)
Ответ отправлен: 25.08.2006, 12:09
Оценка за ответ: 5
Комментарий оценки:
Огромное спасибо, я уже разобрался.

Отвечает: Савенко Вадим Иванович
Здравствуйте, xXx!
Еше хотелось бы добавить следующее: чтобы ListView работал
в режиме vsReport, нужно создать хотя бы одну колонку (column).
Редактор колонок вызывается двойным щелчком по ListView.
Еще можете посмотреть похожие компоненты на www.torry.net
Ответ отправил: Савенко Вадим Иванович (статус: 9-ый класс)
Ответ отправлен: 25.08.2006, 12:50
Оценка за ответ: 5
Комментарий оценки:
Огромное спасибо, я уже разобрался.

Отвечает: Zлоумышленник
Здравствуйте, xXx!
Смотрите книгу Марко Кэнту "Delphi 7 для профессионалов" стр. 236-240, статья называется "Графический список ссылок".
Книга доступна для скачивания в Инете и весьма полезна для ознакомления.
---------
Стандарт есть легкоусвояемая форма, маскирующая присутствие или отсутствие содержания.
Ответ отправил: Zлоумышленник (статус: 9-ый класс)
Ответ отправлен: 25.08.2006, 16:36


Вопрос № 53.234
Доброго времени суток. Есть проблема: необходимо динамически создать несколько страниц элемента PageControl, на каждой из которых будет TImage, причем количество страниц заранее не известно. Подскажите, как это лучше всего сделать?
Отправлен: 25.08.2006, 13:04
Вопрос задал: Elpher2006 (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Zлоумышленник
Здравствуйте, Elpher2006!
Здравствуйте, Elpher2006!
Марко Кэнту в своей книжке "Delphi 7 для профессионалов" рекомендует в данном случае использовать вместо PageControl -> TabControl. Почитайте стр. 253-256, статья называется "Средство просмотра изображений Image Viewer с собственными вкладками".
Книга доступна для скачивания в Инете и весьма полезна для ознакомления.
---------
Стандарт есть легкоусвояемая форма, маскирующая присутствие или отсутствие содержания.
Ответ отправил: Zлоумышленник (статус: 9-ый класс)
Ответ отправлен: 25.08.2006, 16:36


Вопрос № 53.269
Уважаемые Зксперты!При установке компонента CoolTrayIcon на Delphi 7 высвечивается [Fatal Error] CoolTrayIcon.pas(1): Program or unit 'CoolTrayIcon.pas' recursively uses itself.Помогите!!!Пожалуйста.
Отправлен: 25.08.2006, 19:11
Вопрос задал: Kondratev (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: sir henry
Здравствуйте, Kondratev!
Это переводится на русский как:
"Программа или модуль 'CoolTrayIcon.pas' в строке Uses подключает сам себя."
Загляните туда и посмотрите так ли это. Если так, то это явно конструктивный нонсенс и я бы Вам не советовал применять компонент с стакими детсадовскими ляпами.
Ответ отправил: sir henry (статус: Академик)
Россия, Красноярск
----
Ответ отправлен: 26.08.2006, 07:53
Оценка за ответ: 5
Комментарий оценки:
Спасибо!Все понятно.


Вопрос № 53.290
Здравствуйте. Как програмно скомпилировать папку с HTML файлами в CHM файл. Желательно дать ссылку на ресурс где это подробно описано, или хотя бы подсказать, какой компонент для этого использовать. Заранее благодарен за помощь.
Отправлен: 25.08.2006, 22:04
Вопрос задал: KEOs (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 4)

Отвечает: Савенко Вадим Иванович
Здравствуйте, KEOs!
Посмотрите здесь:

http://softsearch.ru/programs/104-656-chm2web-for-xussr-download.shtml

параметры можно через командную строку задавать, ну а вызов через ShellExecute.
Ответ отправил: Савенко Вадим Иванович (статус: 9-ый класс)
Ответ отправлен: 25.08.2006, 22:21


Вопрос № 53.307
Здравствуйте, уважаемые эксперты! Я пишу игру что-то типа Лабиринта.
Мне нужно найти кратчайшее расстояние от одной точки лабиринта до другой. Неподскажите какой алгоритм мне лучше использовать? Если можно с хотябы кратким его описанием. ПЛИЗ..
Отправлен: 26.08.2006, 05:42
Вопрос задала: KInika (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Сухомлин Кирилл Владимирович
Здравствуйте, KInika!
Если у вас лабиринт на прямоугольной матрице, то наиболее простым, хотя, конечно, не самым быстрым, будет алгоритм типа заливки. Для него, опять же, проще всего, создать вспомогательный двумерный массив переменных типа Word или даже Integer.
В лабиринте, где довольно мало ходов и много стен, эффективнее было бы создавать передвигающихся "агентов", но это я сходу не скажу, как сделать.

В примере написана рекурсивная процедура. Она тоже - не самая эффективная, т.к. находит кратчайшее расстояние сразу до всех точек от указанной во входной процедуре (числа, которые будут записаны в ячейках HelpArray и будут расстояниями до точки с координатами, которые вы передадите процедуре Flood при ее вызове)

А вот если вам понадобиться востановить еще и путь(маршрут), то это уже сложнее - понадобиться либо сохранять дополнительную информацию, либо писать еще одну рекурсивную процедуру и уже по готовому HelpArray вычислять маршрут.

Приложение:

---------
Не узнаешь - не попробуешь.

Ответ отправил: Сухомлин Кирилл Владимирович (статус: Студент)
Ответ отправлен: 26.08.2006, 19:59
Оценка за ответ: 4


Вопрос № 53.324
Доброго времени суток, уважаемы эксперты.

Есть проблема хочу узнать кол. строк в гриде делаю так:

Label3.Caption:=InttoStr(Query1.RecordCount) получаю -1

А так

Label3.Caption:=InttoStr(DBGridEh1.RowCount) получаю 29

А визуально вижу 38

Подскажите в чем проблема или может, есть другой путь определения количества строк?

Заранее благодарю, Алексеев А.В.
Отправлен: 26.08.2006, 10:42
Вопрос задал: Алексеев Александр Владимирович (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Mexes
Здравствуйте, Алексеев Александр Владимирович!
Здесь зависит от БД, если Query1.RecordCount не даёт корректный результат, попробуйте:
a)
Query1.FetchAll;
Label3.Caption:=InttoStr(Query1.RecordCount);
b)
Query1.Last;
Label3.Caption:=InttoStr(Query1.RecordCount);
//Если надо пройтись по результату запроса, то надо вернуться в начало
Query1.First;

А самый универсальный способ, не зависящий от БД, это после выполнения запроса в цикле ПОКА НЕ Query1.Eof идти по записям Query1.Next и считать их...
Ответ отправил: Mexes (статус: 2-ой класс)
Ответ отправлен: 26.08.2006, 14:31
Оценка за ответ: 5
Комментарий оценки:
Огромное спасибо. Все заработало.


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2006, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Версия системы: 4.35 от 27.07.2006
Яндекс Rambler's Top100

В избранное