![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Left Top компонета
DimaBr © (2006-04-20 09:07:00)Здравствуйте !
Как можно подвинуть компонентв дизайнере.
DimaBr (2006-04-21 10:04:00) [1]Поробывал реализовать через редактор компонета - работает, но перемещение происходит после нажатия на Save, то-есть после сохранения и чтения из ресурса.
Можно ли заставить компонет перечитать свои свойства из ресурса ?
DimaBr (2006-04-20 10:52:00) [2]
procedure TTest.SetZ(const Value: integer);
var x: integer;
begin
fZ := Value;
if Value = 100 then begin
LongRec(X).Lo := 100;
LongRec(X).Hi := 100;
DesignInfo := x;
TForm(Parent).Designer.Modified;
end;
end;
не помогает, может быть через IDesigner, а как дотянуться ?
Юрий Зотов (2006-04-20 10:16:00) [3]Left и Top невизуальных компонентов хранятся в DesignInfo. Вероятно, после его изменения нужно будет вызвать Designer.Modified.