Tform.Caption, Font ändern

[noenglish]

Ich möchte die Schrift von Tform.Caption ändern. Ich habe nur Lösungen für Delphi gefunden, und zwar die Prozedur:

Code: Alles auswählen

procedure WMNCPaint(var Msg: TWMNCPaint); 

Diese Prozedur wird unter Lazarus aber nicht aufgerufen.
Kennt jemand eine Lösung für Lazarus?
Im Voraus besten Dank!
noenglish

[theo]

Warum wollt ihr nur immer so komisches Zeug machen?
Unter Linux gehört der Fenstertitel dem Window Manager und nicht dem Programm.
Unter Windows gibt es vielleicht einen Weg (den ich nicht kenne), aber wozu?

[noenglish]

Für mein Empfinden ist, besonders bei eine großen Form, die Schrift einfach zu kümmerlich.
noenglish

[theo]

Dann stell es im Betriebssystem ein. Es ist ja dann für dich bei allen Programmen zu "kümmerlich".

[Mathias]

Warum wollt ihr nur immer so komisches Zeug machen?

Für ein normales Desktop-Programm gebe ich dir recht, aber für ein Games sind solche Änderungen interessant.

[Michl]

aber für ein Games sind solche Änderungen interessant.

Dann würde ich komplett selber zeichnen ohne Border.

[noenglish]

Bitte zurück zur Frage:
Schrift von Tform.Caption ändern, Kennt jemand eine Lösung für Lazarus?
Bitte keine Antworten die nicht zur Lösung beitragen.

noenglish

[m.fuchs]

Wer fragt, darf sich nicht wundern, wenn er Antworten bekommt. Eventuell auch welche, die ihm nicht gefallen.
Aber sowohl Theos als auch Michls Antwort beinhalten eine Lösung für dein Problem.

[Christian]

Crossplattform gibt es keinen Weg, aus von Theo genannten gründen.
Windows Only kannst dus genauso wie Delphi machen.
Allerdings muss auch ich dir sagen programme die solchen Quark machen bleiben auch bei mir keine 10 sek auf der PLatte.

[theo]

Windows Only kannst dus genauso wie Delphi machen.

Auf die genannte Art geht es eben nicht. http://forum.lazarus.freepascal.org/ind ... ic=24595.0
Am besten den Wunsch vergessen oder den ganzen Titlebar (o.ä.) selber zeichnen.

[Mathias]

Auf die genannte Art geht es eben nicht. http://forum.lazarus.freepascal.org/ind ... ic=24595.0

Verstehe ich dich richtig, mit Delphi geht es aber mit Lazaurs fast unmöglich ?

[theo]

Auf die genannte Art geht es eben nicht. http://forum.lazarus.freepascal.org/ind ... ic=24595.0

Verstehe ich dich richtig, mit Delphi geht es aber mit Lazaurs fast unmöglich ?

Wenn man Lazarus als Cross-Platform Tool sieht, was man mMn sollte, dann geht es nicht, weil Linux und wahrsch. auch Mac das gar nicht zulassen.
Ob es auf Windows einen Weg gibt, weiss ich nicht. Message WM_NCPAINT kommt offenbar nicht durch.

[Mathias]

Message WM_NCPAINT kommt offenbar nicht durch.

So auch nicht ?

Code: Alles auswählen

procedure WMNCPaint(var Msg: TMessage); message WM_NCPAINT;

[theo]

Message WM_NCPAINT kommt offenbar nicht durch.

So auch nicht ?

Code: Alles auswählen

procedure WMNCPaint(var Msg: TMessage); message WM_NCPAINT;

Geht's bei dir?

[Mathias]

Geht's bei dir?

Habe ich nicht probiert, ich habe einen alten Delphi-Quelltext von mir angeguckt und habe ich das mit der message gelesen.

Da hatte ich mal ein Logo in der Caption gezeichnet.