//--------------------------------------------------------------------------- __fastcall TEditorForm::TEditorForm(TComponent* Owner) : TForm(Owner) { EditorMemo = new TRichEdit20(this); EditorMemo->Parent = this; EditorMemo->Align = alClient; EditorMemo->HideSelection = false; EditorMemo->PlainText = true; EditorMemo->PopupMenu = EditorPopup; EditorMemo->ScrollBars = ssBoth; EditorMemo->WantTabs = true; EditorMemo->OnChange = EditorMemoChange; EditorMemo->OnKeyUp = EditorMemoKeyUp; EditorMemo->OnMouseUp = EditorMemoMouseUp; FParentForm = NULL; FCaretPos = TPoint(-1, -1); FLastFindDialog = NULL; FCloseAnnounced = false; FShowStatusBarHint = false; ApplyConfiguration(); FFindDialog = new TFindDialogEx(this); FFindDialog->OnFind = FindDialogFind; FReplaceDialog = new TReplaceDialogEx(this); FReplaceDialog->OnFind = FindDialogFind; FReplaceDialog->OnReplace = FindDialogFind; FEncoding = NULL; InitCodePage(); UseSystemSettings(this); UseDesktopFont(StatusBar); SetFormIcons(this, L"Z_ICON_EDITOR_BIG", L"Z_ICON_EDITOR_SMALL"); }
//--------------------------------------------------------------------------- __fastcall TLogForm::TLogForm(TComponent* Owner) : TForm(Owner) { FLogMemo = NULL; FSessionLog = NULL; ShowWindow(Handle, SW_SHOWNA); UseSystemSettings(this); UseDesktopFont(StatusBar); SetFormIcons(this, L"Z_ICON_LOG_BIG", L"Z_ICON_LOG_SMALL"); }