---------------------------------------------------------------------------
| 254 | } |
| 255 | //--------------------------------------------------------------------------- |
| 256 | void TSaveParams::SetFont(AnsiString Section, AnsiString Name, TFont* Font) |
| 257 | { |
| 258 | int StInt; |
| 259 | TFontStyles St; |
| 260 | Set(Section, Name + "_Name", Font->Name); |
| 261 | Set(Section, Name + "_Charset", Font->Charset); |
| 262 | Set(Section, Name + "_Size", Font->Size); |
| 263 | Set(Section, Name + "_Color", Font->Color); |
| 264 | St = Font->Style; |
| 265 | memcpy(&StInt, &St, 1); |
| 266 | Set(Section, Name + "_Style", StInt); |
| 267 | } |
| 268 | //--------------------------------------------------------------------------- |
| 269 | void TSaveParams::GetFont(AnsiString Section, AnsiString Name, TFont* Font) |
| 270 | { |
nothing calls this directly
no outgoing calls
no test coverage detected