Скачать: CL | DM;

ArrangeIcons   Найти похожие ветки 

← →
Allexandr ©   (2007-02-22 01:59) [0]

Здравствуйте.
Для работы с дочерними окнами есть такой метод:
ArrangeIcons;
В описании написано: "выстроить иконки всех дочерних окон"
Попробовал написать, но при нажатии кнопки вообще ничего не наблюдаю.
Подскажите, может я что-то не так написал (ниже приведен код) или может быть объясните чего стоит ждать от этого метода. Спасибо.

procedure TForm1.Button1Click(Sender: TObject);
begin
form2:=tform2.Create(owner);
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
previous;
end;

т.е. у меня есть форма один, есть форма два.. ф1 - материнская, внутри которой я при нажатии на кнопки создаю ф2..
после нескольких нажатий на буттон1 я нажимаю на буттон3 и ничего не наблюдаю.

---

← →
Германн ©   (2007-02-22 02:17) [1]

> после нескольких нажатий на буттон1 я нажимаю на буттон3
> и ничего не наблюдаю.

А что ты хотел "наблюдать"?
Вообще это чушь - присваивать одной и той же переменной ссылку на вновь создаваемый экземпляр класса без предварительного уничтожения ранее существовавшего!

---

← →
Allexandr ©   (2007-02-22 12:18) [2]

Почему же чушь? А например юзер запустил текстовый редактор. Там открывает 2-3 окна для ввода.. Они ведь совершенно одинаковы. Главному окну они никаких данных не должны передавать, а при нажатии на "сохранить" или "печать" или еще что-то - просто сохранить инфу в файл или из активного окна вывести на печать.


> А что ты хотел "наблюдать"?


Честно - ничего не хотел "наблюдать", но раз метод есть, значит он зачем то нужен. Вот я и хотел узнать зачем. А правильный ответ я уже получил на другом форуме. Цитирую:


> Так ваши окна-то минимизированы?
>
> Этот код должен упорядочивать минимизированные MDI-child"ы.
>  Чтобы увидеть его действие, надо свернуть окна, раскидать
> их в беспорядке, и тогда после вызова ArrangeIcons они будут
> выстроены строем.

---

← →
RASkov   (2007-02-22 13:14) [3]

> [2] Allexandr ©   (22.02.07 12:18)

ArrangeIcon - вообщето упорядочивает иконки свернутых окон...
Для окон есть Tile; и type TTileMode = (tbHorizontal, tbVertical);

> Почему же чушь? А например юзер запустил текстовый редактор. Там открывает 2-3 окна для ввода..

Тогда уж создавай их без переменной:
procedure TForm1.Button1Click(Sender: TObject);
begin
 tform2.Create(Self);
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.067 c