Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
Delphi 12 Athens
|
AW: Navigator - Buttons ein- ausblenden
26. Sep 2013, 16:12
Zitat:
Delphi-Quellcode:
TJvDBNavigator = class(TDBNavigator)
private
FTransparent: Boolean;
procedure SetTransparent(Value: Boolean);
protected
procedure Paint; override;
procedure WMEraseBkgnd(var Msg: TWMEraseBkgnd); message WM_ERASEBKGND;
public
constructor Create(AOwner: TComponent); override;
published
property Transparent: Boolean read FTransparent write SetTransparent default True;
end;
Das sollten also ganz normale TNavigateBtn sein. Aber was zum Henker ist ein TspNavigateBtn? Sind irgendwelche Spezialunits eingebunden? Klappt es mit voll qualifizierten Bezeichnern?
Delphi-Quellcode:
JvDBNavigator.VisibleButtons := JvDBNavigator.VisibleButtons + [DBCtrls.nbPost];
JvDBNavigator.VisibleButtons := JvDBNavigator.VisibleButtons - [DBCtrls.nbDelete];
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|