Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Message o.Ä. wenn Scrollbar(s) eingeblendet werden
20. Apr 2012, 10:35
wenn Du Dich in WM_SIZE hängst wirst Du zwar etwas öfter aufgerufen als nötig, aber mit einer zusätzlichen Prüfung hier könntest Du weiterkommen
Delphi-Quellcode:
type
TScrollBox=Class(Forms.TScrollBox)
procedure WMSize(var Message: TWMSize); message WM_SIZE;
End;
TForm2 = class(TForm)
...
procedure TScrollBox.WMSize(var Message: TWMSize);
begin
inherited;
Showmessage('Size');
end;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|