Сохранение динамически-созданных компанент

← →
Николай (2003-09-08 20:08) [0]

Вопрос следующий. Есть задача: создать такую программу (не суть какую), чтобы пользователь мог сам создавать и редактировать панели инструментов. Для этих целей я выбрал ToolBar 2000. Я делаю так: создаю панель, а на ней SpeedButton (стандартные кнопки не в полной мере удовлетворяют моим требованиям). С этим все просто. Проблема в другом, конкретно с сохранением и загрузкой панелей. Я пробовал использовать разные методы, но при сохранении в xml свойство TTBtoolBar.items не сохраняется, а при обычном сохранении компонента с помощью вот такой процедуры:

---
procedure SaveComponentToFile(Component: TComponent; const FileName: string);
var
ms:TMemoryStream;
fs:TFileStream;
begin
fs:=TFileStream.Create(FileName, fmCreate or fmOpenWrite);
ms:=TMemoryStream.Create;
try
ms.WriteComponent(Component);
ms.position := 0;
ObjectBinaryToText(ms, fs);
finally
ms.Free;
fs.free;
end;
end;
---

так же имеется множество проблем с сохранением свойств кнопок, в частности Hint, Cursor, Bitmap, Flat, события OnClick и т.д. Вообщем, может кто подскажет как ПРАВИЛЬНО сохранять панели в ОДИН файл. Не важно, что это будет - xml или что-то еще, главное результат. Заранее благодарен.

← →
send message system IO Error (2003-09-09 12:03) [1]

In FFF0AAA

Сохранение динамически-созданных компанент Найти похожие ветки