|
Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Nachrichtenschleife bauen?
8. Okt 2012, 19:21
Warum nicht so?
Delphi-Quellcode:
procedure TIBasic.SetValue(AValue: WideString);
begin
FValue:=AValue;
PostMessage(FHandle, WM_CONTROL_VALUE_CHANGE, 0, 0);
end;
if Msg.Msg = WM_CONTROL_VALUE_CHANGE then
begin
SetControlValue(FValue);
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|