Quantcast
Channel: Intel® Software - Intel® Visual Fortran Compiler for Windows*
Viewing all articles
Browse latest Browse all 5691

Picture Control Revisited

$
0
0

I read the previous thread and it was closed so I'm restarting it. I deliberately chose not to use ColorPicker cpommon dialog because rarely does the color I've picked look good on the full screen. So I created a small 'color picker' where I have a few radio buttons that I've selected and a fairly large picture object. Thinking that I would have a bigger area to see a color. Here is the basis of my code:

      myRect%left = 104
      myRect%top = 12
      myRect%bottom = 96
      myRect%right = 78
      bret = MapDialogRect(hWnd, myRect)
      hDC = GetDC(hWnd)
      if (hDC == NULL) Then
         bret = DeleteObject(myBrush)
         Return
      End If
      iret = FillRect(hDC, myRect, myBrush)    ! this should fill the picture control

where myBrush is created using the RGB values from the dialog radiobutton. I've included the full subroutine and callback as an attachment and a pdf of the dialog. Nothing really happens in the color dialog and I want to understand what I've done wrong to not get a color in the rectangular picture control.

Thanks,

Brooks

AttachmentSize
Downloadapplication/pdfcolor.pdf8.13 KB
Downloadapplication/octet-streamDoColor.f907.69 KB

Viewing all articles
Browse latest Browse all 5691

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>