Form auf voller Bildschirmbreite anzeigen

[samso]

Probiere es mal so:

Delphi-Quellcode:

  if IsCompositionActive then 
  begin
    Form.Left := Form.BoundsRect.Left - Form.ClientOrigin.X;
    Form.ClientWidth := Screen.Width;
  end
  else
  begin
    Form.Left := 0;
    Form.With := Screen.Width;
  end