Как нужно изучать Дельфи :)))

← →
oldman © (2005-08-03 16:06) [0]

Небольшая задача для начинающих:
1. Создать Form1 и Form2
2. На Form1 расположить Button1 и Button2
3. На Form2 расположить несколько Label и Button
4. На Form1.Button1.OnClick написать "Form2.Show;"
5. На Form1.Button2.OnClick написать "Form2.Print;"
6. Скомлирировать, запустить.
7. Нажать на Button1. Посмотреть на Form2.
8. Нажать на Button2. Посмотреть на напечатанную копию Form2.
9. Закрыть Form2.
10. Нажать на Button2. Посмотреть на распечатку.
11. Подумать, "А куда делись кнопки?"
12. Почесать репу.
13. Пойти читать книжки...
:)))))

Сорри, если старая шутка.

← →
_dimka © (2005-08-03 16:20) [1]

мдя....

← →
oldman © (2005-08-03 17:29) [2]

А че?
У нашим стажеров глаза по 7 копеек стали... :)))

← →
Alexander Panov © (2005-08-03 17:29) [3]

oldman © (03.08.05 17:29) [2]

А это и есть самый распространенный метод изучения - метод тыка;)

← →
oldman © (2005-08-03 17:33) [4]

> Alexander Panov © (03.08.05 17:29) [3]

Вам смешно... а вот щас как придет в эту ветку месса от какого-либо...
"Блин, а куда кнопки-то делись?"
:))))))))))

← →
Agent13 © (2005-08-03 17:55) [5]

Блин, а куда кнопки-то делись?

← →
Джо © (2005-08-03 18:16) [6]

>
> [5] Agent13 © (03.08.05 17:55)
> Блин, а куда кнопки-то делись?

Смотри реализацию метода TWinControl.PaintTo. Вот это место:

if FWinControls <> nil then
for I := 0 to FWinControls.Count - 1 do
with TWinControl(FWinControls[I]) do
if Visible then PaintTo(DC, Left, Top);

А TLabel - не наследник TWinControl, поэтому рисуется.

← →
oldman © (2005-08-03 18:19) [7]

> Джо © (03.08.05 18:16) [6]

Купился... На провокацию [5]...
:)))))))))))))

>Купился... На провокацию [5]...
>Джо © (03.08.05 18:21) [8]
- ну лично мне искать в лом было, хотя и понятно что проблема в Visible - так что, все таки, спасибо за сэкономленное время...

Я не знал. Честно.

Как нужно изучать Дельфи :))) Найти похожие ветки