Ich spiele gerade mal an einem kleinen DataBinding-Framework herum.
Ich kann u.a. schon mit einer Checkbox Edit1.Enabled umschalten.
Das funktioniert "funktional" auch wie erwartet, aber die Controls werden nicht neu gezeichnet bzw. erst wenn ich das Formular minimiere und wieder herstelle.
Ein ausdrückliches Repaint hilft auch nicht weiter.
Delphi-Quellcode:
procedure TssfCtrl.set_PropText(const Value: string);
begin
if Assigned(BindObject) then
begin
SetPropValue(BindObject, PropName, Value);
// if (BindObject is TControl) then
// (BindObject as TControl).Repaint; // hilft nicht
end;
end;
Weiß jemand auf Anhieb, wo es mangelt? Vermutlich muss noch das Formular den Auftrag erhalten, sich neu zu zeichnen.
Invalidate - wie in der
VCL - gibt es ja nicht.