Создание формы в режиме run-time

[Kristina_1]

Здравствуйте.
Лазарус изучаю не больше недели. До этого ничего кроме си++ не знала. Очень нужна ваша помощь.Есть форма, на ней две кнопки. Первая создает приложение в в design-time, а вторая тоже самое но в run-time.Настройки хранятся в ini файле С design-time я разобралась, а вот с run-time не понятно. Что значит "описать ссылки на компоненты" ? Как это ? как ими после пользоваться? Что бы разобраться мне бы хватило примерчика....например с Label? как его создать в динамическом режиме? помогите

[Stilet]

Первая создает приложение в в design-time, а вторая тоже самое но в run-time.

Приложение??? Может быть форму?

Настройки хранятся в ini файле

Какого рода настройки? Приведи пример.

[Kristina_1]

Да, форму, не приложение...
пример ини файла
[LABEL_1]
Color=41120
Alignment=0
Size=12
Name='Monotype Corsiva'

[LABEL_2]
Color=16776960
Alignment=0
Size=12
Name='Monotype Corsiva'
....

[Stilet]

Как пример:

unit Unit1;

{$mode objfpc}{$H+}

interface

uses  inifiles,
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls;

type

  { TForm1 }

  TForm1 = class(TForm)
    Label1: TLabel;
    procedure FormCreate(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.FormCreate(Sender: TObject);
var sec:TStringList;i:integer;l:TLabel;
begin
  with TIniFile.Create(ExtractFilePath(ParamStr(0))+'q.ini') do begin
   sec:=TStringList.Create;
    ReadSections(sec);
    for i:=0 to sec.Count-1 do begin
      l:=TLabel.Create(self);
      l.Caption:=ReadString(sec[i],'Name','');
      l.Color:=ReadInteger(sec[i],'Color',clDefault);
      l.AutoSize:=true;
      l.Parent:=self;
      l.Show;
    end;
   sec.Free;
   Free;;
  end;
end;

end.

Есть варианты посложнее, но поэффективнее, однако твой ини файл под них не очень подходит.
Сам файл q.ini положи возле экзешника.

[Kristina_1]

По этому коду ничего на созданной форме не отображается...(

[Stilet]

Это не значит что код неправильный )
Я не с потолка его писал, а проверял в Лазаре, так что что-то делаешь не так ты.
Вполне возможно что ты тупо скопипастила код, даже не подключив события - типичная ошибка novice.

[Kristina_1]

Что значит подключить события? Добавить в uses модули?

Или там где события,выбрать onCreate ввести название процедуры?
Все сделано. Пустая по прежнему..(

[Stilet]

Нет. В проектировании в инспекторе объектов создать событие см. скрин.
Тогда Лазарь сформирует шаблон обработчика события, где и можно написать код.
Вообще если ты еще не познакомилась с понятием свойств и событий то рекомендую срочно это сделать, иначе ты ничего написать толком не сможешь, ни единой оконной программы, и не только в Лазаре.

Все сделано.

Точно? Шаблон обработчика создался? Ты в него код поместила?

[Kristina_1]

Да! Это сделала. Ничего не изменилось.



Вот.все как говорите

[Stilet]

Не понял... И что не работает?
можешь проект заархивировать и приаттачить сюда?