Hallo!
Ich hab mal ne Frage. Ich weiß, das Thema wurde schon oft erläutert, nur nicht zu meiner Zufriedenheit.
Ich bin schon lange auf der Suche nach einer Möglichkeit die Farbe eines Button zu ändern.
Ich weiß, daß mit WndProc alles möglich ist und ich möchte auch keine eigene Komponente schreiben, ich
möchte das Problem mit WndProc lösen. Ich war soweit, daß ich die Farbänderung gesehen habe, die aber gleich
durch BtnFace wieder überschrieben wurde. Könnt Ihr mir bitte eine Beispiel posten, wie ich das mit WndProc
lösen kann? Oder ergänzt einfach den untenstehenden Quelltext.
Vielen Dank schonmal im vorraus.
Gruß
landsc
mein Quelltext soweit:
Delphi-Quellcode:
procedure TfrmMain.WndProc(var msg: TMessage);
begin
inherited WndProc(msg);
if msg.Msg = WM_CTLCOLORBTN then
begin
Button1.Brush.Color := clRed;
msg.LParam := Button1.Handle;
msg.WParam := GetDC(Button1.Handle);
msg.Result := Button1.Brush.Handle;
end;
end;
[edit=Admin]Delphi-Tags korrigiert. Mfg, Daniel[/edit]