Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AW: TTitleBarPanel Popup-Menü?

    Delphi
    by PeterPanino, 16. Okt 2023
  TIPP: Da man mit diesem Workaround das Fenster nicht mehr durch Draggen der Titelleiste bewegen kann, gibt es auch dafür einen Workaround:
  
  procedure TForm1.ImageDummyTitlebarMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
  const
  SC_DRAGMOVE = $F009;
  begin
  if Button = mbLeft then
  begin
  ReleaseCapture;
  Perform(WM_SYSCOMMAND, SC_DRAGMOVE,...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  TTitleBarPanel Popup-Menü?

    Delphi
    by PeterPanino, 16. Okt 2023
  TTitleBarPanel hat in Delphi 11.3 noch immer keine PopupMenu property. So muss ich als Workaround ein transparentes Dummy TImage mit Align = Client auf dem TTitleBarPanel verwenden, um mit dessen PopupMenu property ein Kontextmenü in der Titelleiste aufzurufen.