[ERLEDIGT] DateGadget() und EditorGadget Rahmenlos

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
udg
Beiträge: 566
Registriert: 20.06.2013 23:27

Re: [Frage] DateGadget()

Beitrag von udg »

RSBasic hat geschrieben:
Aber um deine Frage ausnahmsweise hier zu beantworten:

Code: Alles auswählen

EnableExplicit

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  EditorGadget(1, 50, 50, WindowWidth(0)-100, WindowHeight(0)-100, 0)
  
  SetWindowTheme_(GadgetID(1), @"", @"")
  SetWindowLongPtr_(GadgetID(1), #GWL_EXSTYLE, 0)
  SetWindowPos_(GadgetID(1), 0, 0, 0, 0, 0, #SWP_NOMOVE | #SWP_NOSIZE | #SWP_FRAMECHANGED)
  
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf

Vielen Dank für Deine Ausnahme. Ich dachte mir nun eher: (nicht mit Threads zumüllen) ... werde ich zukünftig berücksichtigen. :allright:
Habe inzwischen Deinen Vorschlag meinem Code angepasst:
Funktioniert erste Sahne.

Großes Danke
PB v5.43 LTS + v6.02 LTS | Windows 7 x86 + 11 x64 - Gforce RTX 4090 - AMD Ryzen 9 5900X 12-Core Processor 4.2 GHz - 64,0 GB RAM,
ASUSTEK TUF Gaming X570 Plus
ASUS ROG Thor-1200P Platinum (1200W, Aura Sync, OLED Display, 0dB-Cooling)
1x 1 TByte Samsung MZ-V7S500BW 970 EVO Plus 1 TB NVMe M.2 Internal SSD
1x 2 TByte Samsung MZ-V7S2T0BW 970 EVO Plus 2 TB NVMe M.2 Internal SSD
von BiSONTE!. Kauft Hardware gern bei ihm.
Monitor:
LG 38GL950G-B 95 (38 Zoll) Ultragear Curved 21: 9 UltraWide QHD IPS
Antworten