Method Get

sourcecommon/utils.cpp:151–166

--------------------------------------------------------------- --------------------------------------------------------------------------- ---------------------------------------------------------------------------

//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
void TMyFont::Get(TFont * font)
{
  Color  = font->Color;
  Height = font->Height;
  strncpy(Name, ((AnsiString)font->Name).c_str(), 31);
  Name[31] = NULL;
  Pitch = font->Pitch;
  PixelsPerInch = font->PixelsPerInch;
  Size = font->Size;

  Style = 0;
  if( font->Style.Contains(fsBold) )      Style |= 1;
  if( font->Style.Contains(fsItalic) )    Style |= 2;
  if( font->Style.Contains(fsUnderline) ) Style |= 4;
  if( font->Style.Contains(fsStrikeOut) ) Style |= 8;
}
//---------------------------------------------------------------
void TMyFont::Set(TFont * font)
{