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

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

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

создать кнопку (на форме) во время работы программы [D7, WinXP]

Страницы: 1 2 3 >
456 © (2004-10-06 11:55:00)
Вот никогда не было необходимости, а теперь есть: надо на форме на этапе работы программысоздать столько кнопок, сколько указано в файле конфигурации. Подскажите, как сделать (если можно, код и раздел описаний). Заранее спасибо.

Gero (2004-10-06 15:33:00) [1]

> Jay (06.10.04 14:46)

Ну и что?

Jay (2004-10-06 14:46:00) [2]
Ну нажал ты на созданную кнопку и что, получил удовольствие, надо-же еще как-то её оформить, прописать что-бы она что-то делала :)

Gero (2004-10-06 14:28:00) [3]

> Интересно, для чего тогда создаются эти кнопки, как не для
> того, чтобы обращаться к ним?

Например, чтобы юзер на них нажимал.

Мастер (2004-10-06 14:01:00) [4]
Удалено модератором
Примечание: Offtopic

456 (2004-10-06 13:58:00) [5]
Удалено модератором
Примечание: Offtopic

Мастер (2004-10-06 13:54:00) [6]
>Anatoly Podgoretsky © (06.10.04 13:52) [41]
Тут вообще нет предмета обсуждения, пока не будут приведены строчка/и перед var

Пожалуйста, я в Мастер © (06.10.04 13:43) [38]
написал, что здесь есть Self-

procedure TForm1.Button2Click(Sender: TObject);

Anatoly Podgoretsky (2004-10-06 13:52:00) [7]
Мастер © (06.10.04 13:46) [40]
Тут вообще нет предмета обсуждения, пока не будут приведены строчка/и перед var

Мастер © (06.10.04 13:43) [38]
Интересно, для чего тогда создаются эти кнопки, как не для того, чтобы обращаться к ним?

Ты не представляешь, но кнопки могут работать и без обращения к ним, есть такае штуки как Default, Cancel, ModalResult

Мастер (2004-10-06 13:46:00) [8]
>Anatoly Podgoretsky © (06.10.04 13:44) [39]
Мастер © (06.10.04 13:19) [33]
Говоришь нет бреда.

Конечно, нет.
Неоптимальный код всего лишь.

Anatoly Podgoretsky (2004-10-06 13:44:00) [9]
Мастер © (06.10.04 13:19) [33]
Говоришь нет бреда.

Мастер (2004-10-06 13:43:00) [10]
>Gero © (06.10.04 13:23) [34]
1. Что такое Self в твоем примере?

Self - владелец кнопки, которая была нажата.

2. Вызывать в цикле FindComponent это круто?

Это супер-круто.
Здесь демагоию разводим или как?
Ясно, что это тпример из хелпа без проблем преобразуется в

var i: Integer; const NamePrefix = 'MyEdit'; begin for i := 1 to 20 do begin with TEdit.Create(Self) do begin Name := NamePrefix + IntToStr(i); Left := 10; Top := i * 20; Parent := self; end; end;

>Плохиш © (06.10.04 13:30) [36]
Отвечаю: В этой ветке не обсуждается обращение к созданным кнопкам из других частей программы, а осуждается только создание этих кнопок.

Интересно, для чего тогда создаются эти кнопки, как не для того, чтобы обращаться к ним?

Плохиш (2004-10-06 13:31:00) [11]

> Плохиш © (06.10.04 13:30) [36]

Хм, осуждается = о бсуждается

Плохиш (2004-10-06 13:30:00) [12]

> Мастер © (06.10.04 13:13) [30]
> 1.
> >Плохиш © (06.10.04 12:34) [18]
>
> Вы потеряли нить разговора :-(
> ты не ответил на Мастер © (06.10.04 12:28) [15]

Отвечаю: В этой ветке не обсуждаетсяобращение к созданным кнопкам из других частей программы, а осуждаетсятолько создание этих кнопок.

456 (2004-10-06 13:24:00) [13]
>Мастер
У меня всё так же

Gero (2004-10-06 13:23:00) [14]

Мастер © (06.10.04 13:19)
> Вот этот код рабочий на 100%.
> Здесь нет бреда.

Охотно верю.
Только:
1. Что такое Self в твоем примере?
2. Вызывать в цикле FindComponent это круто?

Мастер (2004-10-06 13:19:00) [15]
Gero © (06.10.04 13:03) [28]

Вобщем сам набери и попытайся скомпилировать то, что написал.

Вот этот код рабочий на 100%.

Здесь нет бреда.

var i: Integer; const NamePrefix = 'MyEdit'; begin for i := 1 to 20 do begin TEdit.Create(Self).Name := NamePrefix + IntToStr(i); with TEdit(FindComponent(NamePrefix + IntToStr(i))) do begin Left := 10; Top := i * 20; Parent := self; end; end; end;

>Jay
У тебя неправильно перенесен в функцию пример из Help.

Anatoly Podgoretsky (2004-10-06 13:19:00) [16]
Это когда не метод класса.

Мастер (2004-10-06 13:13:00) [17]
1.
>Плохиш © (06.10.04 12:34) [18]

Вы потеряли нить разговора :-(
ты не ответил на Мастер © (06.10.04 12:28) [15]

456 (2004-10-06 13:13:00) [18]
что такое ординарная процедура?

Anatoly Podgoretsky (2004-10-06 13:08:00) [19]
Jay (06.10.04 12:57) [27]
А какой "родительский" объект у ординарной процедуры?

Gero (2004-10-06 13:03:00) [20]

> Self говорит что родительский объект у кнопки она-же

Бред сивой кобылы.

Вобщем сам набери и попытайся скомпилировать то, что написал.

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

Наверх

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