Aktuelle Zeit: 09.07.2020 22:30

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]




Ein neues Thema erstellen Auf das Thema antworten  [ 3 Beiträge ] 
Autor Nachricht
 Betreff des Beitrags: Compilerkonstante für DPIaware
BeitragVerfasst: 04.01.2019 16:38 
Offline
Benutzeravatar

Registriert: 22.12.2016 12:49
Wohnort: :D_üsseldorf-Wersten
Hallo,
mit welcher Compilerkonstanten frage ich die Compileroption DPI-Unterstützung für das Executable ab?
Code:
;PB 5.70 Windows
;#PB_Compiler_DPIaware=0
;#PB_Compiler_DPIaware=1

CompilerIf 0=#PB_Compiler_DPIaware
  CompilerError "Compiler Option DPI kompatibles EXE erstellen einstellen"
CompilerEndIf


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Compilerkonstante für DPIaware
BeitragVerfasst: 04.01.2019 16:49 
Offline
Admin
Benutzeravatar

Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Es gibt anscheinend noch keine Konstante dafür. Bist du im englischen Forum registriert? Wenn ja, dann kannst du dort einen Wunsch-Thread erstellen.

_________________
BildBildBildBild BildBild


Nach oben
 Profil  
Mit Zitat antworten  
 Betreff des Beitrags: Re: Compilerkonstante für DPIaware
BeitragVerfasst: 22.02.2019 09:18 
Offline
Benutzeravatar

Registriert: 22.12.2016 12:49
Wohnort: :D_üsseldorf-Wersten
Code:
; Workaround Laufzeitabfrage PB_Compiler_DPIAware
CompilerIf #PB_Compiler_OS=#PB_OS_Windows
  CompilerIf #PB_Compiler_Version>=570
    Define DPIFlag.l
    EnableASM
    MOV eax,dword [PB_Compiler_DPIAware] ; _PB_DataSection: pb_public PB_Compiler_DPIAware   dd     0 oder 1
    MOV DPIFlag,eax                      ; Schreibe eax Register in Variable DPIFlag.
    If 0=DPIFlag
      MessageRequester("FATAL","Compiler Option DPIAware wurde nicht gesetzt.")
      End
    EndIf
  CompilerElse 
    CompilerError "PureBasic 5.70 oder höhere Version wird benötigt."
  CompilerEndIf
CompilerEndIf

CompilerIf #PB_Compiler_IsIncludeFile=#False
ExamineDesktops()
Fenster=OpenWindow(#PB_Any , 0, 0, DesktopWidth(0)-20, DesktopHeight(0)-60, "Maus nicht im Fenster", #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_Tool)
Repeat
  Event = WaitWindowEvent(16)
  Select Event   
    Case #WM_MOUSEMOVE
      SetWindowTitle(Fenster,"Mausposition:"+ Str(WindowMouseX(Fenster)) + "," + Str(WindowMouseY(Fenster)))
  EndSelect   
Until Event = #PB_Event_CloseWindow
CompilerEndIf


Nach oben
 Profil  
Mit Zitat antworten  
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  [ 3 Beiträge ] 

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]


Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 4 Gäste


Sie dürfen keine neuen Themen in diesem Forum erstellen.
Sie dürfen keine Antworten zu Themen in diesem Forum erstellen.
Sie dürfen Ihre Beiträge in diesem Forum nicht ändern.
Sie dürfen Ihre Beiträge in diesem Forum nicht löschen.

Suche nach:
Gehe zu:  

 


Powered by phpBB © 2008 phpBB Group | Deutsche Übersetzung durch phpBB.de
subSilver+ theme by Canver Software, sponsor Sanal Modifiye