BS_FLAT nicht mit XP-Theming?

[Mithrandir]

Irgendwie hakt's gerade:

Ich erstelle so (non-vcl!)

Zitat:

hwndAddTeaBtn := CreateWindowEx(0,'BUTTON', '+',
WS_VISIBLE or WS_CHILD or BS_FLAT, 8, 81, 23, 22, hwndTeaListControlGbx,
IDC_ADDTEABTN, hInstance, nil);

eine Schaltfläche mit dem Stil BS_FLAT. Allerdings wird sie wie ein ganz normaler, kleiner Button angezeigt. Weiß jemand, wie ich den Button "flach" bekomme, wie man es von der VCL-Komponente "TSpeedButton" kennt?

XP-Manifest ist übrigens eingebunden, Parent ist eine GroupBox.

[uligerhardt]

Zitat:

Zitat von Daniel G

Weiß jemand, wie ich den Button "flach" bekomme, wie man es von der VCL-Komponente "TSpeedButton" kennt?

Vermutlich nur per OwnerDrawing. Schau dir TSpeedButton.Paint an - die VCL benutzt bei flachen Speedbuttons die Theming-API für Toolbuttons.

[Mithrandir]

Hm, das habe ich fast befürchtet. Danke für den Hinweis. Mal sehen, ob ich das dann noch umsetze...

[Bernhard Geyer]

Man kann per API-Befehl XP-Theming für einzelne Controls abschalten.
Funktionsname müsstest du hier im Forum finden.

[uligerhardt]

Ich hab's grad mal ohne Themes ausprobiert: Ein API-Button mit BS_FLAT schaut doch eh ganz anders aus als ein ToolButton/flacher SpeedButton?

[Mithrandir]

Hi,

stimmt, der sieht in der Tat anders aus. Was mich auch stört: Wenn ich dem Button ein Icon zuweise und dann den Button "deaktiviere", habe ich keine Möglichkeit, ein graues Bild zu zeigen. Außerdem wird der Button mit zugewiesenem Icon in dem alten Stil gezeichnet.

Vermutlich werde ich doch alles selbst zeichnen müssen... :roll: :wall:

[uligerhardt]

Zitat:

Zitat von Daniel G

Vermutlich werde ich doch alles selbst zeichnen müssen... :roll: :wall:

Kannst du nicht nen Toolbutton nehmen?

[Mithrandir]

Toolbuttons gibts doch nur in ner Toolbar, oder? :gruebel:

[uligerhardt]

Zitat:

Zitat von Daniel G

Toolbuttons gibts doch nur in ner Toolbar, oder? :gruebel:

Du sagst es. Also ne Toolbar mit genau einem Button an die richtige Stelle auf die Form pappen. Funktioniert zumindest bei Non-Non-VCL hervorragend. ;)

[Mithrandir]

Siehst, und did is dat Problem: Die CreateWindow-Prozedur ignoriert gekonnt alle Höhen-, Breite- und wat weiß ich für Positionsangaben. :mrgreen: