EnableExplicit Define SIZE.SIZE If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) ButtonGadget(1, 10, 10, 0, 20, "Programminstallationseinstellungen", 0) ButtonGadget(2, 10, 50, 0, 0, "Programminstallationseinstellungen" + Chr(13) + "Zweite Zeile", #PB_Button_MultiLine) SendMessage_(GadgetID(1), #BCM_GETIDEALSIZE, 0, SIZE) ResizeGadget(1, #PB_Ignore, #PB_Ignore, SIZE\cx, #PB_Ignore) SendMessage_(GadgetID(2), #BCM_GETIDEALSIZE, 0, SIZE) ResizeGadget(2, #PB_Ignore, #PB_Ignore, SIZE\cx, SIZE\cy) Repeat Select WaitWindowEvent() Case #PB_Event_CloseWindow End EndSelect ForEver EndIf