Посоветуйте компонент сохранения положения и размера дочерних окон

[delphicoding]

Здравствуйте!

Уже использовал RxLib TFormPlacement:
http://it.kgsu.ru/DelRXTools/delrxt0003.html
http://www.rxlib.ru/rx/rxTools/FormPlacement/index.htm
в общем всем удовлетворял, но есть баги, хочу избавиться от RxLib по десяти причинам :D

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

[delphicoding]

Странно, что в комплекте JVCL есть нужный JvFormPlacement, но почему-то он не включен ни в одну библиотеку... как его подключить в библиотеку System?

[GydruS]

Вот хороший:
http://delphidabbler.com/software/wd...wnload?mid=3.1

Только его на каждую форму, которую необходимо сохранять кидать надо...

[NITROGEN_92]

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

var
  i: Integer;
  Form: TForm;
  Ini: TIniFile;
begin
  Ini := TIniFile.Create('C:\FormsData.ini');
  try
  for i := 0 to Application.ComponentCount - 1 do
  begin
    if Application.Components[i] is TForm then
      Form := (Application.Components[i] as TForm);
      if Form.FormStyle = fsChild then
      begin
       Ini.WriteInteger(Form.Name, 'Left', Form.Left;
       Ini.WriteInteger(Form.Name, 'Top', Form.Top;
       Ini.WriteInteger(Form.Name, 'Width', Form.Width;
       Ini.WriteInteger(Form.Name, 'Height', Form.Height;
     end;
  end;
  finally
    Ini.Free;
  end;
end;