Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Изменения размеров формы [D7, NT4]

Страницы: 1 2 >
NVMZ © (2009-04-11 02:56:00)
Как сделать форму, чтобы она раздвигалась по X и не раздвигалось по Y пользователем, причем при изменении размеров кнопок управления окном элементы формы рисовались правильно (не накладывались друг на друга)?
Необходимо, чтобы работало в NT-2000

NVMZ (2009-04-15 23:44:00) [1]

> Навскидку - еще одно решение (на его оригинальность не претендую):
> разбиваем диапазон датчика на поддиапазоны, при вводе считаем
> частичные суммы, в конце считаем общую.

Да. Это правильно! По-моему, там будет 37(?) таких переменных (частичные суммы).
Второе решение - написать свою арифметику. За это решение я поставил зачет-автомат.
Кстати, на БЭСМ-6 Ваша программа будет работать правильно. Надеюсь, Вам пояснять не надо.
Однако можно открыть дискуссию "машинная арифметика для начинающих" (как добавить смайлик не знаю).

Очень приятно с Вами общаться! Спасибо.

Игорь Шевченко (2009-04-15 23:41:00) [2]

> Я знаю два. Одно мое

другое неправильное.

Вы бы эта...уважаемый доктор всея Руси, со своими вопросами на засыпку шли бы в http://www.delphimaster.ru/cgi-bin/forum.pl?n=3

Юрий Зотов (2009-04-15 23:28:00) [3]
> NVMZ (15.04.09 23:22) [33]

Навскидку - еще одно решение (на его оригинальность не претендую): разбиваем диапазон датчика на поддиапазоны, при вводе считаем частичные суммы, в конце считаем общую.

NVMZ (2009-04-15 23:22:00) [4]

> Ваш датчик способен выдавать сигнал в диапазоне от -1e30
> до +1e30. Вы это просто придумали.

Датчик придумал в ответ на вопрос:

> Можно глупый вопрос - а нафига такая программа нужна ?

Это задача 1-го семестра 1-го курса мех-мата МГУ. В форуме есть такой ответ:

> Без нее зачет не получить

Я ее привел для Германна. Вроде простая задача, но не все так просто.
Однако решение ее существует. Я знаю два. Одно мое. Другое студенты предложили.

Юрий Зотов (2009-04-15 23:11:00) [5]
> NVMZ (15.04.09 22:52) [30]

Николай, не смешите. Особенности работы с числами, отличающимися на много порядков, я знаю не хуже Вас (плохо обусловленных систем нарешался в свое время). Но кроме этого я знаю еще и технику, а потому ни за что не поверю, что Ваш датчик способен выдавать сигнал в диапазоне от -1e30 до +1e30. Вы это просто придумали. Извините, из пальца.

AndreyV (2009-04-15 23:02:00) [6]
> [30] NVMZ (15.04.09 22:52)
> Пример входных значений:
> 1, 1e30, 1, -1e30
> Правильный ответ - 2.
> Ваша программа даст - 0.

Начинают открываться скрытые условия.

NVMZ (2009-04-15 22:52:00) [7]

> Пишется такая программа за 5 минут, без всякого преувеличения
> и без малейших раздумий

Пример входных значений:
1, 1e30, 1, -1e30
Правильный ответ - 2.
Ваша программа даст - 0.

Юрий Зотов (2009-04-15 22:44:00) [8]
> NVMZ (15.04.09 20:39) [21]

Николай, Вы, конечно, извините, но профессору МГУ, да еще и д.т.н. задавать подобные вопросы просто стыдно. Эта задачка для детишек, которые только-только начали изучать любой язык. Пишется такая программа за 5 минут, без всякого преувеличения и без малейших раздумий. Например:

var
S: string = '';
Sum: double = 0;
begin
while UpperCase(S) <> 'SUM' do
begin
ReadLn(S);
Sum := Sum + StrToFloatDef(S, 0)
end;
WriteLn(Sum);
ReadLn
end.

В связи с чем вынужден огорчиться. Если профессор и д.т.н. не может этого сделать, то чего же следует ожидать от его студентов?

@!!ex (2009-04-15 22:08:00) [9]
> [21] NVMZ (15.04.09 20:39)

А это проблема вообще??
Счетчик и к нему при каждом вводе прибавляется новое значение.
Задачка для дебилов, но никак не для мастеров(может я опять вопроса не понял??)

app (2009-04-15 21:46:00) [10]
Один вопрос одна ветка, два вопроса две ветки и т.д.

NVMZ (2009-04-15 21:46:00) [11]

> Можно глупый вопрос - а нафига такая программа нужна ?

С датчика поступают данные. Очень много - в память не умещаются. Через неделю работы программы надо получить их сумму.

Anatoly Podgoretsky (2009-04-15 21:40:00) [12]
> Игорь Шевченко (15.04.2009 21:32:24) [24]

Без нее зачет не получить.

Игорь Шевченко (2009-04-15 21:32:00) [13]

> "Необходимо вычислить сумму чисел (вещественных - double),
> вводимых с клавиатуры, без записи их в массив (память)".
> Т.е. пользователь вводит последовательно числа, программа
> их суммирует, пользователь вводит Enter, программа выдает
> ответ.

Можно глупый вопрос - а нафига такая программа нужна ?

NVMZ (2009-04-15 21:01:00) [14]
Добавление к [21]. А то опять обвинят, что вопрос не понятный.
Процессор - Intel Pentium (любой). ОС - Windows, UNIX (любые). Система программирования - C, Pacal/Delphi.

Игорь Шевченко (2009-04-15 20:42:00) [15]

> Если Вы такой крутой Мастер

мы тут вообще не крутые ни разу и на слабо тоже не ведемся. Это в порядке справки информация.

NVMZ (2009-04-15 20:39:00) [16]
Персонально для Германна (но можно и для всех). Если Вы такой крутой Мастер, то предложите решение следующей задачи:
"Необходимо вычислить сумму чисел (вещественных - double), вводимых с клавиатуры, без записи их в массив (память)". Т.е. пользователь вводит последовательно числа, программа их суммирует, пользователь вводит Enter, программа выдает ответ.

NVMZ (2009-04-15 20:19:00) [17]
Я не буду отвечать на наезды Германна типа:
"Или ты не встречал "начальников" с" псевдо" степенями?"
Кто меня знает, тот просто улыбнется.

Отвечаю на вопрос KSergey. Если сделать форму, как сказано в [4], то при изменении размеров кнопок управления окном, элементы формы будут наезжать друг на друга. Это даже видно в примере, который выдается при этом действии.
Суть состоит в том, что элементы формы располагаются на поле высотой = ClientHeight, а задание Constraints.MaxHeight не дает увеличить высоту всей формы (Height). Таким образом при увеличении размеров заголовка окна (например, путем увеличения размеров кнопок управления окном) ClientHeight будет уменьшана. Что приведет к тому, что элементы наедут друг на друга.
Алгоритм Юрия Зотова решил мою проблему.

KSergey (2009-04-15 07:44:00) [18]
Вопросик топикстартеру можно?
Я не понял как метод, предложенный ЮЗ, решил вашу проблему с наезжанием контролов? По сути это другая реализация поведения constraint, если надо не позволять изменять вертикальный размер. Чем он принципиально (для вас! мотивы ЮЗ я понимаю) лучше?

KSergey (2009-04-15 07:42:00) [19]
> NVMZ (12.04.09 23:06) [8]
> С утра хотел написать, что я думаю об форуме.

Удивительное дело! По-русски понятно изложить чего ж надобно - не умеем, зато мнеие об окружающих составить - это легко.

Германн (2009-04-15 03:10:00) [20]
Ох, сколько я встречал подобных!

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »