2018年7月1日 星期日

BCB 筆記9 (String Replace)

既然使用 BCB 作為開發工具 不免俗就會常常使用他們的 String 這裡介紹 BCB 取代字串的方法 StringReplace(const UnicodeString Source, const UnicodeString OldPattern, const UnicodeString NewPattern, TReplaceFlags Flags); String Str; TReplaceFlags rf = TReplaceFlags()<<rfReplaceAll; Str = StringReplace(Str, L"@", L"\n",...

BCB OLE操作EXCEL(3)

在用 OLE 操作 Excel 時 有可能會遇到剪貼簿裡的資料過大 導致關閉 Excel 時跳出視窗警告 "是否放棄剪貼簿裡的資料" 要避開的話通常會用關閉 DisplayAlert 的方法來避免 但我常常失敗,原因不明。 所以給失敗的朋友另一個辦法 在 Excel 關閉前複製一格 避免剪貼簿裡資料過多跳出視窗 void __fastcall Excel::Close_2(){ Exc.Range = Exc.WorkSheet.OlePropertyGet("Cells", 1, 1); Exc.Range.OleFunction("Copy"); Exc.WorkBook.OleFunction("Close",...

Popular Posts