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

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

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 3.307 RSS
←   Март 2006   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://rusfaq.ru/
Открыта: 14-03-2002

Автор
Калашников О.А.

Статистика

3.307 подписчиков
0 за неделю
←   Все выпуски   →

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


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

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

Выпуск № 412
от 13.03.2006, 16:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 271, Экспертов: 67
В номере:Вопросов: 3, Ответов: 11

Вопрос № 36965: Где можно узнать какие пакеты для каких компонент нужно указывать в опции "Build with runtime packages"?...
Вопрос № 36987: Привет!Такой вопрос как Delphi организовать цикл от одного объекта типа Imege до 10-ого к примеру.В Лучшем случае использую имя обьекта.Как?...
Вопрос № 37006: Добрый день.Подскажите код на выключение кампа. Спосибо!...

Вопрос № 36.965
Где можно узнать какие пакеты для каких компонент нужно
указывать в опции "Build with runtime packages"?
Отправлен: 07.03.2006, 17:51
Вопрос задал: Орхан Гасымов Аяз (статус: 1-ый класс)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: sir henry
Здравствуйте, Орхан Гасымов Аяз!
Если Вы встанете курсором на тот или иной пакет и нажмете кнопку "Components", то увидите список компонентов относящиеся к этому пакету.
Ответ отправил: sir henry (статус: Академик)
Отправлен: 07.03.2006, 18:51
Отвечает: Николай Б.
Здравствуйте, Орхан Гасымов Аяз!
После установки пишется, какая библиотека создана. Названия пакетов обычно совпадают с названием устанавливаемого компонента.
---------
Лучшая благодарность - отличная (5) оценка за ответ!
Ответ отправил: Николай Б. (статус: 1-ый класс)
Отправлен: 07.03.2006, 19:20
Отвечает: Злоумышленник
Здравствуйте, Орхан Гасымов Аяз!
Меню Project|Information for {имя твоего проекта}
---------
Почему нет встроенного языка 1С на мордовском? Было бы клёво!
Ответ отправил: Злоумышленник (статус: 4-ый класс)
Отправлен: 08.03.2006, 10:35

Вопрос № 36.987
Привет!Такой вопрос как Delphi организовать цикл от одного объекта типа Imege до 10-ого к примеру.В Лучшем случае использую имя обьекта.Как?
Отправлен: 07.03.2006, 21:35
Вопрос задал: Сергей Николаевич (статус: 1-ый класс)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Ерёмин Андрей
Здравствуйте, Сергей Николаевич!
Достаточно просто:

var I: Integer;
...
for I:=1 to 10 do
TImage(FindComponent('Image'+IntToStr(I))).AutoSize:=True;


Подразумевается, что компоненты имеют имена Image1 - Image10. В данном примере для всех будет установлено свойство AutoSize в True.
---------
Нет правила без исключений. Правило без исключений - исключение из правил.
Ответ отправил: Ерёмин Андрей (статус: Профессор)
Отправлен: 07.03.2006, 21:39
Отвечает: sir henry
Здравствуйте, Сергей Николаевич!
Если пользоваться только именем, то идея дурная. Вам все равно придется использовать список имен объектов и на основании этого списка организовать цикл, который оперирует СЧЕТЧИКОМ объектов. Поэтому наиболее простой и разумный вариант - создать массив объектов типа TImage и в цикле его перебирать:
Var
Img: array[0..9] of TImage;
i: integer;
Begin
For i:=0 To 9 Do
Begin
img[i]:=TImage.Create(Form1);
img[i].Name:=Присваиваем какое-нибудь имя(если нужно);
{Ну и далее определяем нужные Вам свойства}
End;
End;
Ответ отправил: sir henry (статус: Академик)
Отправлен: 08.03.2006, 06:50
Отвечает: Ataman N. N.
Здравствуйте, Сергей Николаевич!
Можете эти объекты "загнать" в массив, а по массиву проще организовать цыкл.
Например:
arImg:array[1..10]of TImage;//объявляем массив
В FormCreate инициализируем массив
arImg[1] := Image1;
...................
arImg[10] := Image10;

Ответ отправил: Ataman N. N. (статус: 9-ый класс)
Отправлен: 09.03.2006, 17:49

Вопрос № 37.006
Добрый день.Подскажите код на выключение кампа.
Спосибо!
Отправлен: 08.03.2006, 05:21
Вопрос задал: Gava (статус: 1-ый класс)
Всего ответов: 5
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Лучников Юрий Владимирович
Здравствуйте, Gava!
Ответ на ваш вопрос содержится в статье "Как выключить, перезагрузить или завершить Windows?" с исходными кодами:http://vingrad.ru/DELPHI-DLP-000459.
Ответ отправил: Лучников Юрий Владимирович (статус: Студент)
Отправлен: 08.03.2006, 05:43
Оценка за ответ: 5
Комментарий оценки:
6+ Огромное спасибо.
Отвечает: 1e0n_xas
Здравствуйте, Gava!

Предлагаю простейший обработчик выключения компа:

if not ExitWindows(EW_RebootSystem, 0) then
ShowMessage('Приложение не может завершить работу');
Close;
Ответ отправил: 1e0n_xas (статус: 2-ой класс)
Отправлен: 08.03.2006, 06:17
Оценка за ответ: 5
Отвечает: Ерёмин Андрей
Здравствуйте, Gava!
Вот например:

function PowerOffOS: Boolean;
begin
Result := ExitWindows(EWX_POWEROFF);
end;

...

if not(PowerOffOS) then ShowMessage('Не удаётся заврешить работу системы.');


---------
Нет правила без исключений. Правило без исключений - исключение из правил.
Ответ отправил: Ерёмин Андрей (статус: Профессор)
Отправлен: 08.03.2006, 07:50
Оценка за ответ: 5
Отвечает: Diman_A
Здравствуйте, Gava!
Код для выключения - в приложении.

Приложение:

Ответ отправил: Diman_A (статус: 7-ой класс)
Отправлен: 08.03.2006, 09:48
Оценка за ответ: 5
Отвечает: Белов Александр Александрович
Здравствуйте, Gava!
Этот код находиться ниже в приложении.

Приложение:

Ответ отправил: Белов Александр Александрович (статус: 1-ый класс)
Отправлен: 10.03.2006, 14:17

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

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

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

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала 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.18 от 09.03.2006 		Яндекс Rambler's Top100
В избранное