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

Программирование на Delphi

  Все выпуски  

Программирование на Delphi (выпуск 55)


Программирование на DELPHI
Выпуск #55 (21 октября 2006 г.)

Разделы сайта:

Новости сайта
Delphi.int.ru Expert
Файловый архив
Статьи
Компоненты
Plug-in's
Документация
Исходники
Изображения
Игры
Программы
Форум
F.A.Q.
Архив рассылки
Каталог сайтов
Обратная связь

Доброго времени суток, уважаемые читатели!

Особо и сказать нечего... Выпуск как выпуск...

На сайте делаются небольшие обновления, Delphi.int.ru Expert тоже потихоньку развивается...

Система пользовательских изображений (аватаров) интегрирована во все остальные страницы - "Эксперты системы", "Рейтинги экспертов" и "Информация об участнике". Загрузить свой рисунок или фотографию можно на странице настроек учётной записи.

Статистика системы на 21.10.2006:

Зарегистрированных экспертов: 61, из них в активном режиме 49.
Участниками задано вопросов: 136.
Всего отправлено ответов: 252.

Приятного чтения и до скорой встречи!

Разделы рассылки:

Авторское слово
Delphi.int.ru Expert
Статья по Delphi
Файловый архив
Друзья
Юмор

Количество читателей рассылки: 5344.

Delphi.int.ru Expert

Задать вопрос экспертам >> Стать экспертом или уйти из состава экспертов >>Эксперты системы >>

Delphi.int.ru Expert  – вопросы и ответы (#71 - #80)
Вопрос № 71

Текст вопроса:

Как узнать температуру процессор и скорость вращения вентилятора?

Автор вопроса: Иван (статус: Посетитель)
Дата и время отправки вопроса: 29.06.2006, 19:09
Получено ответов на вопрос: 1
Сообщений в форуме вопроса: 1
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Матвеев Игорь Владимирович (статус: 10-ый класс), 30.06.2006, 06:48]:

Здравствуйте, Иван!
Узнать температуру процессора можно, посмотрев ее в BIOS, в Вашей программе это можно сделать, написав свой драйвер, работающий в ring-0, чтобы можно было обращаться к памяти, где расположены данные BIOS. См. www.wasm.ru.
Скорость значания вентилятора.. Можно разобрать корпус, посмотреть марку и выяснить скорости, на которых он работает. Вообще есть технологии, регулирующие скорость вращения вентилятора в зависимости от загруженности процессора, но, думаю, до них не добраться.



Вопрос № 72

Текст вопроса:

Нахожу файл temp.dbf. Отрываю его с помощью
TTable, а мне выдает ошибку что файл не того формата. Он дествительно формата XML!!!

Вопрос !!!!!!!
Как мне определить, является ли файл temp.dbf
таблицей формата FoxPro, до его открытия????

Автор вопроса: Игорь Середюк (статус: Посетитель)
Дата и время отправки вопроса: 29.06.2006, 19:40
Получено ответов на вопрос: 1
Сообщений в форуме вопроса: 0
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Вадим К (статус: 8-ой класс), 30.06.2006, 12:33]:

Здравствуйте, Игорь Середюк!
Можно конечно открыть файл и попытаться определить его структуру, но можна и проще - попытаться открыть, при этом процедуру открытия взять в try except. Вот как это будет выглядеть
try
//Здесь код, который открывает таблицу и приводит к ошибке
except
//А сюда мы попадём, если в выше стоящем куске будет ошибка. Мало того, мы даже можем получить её текст! Как - ниже.

exit; //Ошибку обработали, но продолжать работать дальше скорее всего нельзя
end;
//А здесь код, который будет дальше работать с таблицей.

Иногда хочеться получить текст ошибки. Для этого в except

end;

вписываем такой код
on E: Exception do
ShowMessage(E.Message);//выводим сообщение

Оценка за ответ: 5.



Вопрос № 73

Текст вопроса:

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

Автор вопроса: Игорь Середюк (статус: Посетитель)
Дата и время отправки вопроса: 29.06.2006, 21:04
Получено ответов на вопрос: 3
Сообщений в форуме вопроса: 0
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Виталий Лещенко (статус: 2-ой класс), 30.06.2006, 01:14]:

Здравствуйте, Игорь Середюк!
Очень просто. Для строк также доступны операции сравнения.
a < b, a > b, a = b, a <> b
Вот простая пузырьковая сортировка.
Здесь list - массив строк, count - количество строк.

Приложение:

2. [Отвечает: Матвеев Игорь Владимирович (статус: 10-ый класс), 30.06.2006, 06:55]:

Здравствуйте, Игорь Середюк!
Возможно также сделать свою функцию сравнения - например для национальных языков (украинский например). Я уже выкладывал здесь пример, но выложу еще раз, т.к. ссылку не помню.
См. http://www.delphi.int.ru/expert/?step=download&id=6.

3. [Отвечает: Alexander A. Gribanov (статус: 2-ой класс), 30.06.2006, 10:11]:

Здравствуй, Игорь !

Чем не устраивает TStringList.Sort ? В нём для сортировки используется AnsiCompareStr, следовательно всё делается с учётом текущей локализации. Для сортировки в "экзотических" кодировках можно использовать TStringList.CustomSort



Вопрос № 74

Текст вопроса:

Как узнать высоту панели инструментов?

Автор вопроса: Игорь Середюк (статус: Посетитель)
Дата и время отправки вопроса: 04.07.2006, 21:03
Получено ответов на вопрос: 2
Сообщений в форуме вопроса: 1
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Евгений Козаченко (статус: 1-ый класс), 05.07.2006, 12:22]:

Здравствуйте, Игорь Середюк!
Высоту какой панели инструментов? На Вашей форме или вкакой-то программе ОС?
Если на вашей форме:
htb:=myToolBar1.height;

Где htb - это целочисленная переменная, а myToolBar1 - название компонента.

Я правильно понял вопрос?

2. [Отвечает: Alexander A. Gribanov (статус: 2-ой класс), 05.07.2006, 14:28]:

Здравствуй, Игорь !

Или я не понял вопроса или TToolBar.Height тебе поможет...



Вопрос № 75

Текст вопроса:

Где можно посмотреть формат xsd?

Автор вопроса: Коштовалов В.А. (статус: Посетитель)
Дата и время отправки вопроса: 06.07.2006, 17:25
Получено ответов на вопрос: 0
Сообщений в форуме вопроса: 0
Страница данного вопроса >>


» Ответы на данный вопрос:

К сожалению, ответов на данный вопрос не поступило...



Вопрос № 76

Текст вопроса:

Уточнение к вопросу 74!!!!!!
Как узнать высоту панели инструментов операционной системы (Вин2000)?
От высоты формы отталкиваться не надо!!!

Автор вопроса: Игорь Середюк (статус: Посетитель)
Дата и время отправки вопроса: 06.07.2006, 21:12
Получено ответов на вопрос: 1
Сообщений в форуме вопроса: 0
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Помфюк Владимир Степанович (статус: 6-ой класс), 07.07.2006, 10:26]:

Здравствуйте, Игорь Середюк!
Screen.Monitors[0].BoundsRect.Height-Screen.Monitors[0].WorkareaRect.Height
Если мониторов несколько, то вместо 0 - индекс того, который primary



Вопрос № 77

Текст вопроса:

Опять вопрос о высоте панели инструменто.

Я пробую
Screen.Monitors[0].BoundsRect.Height-Screen.Monitors[0].WorkareaRect.Height
а при компиляции выдает ошибку

[Error] Poisk_Gl.pas(629): Undeclared identifier: 'BoundsRect'
[Error] Poisk_Gl.pas(629): Missing operator or semicolon
[Error] Poisk_Gl.pas(629): Undeclared identifier: 'WorkareaRect'
[Error] Poisk_Gl.pas(629): Missing operator or semicolon


Почему? Что делать? Как узнать высоту панели инструментов?

Автор вопроса: Игорь Середюк (статус: Посетитель)
Дата и время отправки вопроса: 07.07.2006, 20:16
Получено ответов на вопрос: 0
Сообщений в форуме вопроса: 1
Страница данного вопроса >>


» Ответы на данный вопрос:

К сожалению, ответов на данный вопрос не поступило...



Вопрос № 78

Текст вопроса:

Здравствуйте, уважаемые эксперты!
У меня есть пару вопросов:

Вопрос1. Есть ли где-либо коппонент для организации подсветки html кода (например через RichEdit)???

Вопрос 2. Если есть, то как им пользоваться???

За ранее, спасибо!

Автор вопроса: Евгений В (статус: 1-ый класс)
Дата и время отправки вопроса: 08.07.2006, 19:11
Получено ответов на вопрос: 2
Сообщений в форуме вопроса: 0
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Евгений Козаченко (статус: 1-ый класс), 08.07.2006, 19:40]:

Здравствуйте, Евгений В!
Конечно есть... :)

Я использую RichEdit Syntax Highlight v.3.2

Там всё просто. Поймёте сами. Скачать можно тут:
http://users.chello.be/ws36637/
***
Кроме него можно использовать SynEdit, но он плохо устанавливаеться (по крайней мере у меня :))
Сайт компонента:
http://synedit.sourceforge.net

Оценка за ответ: 5.
Комментарий: Спасибо!!!

2. [Отвечает: Матвеев Игорь Владимирович (статус: 10-ый класс), 09.07.2006, 05:38]:

Здравствуйте, Евгений В!
Лучше всего это сделать самому, тем более что это совсем не сложно.
Если писать самому лень - лучший выбор - SynEdit, очень хорошая библиотека, жаль только крестиков, для сворачивания текста, как в Delphi 8 или VS нет.

Оценка за ответ: 4.



Вопрос № 79

Текст вопроса:

Возникла необходимоть отображения на форме изображений из файлов формата .png с альфа-каналом. Как это возможно реализовать? К сожелению стандартный компонент TImage не поддерживает загрузку изображений из файлов такого формата.

Автор вопроса: VirtualTT (статус: Посетитель)
Дата и время отправки вопроса: 09.07.2006, 00:18
Получено ответов на вопрос: 1
Сообщений в форуме вопроса: 0
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Матвеев Игорь Владимирович (статус: 10-ый класс), 09.07.2006, 05:34]:

Здравствуйте, VirtualTT!
Есть библиотека Portable Network Graphics Delphi, http://pngdelphi.sourceforge.net/, там реализован класс TPNGObject, предназначенный для работы с PNG. Он является потомком от TGraphic, поэтому после установки любой TImage сможет отображать и PNG.
На счет Alpha канала.. напомню, что иконки XP тоже могут отображать альфа канал. Это можно использовать, например, в Skin библиотеках. Так в PowerDVD не мешало бы сделать ползунок громкости в виде иконки с полупрозрачными краями. Главное, никакой переделки не требуется.
Библиотека Portable Network Graphics Delphi: http://www.delphi.int.ru/expert/?step=download&id=8

Оценка за ответ: 5.
Комментарий: Большое спасибо!



Вопрос № 80

Текст вопроса:

Как передать данные StringGrid в файл Excel с соохранением атрибутов форматирования

Автор вопроса: Семенюк Юрий (статус: Посетитель)
Дата и время отправки вопроса: 09.07.2006, 13:38
Получено ответов на вопрос: 2
Сообщений в форуме вопроса: 0
Страница данного вопроса >>


» Ответы на данный вопрос:

1. [Отвечает: Матвеев Игорь Владимирович (статус: 10-ый класс), 09.07.2006, 13:52]:

Здравствуйте, Семенюк Юрий!
В StringGrid нет никакого форматирования. На счет экспорта читайте http://www.delphi.int.ru/?name=articles&action=view&articleid=10.

2. [Отвечает: Darya Ermakova (статус: 8-ой класс), 10.07.2006, 12:46]:

Здравствуйте, Семенюк Юрий!
Вот в этой статье есть все необходимое для работы с Word и Excel. Очень хорошо, подробно и понятно написано.
http://www.kornjakov.ru/stat.htm#s0




Статьи  >>

Любой из читателей может присылать свои статьи по адресу info@delphi.int.ru и они будут опубликованы в ближайших выпусках рассылки и на сайте.


Файловый архив  >>

Название
Описание
Категория
Объём
Ссылки
&RQ Source
Исходники отличного ICQ-клиента, который отличается сравнительной простой и отсутствием всяких "украшений".
352 Кб
Quick Report 4.06 for D2006
Quick Report 4.06 для Delphi 2006 c исходным кодом.
943 Кб
Sprint Report
Программа для быстрого визуального составления отчета с последующим выводом в Excel и генерацией кода исполняемой процедуры.
Автор: Николай
804 Кб

Если у Вас есть книги по Delphi (в электронном виде, разумеется) или другая полезная документация - сообщите и её можно будет разместить на сайте.

Отправить файл »   

Ссылки  >>

Обмен баннерами приветствуется для сайтов схожей тематики. По поводу размещения текстовых ссылок обращайтесь сюда.

TIBRAZCO - Бесплатный софт, анекдоты про программистов, рассылка по программированию, справочники, учебники, советы по программированию.
http://xskernel.excode.ru/
Сайт, посвящённый написанию операционной системы. Новости, информация об XSystem Kernel Team, документация, глоссарий, исходники системы. Open Source - наше направление.
 
Рассылки Subscribe.Ru
Интернет для Delphi-программиста
Visual Basic для новичков и профессионалов
Программирование на Delphi
   
 

Юмор.

Ведущий раздела: Bruder

Не будите в программисте зверя

- Давай, Васек, стремянку, щас здесь долбить будем.
- Угу. Вот. Держи перфоратор. Тут долбим?
- Да.
- А если кабель перебьем?
- Да где перебьем-то? Вооон где все кабели-то идут!
- В этой конторе компьютерной провода где угодно быть могут!
- Вась! Не парь мне мой больной мозг! Лучше дай мне бур. Нет, не тот, на 18 дай, нам здоровая дырка нужна. Ну? Поехали...

(Долбят стену, создавая ужасный грохот. Кажется, что все здание вот-вот развалится. В дыре неожиданно раздается взрыв, вспышка, гаснет свет)

В темноте:

- Даааа, Вася, накаркал ты!
- Сам ты накаркал! Говорил ведь!
- Ну кто ж знал, что эти придурки тут силовой кабель проложат? Перфоратор жалко...

В темноте коридора раздаются неуверенные шаги и уверенный, многоэтажный мат тонким голоском. Строители настораживаются. Дверь вылетает от удара ноги, на пороге стоит что-то такое очкастое, волосатое и щуплое, вооруженное фанариком. От злости свет все время дергается.

- Уроды! - ругается очкарик.
- Ты кто? - хором спрашивают строители.
- Программист я!
- Гыыыы, слышь Вась! Он программист, как мы сразу не догадались. Дохлый такой, соплей перешибить можно. Чего тебе, программист?
- Сволочи! Два часа работы коту под хвост из-за вас! – программиста трясет, очки угрожающе посверкивают.
- Производственная накладка, что поделаешь? - издевательски.
- Накладка? - программист неожиданно высоко подпрыгивает и сильно бьет Васю в ухо. Непонятно за что, ведь говорил второй строитель. Вася падает, программист гневно сопит потом уходит. Строители в шоке.

Вася, держась за ухо:

- Ни за что! Ни за какие коврижки!
- Ты чего, Вась? Кто ни за что? За какие коврижки? Умом тронулся?
- Ни за что! У меня сын программистом хочет стать! Ни за какие коврижки!

:))

Присылайте компьютерные анекдоты, рассказы и истории по этой ссылке и они обязательно будут опубликованы.
Ведущий рассылки, Ерёмин Андрей.

В избранное