Example #1
0
//---------------------------------------------------------------------------
void __fastcall TLinkLabelEx::CreateParams(TCreateParams &Params)
{
  TWinControl::CreateParams(Params);
  if(CheckWin32Version(5, 1) && IsLinkLabelSupported())
    CreateSubClass(Params, WC_LINK);
  else
    CreateSubClass(Params, L"STATIC");
  Params.WindowClass.style &= ~CS_VREDRAW;
}
Example #2
0
//---------------------------------------------------------------------------
void __fastcall TRichEdit20::CreateParams(TCreateParams & Params)
{
  const wchar_t RichEditModuleName[] = L"RICHED20.DLL";
  long int OldError;

  OldError = SetErrorMode(SEM_NOOPENFILEERRORBOX);
  FLibrary = LoadLibrary(RichEditModuleName);
  SetErrorMode(OldError);

  FVersion20 = (FLibrary != 0);
  if (!FVersion20)
  {
    // fallback to richedit 1.0
    TRichEdit::CreateParams(Params);
  }
  else
  {
    TCustomMemo::CreateParams(Params);
    CreateSubClass(Params, RICHEDIT_CLASS);
    Params.Style = Params.Style |
      (HideScrollBars ? 0 : ES_DISABLENOSCROLL) |
      (HideSelection ? 0 : ES_NOHIDESEL);
    Params.WindowClass.style = Params.WindowClass.style &
      ~(CS_HREDRAW | CS_VREDRAW);
  }
}