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

Вниз

Изменение свойств формы   Найти похожие ветки 

 
подмастерье   (2010-08-18 01:22) [0]

Здравия всем. После application.run; строка form1.height := 200; не работает. Как это обойти, подскажите пожалуйста? Заранее благодарю.

Код:
project uForm;
uses Windows, Forms;
var f: tform;
begin
application.Initalization;
application.CreateForm(TForm, f);
application.Run;
f.Width := 800;
f.Height := 600;
end.


 
Дмитрий С ©   (2010-08-18 01:37) [1]

Это не здесь нужно делать, а в обработчике OnCreate или OnShow формы, например.


 
подмастерье   (2010-08-18 01:48) [2]

А если мне необходимо в процессе работы изменить размеры окна? Или это не вариант?


 
Дмитрий С ©   (2010-08-18 01:53) [3]

В процессе работы и меняй, например при нажатии кнопки.


 
KilkennyCat ©   (2010-08-18 01:58) [4]


> После application.run;

происходит смерть приложения. Программируешь на Паскале, а как работают процедуры - не знаешь.


 
Германн ©   (2010-08-18 02:23) [5]


> Программируешь на Паскале, а как работают процедуры - не
> знаешь.

На Паскале как раз было иначе.
Но процедуры работали так же. :)


 
Юрий Зотов ©   (2010-08-18 02:24) [6]

После application.run начинается работа цикла выборки сообщений. И пока этот цикл не закончится, последующие операторы выполнятся не будут. А когда он закончится, то завершится и вся программа - так что смысла в последующих операторах все равно никакого.


 
Германн ©   (2010-08-18 02:36) [7]


> подмастерье   (18.08.10 01:48) [2]
>
> А если мне необходимо в процессе работы изменить размеры
> окна?

Так и меняй. Кто тебе мешает.
Изменить можно в обработчиках событий либо этой самой формы, либо в других любых "событиях" форм/компонент программы. Либо в обработчиках сообщений Windows.


 
KilkennyCat ©   (2010-08-18 03:14) [8]


> После application.run начинается работа цикла выборки сообщений.

Я бы уточнил, что это именно он запускает этот цикл. А то получается, что он что-то другое делает, а после того, как управление вернется, каким-то образом запускается цикл.


 
Германн ©   (2010-08-18 03:41) [9]


> KilkennyCat ©   (18.08.10 03:14) [8]
>
>
> > После application.run начинается работа цикла выборки
> сообщений.
>
> Я бы уточнил, что это именно он запускает этот цикл. А то
> получается, что он что-то другое делает, а после того, как
> управление вернется, каким-то образом запускается цикл.
>

Буквоед?
:)


 
KilkennyCat ©   (2010-08-18 04:24) [10]

это не буквоедство. странно слышать от программиста однокристаллок.


 
Германн ©   (2010-08-18 05:12) [11]

Удалено модератором


 
Anatoly Podgoretsky ©   (2010-08-18 10:53) [12]


> После application.run; строка form1.height := 200; не работает.

Работает, только ты этого не замечаешь.


 
KilkennyCat ©   (2010-08-18 18:37) [13]


> Anatoly Podgoretsky ©   (18.08.10 10:53) [12]

а я вот тоже так подумал, а потом засомневался... form1 еще существует?


 
Anatoly Podgoretsky ©   (2010-08-19 10:03) [14]


> form1 еще существует?

Не существует и никогда не существовал.


 
Дмитрий С ©   (2010-08-19 22:20) [15]


> никогда не существовал.

эт почему?


 
Германн ©   (2010-08-19 22:43) [16]


> эт почему?
>

См. сабж :)


 
Anatoly Podgoretsky ©   (2010-08-20 02:40) [17]

Код приведен и нужны только глаза.



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

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

Наверх





Память: 0.48 MB
Время: 0.004 c
15-1280865079
NailMan
2010-08-03 23:51
2010.11.14
А еще я подсел на действующий стимпанк...


2-1279196387
PinDOS
2010-07-15 16:19
2010.11.14
Динамический список


15-1280735930
12
2010-08-02 11:58
2010.11.14
Как перезаписать открытый файл Excel на сетевом ресурсе?


15-1280996881
abun
2010-08-05 12:28
2010.11.14
Как программно отследить события


2-1282423057
Rembo
2010-08-22 00:37
2010.11.14
Наследование: вызов метода потомка через родителя





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский