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

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


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

Народное голосование ПРЕМИИ РУНЕТА-2007!
Голосуем за RusFAQ.ru >>

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

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

Выпуск № 971
от 06.11.2007, 15:35

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


Вопрос № 107568: Здравствуйте! Нужно при помощи процедуры и функции в делфи посчитать силу ньютона (F=ma) Как это реализовать при помощи процедуры и функции? тип переменной должен быть Float Спасибо!...
Вопрос № 107587: Здравствуйте уважаемые эксперты!Не могу поставить ловушку на сообщение LVM_SETITEMPOSITION32 посылаемое рабочему столу (SysListView32).Подскажите что не так....
Вопрос № 107601: Здравствуйте ув. эксперты. Как узнать запущена ли определенная программа на сетевом компьютере и если запущена выполнить на ней какое-либо действие (наприме нажать button1). Заранее спасибо....
Вопрос № 107610: Скиньте пожалуйста русификатор для Delphi 7 на LKolian@gmail.com or asket1992@rambler.ru...
Вопрос № 107659: Подскажите, пожалуйста, как вывести массив состоящий из вещественных чисел на экран и как выйти из цикла по условию x<=((mas[i])-(mas[i-1]))/(mas[i-1]);(если погрешность x меньше или равна условию, то выходим из цикла). Если можно, то пример п...

Вопрос № 107.568
Здравствуйте!
Нужно при помощи процедуры и функции в делфи посчитать силу ньютона (F=ma)
Как это реализовать при помощи процедуры и функции? тип переменной должен быть Float
Спасибо!
Отправлен: 31.10.2007, 21:13
Вопрос задал: Sassoft (статус: 1-ый класс)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 4)

Отвечает: Виктор Пырлик
Здравствуйте, Sassoft!

В приложении дан код, вычисления в функции и вычисления в процедуре.
В Delphi нет типа float, наиболее приблеженный - тип Single.

Приложение:

---------
Если ничего не помогло - надо читать инструкцию

Ответ отправил: Виктор Пырлик (статус: Практикант)
Ответ отправлен: 31.10.2007, 21:52
Оценка за ответ: 5
Комментарий оценки:
Спасибо!

Отвечает: Pif-paf
Здравствуйте, Sassoft!

а функцию прописываем:

function sila_n(m,a:integer):float;
begin
sila_n:=m*a;
end;

процедурой будет нажатие кнопки:

procedure button1.click(...);
begin
Edit3.Text:=floattostr(sila_n(strtoint(Edit1.text),strtoint(Edit2.text)));
end;

Не забудьте заранее описать функцию в Type. Удачи!
Ответ отправил: Pif-paf (статус: 1-ый класс)
Ответ отправлен: 01.11.2007, 09:20
Оценка за ответ: 4
Комментарий оценки:
m и a не обязательно будут integer

Отвечает: Genia007
Здравствуйте, Sassoft! Предлагаю такой код, впринципе всё элементарно.

Приложение:

Ответ отправил: Genia007 (статус: 1-ый класс)
Ответ отправлен: 04.11.2007, 18:57
Оценка за ответ: 5


Вопрос № 107.587
Здравствуйте уважаемые эксперты!Не могу поставить ловушку на сообщение LVM_SETITEMPOSITION32 посылаемое рабочему столу (SysListView32).Подскажите что не так.

Приложение:

Отправлен: 01.11.2007, 00:08
Вопрос задал: inven (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 2)

Отвечает: PavelGM
Здравствуйте, Inven!

А в чем выражается "не могу поставить" - не срабатывает SetHook или prov неправильный результат дает. Если SetHook то вроде все правильно и у меня в такой же схеме все ставилось. Если prov, то тут вы просто слегка не в курсе ;-) как устроены ловушки и подсистема процессов в Windows.

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

Решение проблемы - посылка сообщения (SendMessage/PostMessage) из ДЛЛ в ваше окно (FindWindow или передавать хэндл при вызове SetHook) или установка глобального события, его отлов в вашей программе и передача данных каким-то иным способом (реестр, файлы в памяти и т.п.)
Ответ отправил: PavelGM (статус: Студент)
Ответ отправлен: 01.11.2007, 10:59
Оценка за ответ: 5


Вопрос № 107.601
Здравствуйте ув. эксперты.
Как узнать запущена ли определенная программа на сетевом компьютере и если запущена выполнить на ней какое-либо действие (наприме нажать button1).
Заранее спасибо.
Отправлен: 01.11.2007, 05:55
Вопрос задал: Алексей Акишин (статус: 3-ий класс)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 3)

Отвечает: Gladiator
Здравствуйте, Алексей Акишин!
Без установки на удалённую машину следящей за запущенными процессами программы невозможно.
Ответ отправил: Gladiator (статус: Студент)
Ответ отправлен: 01.11.2007, 10:37
Оценка за ответ: 3
Комментарий оценки:
Спасибо. Но такой ответ не подходит.


Вопрос № 107.610
Скиньте пожалуйста русификатор для Delphi 7 на LKolian@gmail.com or asket1992@rambler.ru
Отправлен: 01.11.2007, 08:59
Вопрос задал: Lkolian (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Нифонтов Максим
Здравствуйте, Lkolian!
Советую вам использовать нерусифицированную среду. Во первых это в какой-то степени увеличит ваше знание аанглийского языка, если вы с ним не знакомы. Во вторых вам удобнее будет искать во встроенной помощи специфические команды меню, если вы знаете их оригинальное написание. Да и в конце концов программист, в любом случае, работает с кодом. А код с английского на русский не переведешь, так что особых преимуществ или удобств русификация вам не даст, скорее наоборот.
Ответ отправил: Нифонтов Максим (статус: 1-ый класс)
Ответ отправлен: 01.11.2007, 09:13
Оценка за ответ: 2


Вопрос № 107.659
Подскажите, пожалуйста, как вывести массив состоящий из вещественных чисел на экран и как выйти из цикла по условию x<=((mas[i])-(mas[i-1]))/(mas[i-1]);(если погрешность x меньше или равна условию, то выходим из цикла).
Если можно, то пример программы, т.к. логику я вроде понимаю, но не получается правильно написать(плохо знаю синтаксис и нюансы дельфи, т.к. изучаю самостоятельно).

Заранее, ОГРОМНОЕ СПАСИБО!!!
Отправлен: 01.11.2007, 15:34
Вопрос задал: Slavutich81 (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Нифонтов Максим
Здравствуйте, Slavutich81!
Смотрите примеры в риложении

Приложение:

Ответ отправил: Нифонтов Максим (статус: 1-ый класс)
Ответ отправлен: 01.11.2007, 15:58
Оценка за ответ: 5
Комментарий оценки:
Всё что нужно было ответить н мой вопрос было сделано. Спасибо! Кстати, я нашел более лучший способ вывода массива на экран с помощью Memo1.List.Add();

Отвечает: Degtyarev Anton
Здравствуйте, Slavutich81!
можете воспользоваться условным оператором

Wile x>((mas[i])-(mas[i-1]))/(mas[i-1]) do

или

repit
.....
until x>((mas[i])-(mas[i-1]))/(mas[i-1])

или так как в премере

дерзай.

Приложение:

---------
Сколько волка не корми, а слон всё равно толще

Ответ отправил: Degtyarev Anton (статус: 2-ой класс)
Ответ отправлен: 01.11.2007, 16:21


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

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

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

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

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


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


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.61.1 от 16.10.2007
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное