title: Drawing on FMX canvas with WinApi functions
body: <p>This question looks very simple, with VCL this is works fine (Image is TImage on VCL):</p>
  
  <pre><code>procedure TFormMain.btnDrawBackgroundClick(Sender: TObject);
  var
    theme: HTHEME;
  begin
    theme := OpenThemeData(0, 'TASKDIALOG');
    if theme &lt;&gt; 0 then
    try
      DrawThemeBackground(theme,
                          Image.Canvas.Handle,
                          TDLG_SECONDARYPANEL,
                          0,
                          Image.ClientRect,
                          nil);
    finally
      CloseThemeData(theme);
    end;
  end;
  </code></pre>
  
  <p>Question: what I should change to get the same effect with FMX (on Windows)</p>