Закрытие формы.

← →
AlexDan © (2009-02-09 11:13) [0]

Форма при нажатии кнопки закрывает саму себя(Close). Напомните пожалуйста(забыл напрочь) что нужно указать в Properties, чтобы она закрылась корректно. иначе при повторном её вызове (show), выбивает приложение(.

← →
{RASkov} © (2009-02-09 11:18) [1]

> [0] AlexDan © (09.02.09 11:13)
> что нужно указать в Properties, чтобы она закрылась корректно

:)
Нет там такого свойства)..... Сам пролистай их.... не так уж их и много...

А вот параметры в OnClose - да, мог там выставить caFree, вот и АВ при следующем Шоу

← →
Сергей М. © (2009-02-09 11:21) [2]

> выбивает приложение

Пинком ?

Уж сколько раз тебе говорили - приводи сообщения об ошибках дословно !
А ты по-прежнему продолжаешь нести отсебячину)

← →
AlexDan © (2009-02-09 11:29) [3]

> {RASkov} © (09.02.09 11:18) [1]
Да, caFree имеется..

← →
{RASkov} © (2009-02-09 11:30) [4]

> [3] AlexDan © (09.02.09 11:29)
> Да, caFree имеется..

Доволен?)

← →
Сергей М. © (2009-02-09 11:31) [5]

> caFree имеется

А зачем ?

← →
AlexDan © (2009-02-09 11:32) [6]

> {RASkov} © (09.02.09 11:30) [4]
Вполне..))

← →
AlexDan © (2009-02-09 11:34) [7]

> Сергей М. © (09.02.09 11:31) [5]
> А зачем ?
А действительно, зачем нужно caFree? сам бы не вставил, посоветовали можно сказать..

← →
Сергей М. © (2009-02-09 11:37) [8]

> AlexDan © (09.02.09 11:34) [7]

Т.е. ты сначала пишешь и только потом начинаешь думать о написанном ?
Ну ты и фрукт, однако)

> посоветовали можно сказать

Кто ж знал, что у тебя что-то там после этого будет "выбивать" ?
Совет-то давали совсем по иному поводу)

← →
AndreyV © (2009-02-09 11:37) [9]

> [0] AlexDan © (09.02.09 11:13)
> Форма при нажатии кнопки закрывает саму себя(Close). Напомните
> пожалуйста(забыл напрочь) что нужно указать в Properties,
> чтобы она закрылась корректно. иначе при повторном её вызове
> (show), выбивает приложение(.

Автоматы в электросети выбивает? круто ты наваял.

← →
AlexDan © (2009-02-09 11:42) [10]

> Сергей М. © (09.02.09 11:37) [8]
> Т.е. ты сначала пишешь и только потом начинаешь думать о
> написанном ?
Конечно нет, просто мне нужен результат, а спросить было не у кого..
Так всё таки зачем caFree?

> AndreyV © (09.02.09 11:37) [9]
> Автоматы в электросети выбивает?
Выбивает (выбивало) приложение, автоматы гораздо дальше стоят..:(.

← →
AlexDan © (2009-02-09 11:45) [11]

тьфу, цитирование случайно получилось..

← →
Ega23 © (2009-02-09 11:48) [12]

> Так всё таки зачем caFree?

В хелпе уже прочитал и всё понял?

← →
Сергей М. © (2009-02-09 11:48) [13]

> AlexDan © (09.02.09 11:42) [10]

В справке же написано зачем ..

← →
AndreyV © (2009-02-09 11:51) [14]

> [10] AlexDan © (09.02.09 11:42)
> > AndreyV © (09.02.09 11:37) [9]
> > Автоматы в электросети выбивает?
> Выбивает (выбивало) приложение, автоматы гораздо дальше
> стоят..:(.

Вот и потрудись объяснить, что за выбивание приложения: оно выбивает, или его выбивают, и как.

← →
Сергей М. © (2009-02-09 11:53) [15]

> мне нужен результат, а спросить было не у кого

Как же не у кого, если тебе "посоветовали" ?

Ведь если советовали, то, наверно, по какому-то конкретно интересовавшему тебя поводу ?

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

← →
AlexDan © (2009-02-09 12:03) [16]

> Сергей М. © (09.02.09 11:53) [15]
Просто что поразительно, есть у меня другое такое-же приложение (по смыслу), там тоже форма закрывается с Action:=caFree;, но после этого она открывается снова через show и без всяких проблем.. Видно я что-то упустил..).

← →
AndreyV © (2009-02-09 12:08) [17]

> [16] AlexDan © (09.02.09 12:03)
> > Сергей М. © (09.02.09 11:53) [15]
> Просто что поразительно, есть у меня другое такое-же приложение
> (по смыслу), там тоже форма закрывается с Action:=caFree;
> , но после этого она открывается снова через show и без
> всяких проблем.. Видно я что-то упустил..).

После Action:=caFree формы не существует, и если она открылась, то не успела перетереться память.

← →
Сергей М. © (2009-02-09 12:10) [18]

> AlexDan © (09.02.09 12:03) [16]

Короче ты лепишь приложение за приложением, нишиша не понимая при этом, где что и почему у тебя происходит при этом)

← →
AlexDan © (2009-02-09 12:12) [19]

> Сергей М. © (09.02.09 12:10) [18]
Ну, вы меня совсем обижаете, я уже понял, что в том приложении дело до caFree не доходит..

← →
Сергей М. © (2009-02-09 12:15) [20]

> AlexDan © (09.02.09 12:12) [19]

А что еще думать, если

> форма закрывается с Action:=caFree;, но после этого она
> открывается снова через show и без всяких проблем

?)

← →
Anatoly Podgoretsky © (2009-02-09 12:34) [21]

> AlexDan (09.02.2009 11:13:00) [0]

Стойства или метода ЗакройсяКорректно нет.

← →
AlexDan © (2009-02-09 13:25) [22]

> Сергей М. © (09.02.09 12:15) [20]
Поражён. Оказывается, код во всех двух проектах одинаков. Но в одном из них метод close не выполнялся (соответственно и procedure TForm2.FormClose). Почему? В делфи 7 инспектор обьектов показывает Events для формы и если там прцедура не прописана (синенькими буквами), то и не выполняется (игнорируется), даже если она есть в коде! Офигеть. Значит смотреть нужно не только на код, а и на настройки инспектора обьектов..

← →
Сергей М. © (2009-02-09 13:31) [23]

> Поражён.

> Офигеть.

Да уж, пренеприятнейшее открытие)
А понасандалил уже кучу приложений)

← →
AlexDan © (2009-02-09 13:43) [24]

> Сергей М. © (09.02.09 13:31) [23]
Но это же дико! Т.е. если я напишу код от руки полностью, вставлю в юнит формы, то он не будет работать, даже если правильный..Скорее это недостатки компиллятора.. А проекты работали правильно, проверялись же, это я первый раз такое заметил.

← →
Сергей М. © (2009-02-09 14:02) [25]

> AlexDan © (09.02.09 13:43) [24]

> это же дико!

Неужели ?!

programm Dummy; procedure Foo; begin WriteLn("One"); end; begin WriteLn("Two"); end.

Что увидишь на экране ?)

← →
Anatoly Podgoretsky © (2009-02-09 14:13) [26]

> AlexDan (09.02.2009 13:25:22) [22]

Зачем два проекта с одинаковым кодом?

← →
Сергей М. © (2009-02-09 14:17) [27]

> Anatoly Podgoretsky © (09.02.09 14:13) [26]

> Зачем два проекта с одинаковым кодом?

Ну как зачем ?
Надо же два exe получить, а не один)

← →
Ega23 © (2009-02-09 14:20) [28]

> Т.е. если я напишу код от руки полностью, вставлю в юнит
> формы, то он не будет работать, даже если правильный..Скорее
> это недостатки компиллятора..

Во время своей 9+ лет работы в Delphi я неоднократно слышал: "Глючит Delphi", "Глюк компилятора" и т.п.
Но почему-то всего один раз выяснилось, что имеется не совсем однозначная вещь. ЕМНИП, это когда Пашка Голубь с вариантами наткнулся, типа при Vartype = varBool было недостаточно написать if (Value). Нужно было If (value = true)

Во всех остальных случаях, при детальном рассмотрении, оказывалось, что причина ошибки - кривизна рук разработчика.

← →
Anatoly Podgoretsky © (2009-02-09 14:21) [29]

> AlexDan (09.02.2009 13:43:24) [24]

Не надо на компилятор бочку катить, я часто дописываю коди именно вручную, включая изредка и полность, все работает.

← →
Anatoly Podgoretsky © (2009-02-09 14:44) [30]

> Ega23 (09.02.2009 14:20:28) [28]

Так и случай с Пашкой такой же.

← →
Ega23 © (2009-02-09 15:02) [31]

> Так и случай с Пашкой такой же.

Я, кстати, точно не помню, что там было. Но крайне любопытная вещь получалась.
По-крайней мере, в том случае, действительно можно было сказать: "Ну Borland и намутили..."

← →
Anatoly Podgoretsky © (2009-02-09 15:23) [32]

> Ega23 (09.02.2009 15:02:31) [31]

Проблема лежит на стыке Bool и Boolean

← →
Плохиш © (2009-02-09 15:32) [33]

> AlexDan © (09.02.09 13:43) [24]
>
>

Деточка, у тебя в анкете от года рождения 20 отнять не надо?

← →
Ega23 © (2009-02-09 15:36) [34]

> Проблема лежит на стыке Bool и Boolean

А... Ну да, понял.

← →
Anatoly Podgoretsky © (2009-02-09 16:05) [35]

> Плохиш (09.02.2009 15:32:33) [33]

Не отнять, а прибавить

← →
AlexDan © (2009-02-09 16:09) [36]

> Плохиш © (09.02.09 15:32) [33]
Рано ещё.).

← →
Плохиш © (2009-02-09 16:27) [37]

> Anatoly Podgoretsky © (09.02.09 16:05) [35]
>
> > Плохиш (09.02.2009 15:32:33) [33]
>
> Не отнять, а прибавить

Точно, спасибо за поправку.

← →
ЮЮ © (2009-02-10 12:07) [38]

> Т.е. если я напишу код от руки полностью, вставлю в юнит
> формы, то он не будет работать, даже если правильный..

То что ты скатал с чужого проекта, это только методы формы. Чтобы код использовался - методы надо вызывать.

> Поражён. Оказывается, код во всех двух проектах одинаков.
> Но в одном из них метод close не выполнялся (соответственно
> и procedure TForm2.FormClose). Почему? В делфи 7 инспектор
> обьектов показывает Events для формы и если там прцедура
> не прописана (синенькими буквами), то и не выполняется (игнорируется),
> даже если она есть в коде! Офигеть. Значит смотреть нужно
> не только на код, а и на настройки инспектора обьектов..
>

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

Назначение методы формы в качестве обработчика событий компонента можно сделать и в коде:

OnClose := FormClose;

Главное, чтобы этот метод был синенькими буквами :)

← →
AndreyV © (2009-02-10 13:35) [39]

> [17] AndreyV © (09.02.09 12:08)
> После Action:=caFree формы не существует, и если она открылась,
> то не успела перетереться память.

Фиг она откроется - деструктор уже отработал. А оказалось,

> [22] AlexDan © (09.02.09 13:25)

что метод не был вызван.

← →
Cep (2009-02-10 14:18) [40]

Да, коллеги, это нетленка :)))

← →
Dennis I. Komarov © (2009-02-10 15:09) [41]

А тут ничего не изменилось :)

← →
MsGuns © (2009-02-10 15:50) [42]

Так седому ветерану и не объяснили зачем точить шашку :)

← →
AlexDan © (2009-02-10 18:42) [43]

Господа, вы меня поражаете своей наивностью, код:
procedure FormClose(Sender: TObject; var Action: TCloseAction);

procedure TForm2.Button1Click(Sender: TObject);
begin
form2.Close;
OnClose := FormClose;
end;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:=caFree;
end;
end.
написанный полностью от руки, т.е. без применения инспектора обьектов и клавишь Ctrl+Shift+C (при создании процедур, если это делается вручную) в делфи 7 игнорируется (не выполняется).

← →
{RASkov} © (2009-02-10 18:48) [44]

> [43] AlexDan © (10.02.09 18:42)

Что ты хотел этим сказать?
Показать как не нужно делать и свою тупость? Это и так было ясно :) сорри...

← →
{RASkov} © (2009-02-10 18:56) [45]

Разжую:
при старте программы у формы2 нет обработчика OnClose.
Далее при нажатии кнопки форма2 закрывается, (по умолчанию в делфи формы не закрываются, а прячутся при Close(это не касается MDI)) и потом ей назначается обработчик OnClose. Но при первом нажатии метод FormClose не вызывается(не выполняется)....
При втором нажатии форма опять закрывается, но уже выполняется метод FormClose.... где она и убивается совсем.
А вот при третьем нажатии уже АВ....

> AlexDan

Хоть чего-нибудь понял?
:о)

← →
{RASkov} © (2009-02-10 19:02) [46]

> А вот при третьем нажатии уже АВ....

Я говорил про нажатия кнопки, это - метод TForm2.Button1Click...
но последней строчкой в [45] - ошибся.... ибо до нее(а точнее до метода TForm2.Button1Click) дело не дойдет...
АВ будет при очередном Form2.Show; Или при любом обращении к Form2....

← →
AlexDan © (2009-02-10 19:31) [47]

> {RASkov} © (10.02.09 18:56) [45]
> При втором нажатии форма опять закрывается, но уже выполняется
> метод FormClose....
Вот этого наверное я не был в курсе..ссори.

← →
Servy © (2009-02-10 19:32) [48]

> [45], [46] {RASkov} ©

Есть мнение, что если автор написал все "полностью" (как он выразился) от руки, и инспектор объектов не трогал, то при нажатии кнопки не будет ничего. Ну прям совсем ничего :).

> AlexDan

Видимо, для вас открытием будет тот факт, что можно целой горе кнопок, форм, лабелей назначить один обработчик OnClick, и назвать его можно как угодно, а не только Button1Click. Связь между событием и обработчиком события должен установить программист, либо в Design Time в инспекторе объектов, либо в Run Time, упомянутым в [38] способом.

← →
AlexDan © (2009-02-10 22:25) [49]

> Servy © (10.02.09 19:32) [48]
> Есть мнение, что если автор написал все "полностью" (как
> он выразился) от руки, и инспектор объектов не трогал, то
> при нажатии кнопки не будет ничего. Ну прям совсем ничего
> :).
Если проект(юнит) написать в "блокноте", потом перекинуть его(через буфер обмена, например) в юнит созданной формы с уже готовым "лицом" (кнопки и т.п.) и не трогать инспектор обьектов то не будет ничего, совсем ничего.. Именно это я и пытался всю ветку обьяснить..

← →
Сергей М. © (2009-02-10 22:32) [50]

> Именно это я и пытался всю ветку обьяснить

Кому ? Самому себе ?
Чьей "дикости" в таком случае ты поражался ?
И в чем все-таки виноват компилятор ?)

← →
AlexDan © (2009-02-10 22:40) [51]

> Сергей М. © (10.02.09 22:32) [50]
> И в чем все-таки виноват компилятор ?)
В том, что я перебросил код (процедуру onClose) из одного проекта в другой, и пока я не прописал её в инспекторе обьектов она не инициализировалась, даже после указания FormClose из другой процедуры (ButtonClick)..

← →
AlexDan © (2009-02-10 22:43) [52]

Ну да ладно, мать его так).

← →
Сергей М. © (2009-02-10 22:47) [53]

Мда ..
Тяжелый случай)

← →
TAX (2009-02-10 23:03) [54]

чем-то напоминает
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=60356

← →
Anatoly Podgoretsky © (2009-02-10 23:05) [55]

> AlexDan (10.02.2009 22:40:51) [51]

onClose не процедура, а свойство

← →
AlexDan © (2009-02-10 23:20) [56]

> TAX (10.02.09 23:03) [54]
Вот, спасибо, помоему да.

← →
AlexDan © (2009-02-10 23:26) [57]

> TAX (10.02.09 23:03) [54]
И я видимо замечаю такие нестыковки, т.к. перешёл на делфи с турбопаскаля..).

← →
AlexDan © (2009-02-10 23:42) [58]

Замечательная ветка, это оттуда:
"И совершенно правильно делаете. Боясь показаться скучной, могу попытаться пояснить, откуда взялась такая постановка вопроса. До вчерашнего дня я была уверена, что файл с расширением .pas -- это таки старый добрый честный Pascal, а все остальные файлы относятся к графической надстройке. К визуальной среде. Отсюда вывод: это от лукавого, а pas просто по-любому обязан компилиться. Но мир всегда сложнее нашего представления о нём."

← →
sniknik © (2009-02-10 23:44) [59]

> И я видимо замечаю такие нестыковки
нестыковки????

-----------
купил колеса, положил в гараж, утром на работу ехать и не могу, колес на автомобиле нет...
ну их в общем то и не было, но почему новые, купленные на автомобиль не "наделись"? нестыковка однако. плохие автомобили еще делают...

← →
AlexDan © (2009-02-10 23:47) [60]

> sniknik © (10.02.09 23:44) [59]
Вот именно, я ставил колёса какие надо, а кампиллятор сказал что их нет..

← →
AlexDan © (2009-02-10 23:49) [61]

Прочтите внимательно ветку
> http://www.delphikingdom.com/asp/answer.asp?IDAnswer=60356
но и она лишь отчасти затрагивает тот вопрос, который я ставил.

← →
sniknik © (2009-02-10 23:55) [62]

> Вот именно
не надо перевирать, другое написано.

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

ты придуриваешься, или на самом деле ...?

← →
sniknik © (2009-02-10 23:58) [63]

> Прочтите внимательно ветку
видишь там ягодки рядом с датой? знаешь что значат? это вопрос над которым все ржут... в разделе чтобы поржать, т.к. он настолько ламерский, что ни для чего другого годен.

← →
sniknik © (2009-02-10 23:59) [64]

не годен.

← →
Сергей М. © (2009-02-10 23:59) [65]

> перешёл на делфи с турбопаскаля

Со времен ТрубоПаскаля многое, конечно, изменилось, но по-прежнему неизменно одно - для того чтобы подпрограмма получила управление, ее надо вызвать.
Дельфийский Инспектор Объектов всего лишь вуалирует вызовы.

← →
AlexDan © (2009-02-11 00:14) [66]

Пример: Проект

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.show;
end;

end.

Копируем в буфер, закрываем проект без сохранения. Делаем новый точно такой-же проект (т.е. кнопка на первой форме открывает вторую). Стираем юнит один полностью. Вставляем на его место вышепреведенный кусок (из буфера). Компилируем - кнопка 1 не работает, форма 2 не вызывается.

← →
sniknik © (2009-02-11 00:16) [67]

> Копируем в буфер
а dfm? почему копируем половину модуля?

← →
Сергей М. © (2009-02-11 00:17) [68]

> Компилируем - кнопка 1 не работает, форма 2 не вызывается

И что ?
Отсутствует вызов метода Button1Click, потому "не работает..не вызывается"

← →
AlexDan © (2009-02-11 00:18) [69]

> sniknik © (11.02.09 00:16) [67]
Вот именно, об этом как говориться и бодались..).

← →
AlexDan © (2009-02-11 00:31) [70]

до одури.).

← →
sniknik © (2009-02-11 00:31) [71]

> Вот именно, об этом как говориться и бодались..).
бодались не с этим, бодались с ТОБОЙ, с твоим "умением" ставить вопросы (вот прочитай [0] и сравни с [66]), и понимать ответы (вот почему опять "вот именно"? у меня не подтверждение твоему посту, а указание о твоем упущении. и если ты даеш понять что понял должен был бы написать "да, был дурак, не понимал что копировал половинку от целого и все коверкал, а восстановить исковерканное не догадался, теперь исправлюсь, больше не буду.").

← →
sniknik © (2009-02-11 00:32) [72]

> до одури.).
ну так веди себя адекватнее, и все наладится...

← →
{RASkov} © (2009-02-11 00:38) [73]

> [66] AlexDan © (11.02.09 00:14)
> Копируем в буфер, закрываем проект без сохранения.

Причем тут буфер, при чем тут блокнот, при чем тут ИО и т.д......?
Ты так и не понял ничего :( Завязывай с программированием, это не твое :)

← →
AlexDan © (2009-02-11 00:41) [74]

> sniknik © (11.02.09 00:31) [71]
Вообщем то да, просто перейдя с турбо паскаля, я не учитывал (точнее не обращал внимание) на такие вещи.

← →
AlexDan © (2009-02-11 00:43) [75]

> {RASkov} © (11.02.09 00:38) [73]
Что же тут непонятного?)

← →
{RASkov} © (2009-02-11 00:49) [76]

> [75] AlexDan © (11.02.09 00:43)

Судя по [66](!) посту(не малое кол-во :)) ты так и не понял "кухню" Делфи)

← →
AlexDan © (2009-02-11 00:51) [77]

> {RASkov} © (11.02.09 00:49) [76]
То я привёл именно для примера, а понимаю всё прекрасно.).

← →
sniknik © (2009-02-11 00:59) [78]

> а понимаю всё прекрасно.).
ну тогда ты это тщательно скрываешь... ну а так как это ты задал вопрос, и это тебе все пытаются объяснить, а ты все не показываешь, что хоть что то понял, вот и получается что "упирашся", с чем все и бодаются.
пока не надоело... а после будут тебя игнорировать.

упирашся - упираешься

> {RASkov} © (11.02.09 00:49) [76]
>
> > [75] AlexDan © (11.02.09 00:43)
>
> Судя по [66](!) посту(не малое кол-во :)) ты так и не понял
> "кухню" Делфи)
> AlexDan © (11.02.09 00:51) [77]
>
> > {RASkov} © (11.02.09 00:49) [76]
> То я привёл именно для примера, а понимаю всё прекрасно.
> ).

Вот мои любимые собачки тоже "понимают всё прекрасно". Но ...
:)

Автору:
Почитайте немного про обработчики:
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=50218

← →
Р. Стабилизатор (2009-02-11 09:03) [82]

Весёлая ветка... Особенно порадовало, что автору даже рассказали как вручную назначить обработчики событий. Но он как-то не понял. :( [43] вообще шедевр... Можно еще до кучи две строки в TForm2.Button1Click() переставить местами и поизумляться. Ну, при условии, что Button1.OnClick := Button1Click; Где-нибудь заранее будет выставлено.

> Германн (11.02.2009 1:00:20) [80]

А он, что отличается.
Тоже все понимает, но сказать не может.

Голосую за два ореха.

> Плохиш (11.02.2009 11:11:24) [84]

В тиски/ах

← →
Эстет (2009-02-11 12:05) [86]

> Эстет (11.02.2009 12:05:26) [86]

Зато прекрасно и эстетично!

← →
Эстет (2009-02-11 12:10) [88]

> Anatoly Podgoretsky © (11.02.09 12:07) [87]

Что же в этом эстетичного? Тикски - грубая, грязная железка, а орехи... Правда, смотря какие ;)
А ну как лопнут.

← →
Эстет (2009-02-11 12:11) [89]

Удалено модератором
Примечание: дупль

> Эстет (11.02.2009 12:10:28) [88]

Помыть, протереть, повторить.

> Anatoly Podgoretsky © (11.02.09 12:24) [90]

Можно в другой реализации. Дверью. Экологично. Опять же орехи и дерево - где-то рядом ходят ;)

> korneley © (11.02.09 14:15) [91]
> Дверью. Экологично. Опять же орехи и дерево - где-то рядом
> ходят ;)
Самое интересное, действительно рядом ходят.). Моя строительная фирма специализируется именно на дереве. Как раз двери(пока только монтаж), и паркет(реставрация особенно милое дело). В моей домашней страничке про это как раз написано.), а Паскаль - память университетских лет. Пока вылился в два проекта. (Там-же). Возможно будет ещё два, (и скорее всего).. Даже может скоро).

> [92] AlexDan © (11.02.09 16:13)

Надеюсь, дела у фирмы лучше чем у тебя с программированием....
И что бы оно так и остовалось далее, лучше завязывай с написанием программ для данной фирмы...
:о)

> [94] AlexDan © (11.02.09 16:59)
> Я думаю получилось неплохо).

Можешь передумать, когда окажешься с метлой на улице :)

Мир станет лучше, если некоторые там и будут заканчивать...

Господа. Чуть дальше и будутъ наказания.

http://www.delphimaster.ru/forums.shtml#rule Запрещается: п.1 (после второго знака запятой до третьего)
http://www.delphimaster.ru/forums.shtml#rule Рекомендуется: п.1 (до первого знака запятой)

> {RASkov} (11.02.2009 17:19:39) [99]

в МИНУТУ?

AlexDan © (11.02.09 18:19) [101]
> Johnmen © (11.02.09 17:21) [100]
> Мир станет лучше, если некоторые там и будут заканчивать...
Johnmen, например..:)).

Абсолютно точно!
Я закончу программистом.

← →
Drum (2009-02-20 22:54) [105]

Прошу прощения что вмешиваюсь. Но возникло дикое желание подвести итог обсуждения. Иначе новичек с той же проблемой попадет сюда и сделает неправильные выводы.

1. Проектом в среде программирования Delphi считается файл с расширением .dpr (Delphi project) содержащий программу т.е. начинающийся со слова program.

2. Модулем считается файл с расширением .pas начинающийся со слова unit.

пока особых отличий от классического паскаля нет.

3. Модуль может содержать форму. (Форма - это класс объектного паскаля наследуемый от TForm.)

4. Для упрощения инициализации формы ее свойства и свойства компонентов лежащих на ней могут быть описаны в файле с расширением .dfm (Delphi Form).

5. Файл формы присоединяется к программе в качестве ресурса. Например так {$R *.dfm}.

т. е. исходники это файлы *.dpr, *.dpk, *.pas, *.dfm, *.inc и так далее.

6. События отображаемые на вкладке инспектора объектов это всего лишь свойства компонентов имеющих процедурный тип (точнее указатель на метод).

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

С Уважением.

← →
Kolian (2009-03-09 00:11) [106]

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

>Kolian (09.03.09 00:11) [106]

На зачет не ходи - не трать время свое и препода.
Не твое это..

> [106] Kolian (09.03.09 00:11)
> а зачет уже сегодня утром...

Беда, .....нефик было тянуть, двоешник. :)

> 2 изменять размеры формы на 5 пикселей со всех сторон при щелчке на пкм

left:=left-5; width:=width+10;
top:=.......

а программирование на что объетивно ориентированно ? :)

← →
Д'Артаньян (2009-03-09 21:43) [110]

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

← →
имя (2009-03-24 13:45) [111]

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

Закрытие формы. Найти похожие ветки