//--------------------------------------------------------------------------- void __fastcall TLinkDetailForm::FormClose(TObject *Sender, TCloseAction &Action) { if(ModalResult == mrOk) { EditLinkAttribFrame->CheckUncommitted(); EditLinkAttribFrame->SetLinkInfo(FLink); UpdateMainWindowParams(true); } else { FLink = FLinkOriginal; UpdateMainWindowParams(false); } // write information to ini file WriteWindowBasicInformationToIniFile("LinkDetail", this); }
void __fastcall TLabelDetailForm::FormClose(TObject *Sender, TCloseAction &Action) { // write information to ini file WriteWindowBasicInformationToIniFile("LabelDetail", this); }