Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.08.28;
Скачать: [xml.tar.bz2];

Вниз

Как показать две одинаковые формы?   Найти похожие ветки 

 
Лумер   (2005-08-04 06:32) [0]

Есть Form2 в проекте. Я её могу показать чрезе Form2.Show . А если мне надо, чтобы можно было показать две одинаковые Form2, только с разными данными, то как это сделать?


 
ЮЮ ©   (2005-08-04 06:59) [1]

procedure TForm1.Button1Click(Sender: TObject);
begin
 Form2 := TForm2.Create(Application);
 Form2.Caption := "Ещё одна"ж
 Form2.Show;
end;

Только понимать при этом, что ссылка на первый экземпляр формы утрачена, т.е. нигде в коде не должно присутствовать
Form2.<свойство>, кроме, естественно, приведенного кода, т.е. между Create и Show


 
Alx2 ©   (2005-08-04 07:15) [2]

>Лумер   (04.08.05 06:32)  

Поверни вопрос так:
******
У меня есть переменная с именем "a", как мне завести еще одну переменную "а", но с другим значением?
******

Ведь несколько бредово получается?

Корректнее так:
**************
У меня есть переменная такого-то типа, как мне завести еще одну переменную того же типа, но с другим значением?
*************

У объекта Form2 наверняка есть тип (скорее всего TForm2 :) )
Если это так, то заводятся два объекта типа TForm2 (две переменных) и их свойствам задаются соответствующие значения. Потом эти объекты показываются. После использования убиваются.

FormA, FromB : TForm2;

FormA := TForm2.Create(<..>);
FormB := TForm2.Create(<..>);
........
FormA.Show;
FormB.Show;


 
Лумер   (2005-08-04 07:27) [3]

Спасибо, попробую!


 
TStas ©   (2005-08-04 16:20) [4]

forms:Array[1...сколько_надо] of TForm2; //Глобальный массив форм2

for i:=0 to сколько_надо do
begin
forms[i]:=TForm2.Create(mainForm); Создается массив экземпляров
forms[i].Tag:=i; //Это чтобы форма знала свой номер в массиве
end;
формы

forms[n].Show; //Показывается n-я форма при надобности

Полько лучше, если таких форм много не создавать все сразу, а по мере необходимости, а в onclose уничтожать их. Только надо
удрать ее из списка автоматически создаваемых форм



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

Форум: "Основная";
Текущий архив: 2005.08.28;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.038 c
3-1121404217
Ирина
2005-07-15 09:10
2005.08.28
ADOConnection.Close


1-1123585207
kyn66
2005-08-09 15:00
2005.08.28
Контроль видимости левого столбца Грида


1-1123484706
Новичёк
2005-08-08 11:05
2005.08.28
DLL и его процедуры и функции


3-1121767950
Magic
2005-07-19 14:12
2005.08.28
ADO+LIKE (не работает)


3-1121682484
S_s
2005-07-18 14:28
2005.08.28
QuickRepotr: составление отчета





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский