// Property setter for the "FileName" property. void __fastcall TVersionInfo::SetFileName(const UnicodeString AFileName) { // Remove all white space from any file name. FFileName = Trim(AFileName); if (FEnabled) ReadVersionInfoFromFile(); DoChanged(); }
// Property setter for the "Enabled" property. void __fastcall TVersionInfo::SetEnabled(const bool Value) { // Only update the state if it is actually changed. if (Value != FEnabled) { FEnabled = Value; if (FEnabled) ReadVersionInfoFromFile(); else ClearVersionInfoData(); DoChanged(); } }
void __fastcall TStreamingDeviceFrame::Timer1Timer(TObject * Sender) { NextValue(); DoChanged(); }