1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
| void __fastcall TFrameImage::WndProc(Messages::TMessage &Message)
{
HDC myDC;
TRect myRect;
int myAlignement;
TFrame::WndProc(Message);
if(TStyleManager::IsCustomStyleActive)
{
HDC myDC;
TRect myRect;
HBRUSH hbrBkgnd;
COLORREF crBkgnd;
switch (Message.Msg)
{
case WM_PAINT:
AnsiString asFichier = EdtRepSymbole->Text + LstEtats->Cells[COLONNE_FILE][LstEtats->Row];
Image1->Transparent=true;
Image1->Picture->Bitmap->TransparentColor = (TColor)pv_LstCouleur->Rows[LstEtats->Row ]->Objects[COLONNE_COL_COLOR];
Image1->Picture->Bitmap->TransparentMode = tmFixed;
Image1->Picture->Bitmap->Dormant();
//Image1->Picture->Bitmap->Monochrome = true;
Image1->Picture->Bitmap->LoadFromFile(asFichier);
Image1->Picture->Bitmap->PixelFormat=pf24bit;
break;
}
}
} |