Св-во TFont

← →
nza (2010-12-28 16:28) [0]

Есть компонент, наследник TCustomPanel
на нем создан SpringGrid.
Пытаюсь установить св-во TFont SpringGrid"а в Object Inspector, делаю так
private FFont:TFont published property Font : TFont read FFont write SetFont; implementation constructor ... fFont:=TFont.create; destructor ... fFont.Free; procedure TButtonGrid.SetFont(const Value: TFont); begin FFont.Assign(Value); FGrid.Font.Assign(Ffont); end;

Изменяю параметры шрифта в obj insp
но шрифт не меняется :(
помогите разобраться

← →
nza (2010-12-28 16:29) [1]

FGrid - TStringgrid

← →
MBo © (2010-12-28 16:34) [2]

А грид в курсе, что ему стоит перерисоваться?

← →
nza (2010-12-28 16:36) [3]

procedure TButtonGrid.SetFont(const Value: TFont); begin FFont.Assign(Value); FGrid.Font.Assign(Ffont); FGrid.Refresh; end;

Пробовал так, не помогает

← →
Юрий Зотов © (2010-12-28 16:37) [4]

> Есть компонент, наследник TCustomPanel
А у него УЖЕ есть унаследованный Font

> на нем создан SpringGrid.
И у него тоже УЖЕ есть унаследованный Font

← →
nza (2010-12-28 16:42) [5]

так что просто обьявить

property Font;

← →
nza (2010-12-28 16:43) [6]

или переименовать св-во?

> property Font;

Ну вроде того. А StrigGrid-у ParentFont в True выставить.

← →
nza (2010-12-28 16:54) [8]

Помогло Спасибо !

Св-во TFont Найти похожие ветки