Блог. Двадцать пять лет Делфи-практики

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

Все, что здесь написано, не является истиной в последней инстанции, скорее, это результат моих размышлений над архитектурой проектов, маленьких и больших, которых я сделал на Делфи более дюжины.

Начав с Делфи-2 двадцать пять лет назад, я прошел все версии, испробовал массу технологий, включая работу с БД, с графикой DirectX, связью с серверами и интернетом, разработку на Андроид и IOS, и многое, многое другое.
________________________________________ ________________________________________ ____
P.S. все, о чем здесь написано, всего лишь измышления из головы.
совпадения с реальными людьми и фактами случайны.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

uses USecondForm;
...
procedure TMainForm.Button1Click(Sender:TObject);
begin
  RunSecondForm();
end;
 
procedure TMainForm.RunSecondForm();
var f:TSecondForm;
  aa,bb,cc....
begin
  f:=TSecondForm.Create(NIL);
  try
    // подготавливаем форму к показу. заполняем ее поля. настраиваем настройки
    f.field1 := xxxx;
    f.field2 := yyyy;
    f.Init();
    // показываем модально и ждем результата
    if f.ShowModal()=mrOK then
    begin
      //забираем из полей формы все что нам нужно
      aa:=f.field5;
      bb:=f.field6;
    end;
  finally
    // и уничтожаем форму
    f.free;
  end;
end;

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.