Die Suche ergab 143 Treffer
- 12.03.2017 10:33
- Forum: Feedback - Anwendungen
- Thema: WinAPI Library (Offline)
- Antworten: 124
- Zugriffe: 40200
Re: WinAPI Library (Offline)
Nee, ich habe nach langer Zeit nur diese zwei Codes eingereicht: "Hardware-Profil GUID ermitteln 2" und "Registry auf Veränderung überwachen". Der erstere dürfte schon vor einem halben oder ganzen Jahr eingereicht worden sein. Wer braucht schon so lange für einen Umzug? Oder verl...
- 11.03.2017 18:39
- Forum: Feedback - Anwendungen
- Thema: WinAPI Library (Offline)
- Antworten: 124
- Zugriffe: 40200
Re: WinAPI Library (Offline)
Wenn Du eingereichte Codes ohnehin nicht übernimmst, kannst Du dir die Arbeit sparen!
- 14.01.2017 19:25
- Forum: Windows
- Thema: WinAPI Library (Snippets) (1163 Beispielcodes)
- Antworten: 423
- Zugriffe: 153387
Re: WinAPI Library (Snippets) (1.077)
Weil ich das grade noch hier rumliegen habe: Registry auf Veränderung überwachen (RegNotifyChangeKeyValue_): EnableExplicit #REG_NOTIFY_ALL = #REG_NOTIFY_CHANGE_LAST_SET|#REG_NOTIFY_CHANGE_ATTRIBUTES|#REG_NOTIFY_CHANGE_NAME|#REG_NOTIFY_CHANGE_SECURITY Define Key, hEvent, Error Procedure.s LastError(...
- 07.12.2016 22:39
- Forum: Offtopic
- Thema: Alle Jahre wieder...
- Antworten: 53
- Zugriffe: 29231
- 23.10.2016 18:51
- Forum: Windows
- Thema: ContainerGadget statt eigenes Fenster
- Antworten: 9
- Zugriffe: 4645
Re: ContainerGadget statt eigenes Fenster
So kannste noch das Aufflackern des zu integrierenden Fensters verhindern und beide Fenster neu zeichnen :wink: : EnableExplicit Define Handle If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) If ContainerGadget(1, 0, 0, WindowWidth(0), WindowHei...
- 11.10.2016 16:03
- Forum: Allgemein
- Thema: Wo ist hier bitte die Sprache verstellt ?
- Antworten: 2
- Zugriffe: 1306
Re: Wo ist hier bitte die Sprache verstellt ?
Immer wieder das Gleiche: InitNetwork() ConnectionID = OpenNetworkConnection("table.finance.yahoo.com", 80) If ConnectionID com$="GET http://table.finance.yahoo.com/table.csv?s=IBM&g=d HTTP/1.1"+Chr(13)+Chr(10) com$=com$+"Accept: */*"+Chr(13)+Chr(10) com$=com$+"...
- 03.10.2016 09:51
- Forum: Code, Tipps und Tricks
- Thema: CreateWindowShot(hWnd, Client=#True)
- Antworten: 11
- Zugriffe: 5389
Re: CreateWindowShot(hWnd, Client=#True)
Hier nun noch eine weitere und wohl letzte Version, mit Anwendung der PrintWindow_() API. Um das Date-Gadget aufzunehmen, einfach ein anderes Datum angeben! EnableExplicit CompilerSelect #PB_Compiler_OS CompilerCase #PB_OS_Windows ;CompilerError "Dieser Code läuft nicht unter Windows!" Com...
- 01.10.2016 22:42
- Forum: Anfänger
- Thema: Schleife - Ereigniss erst wenn Änderung?
- Antworten: 7
- Zugriffe: 2344
Re: Schleife - Ereigniss erst wenn Änderung?
Oder so:
Code: Alles auswählen
Repeat
Nb_Monitors1 = ExamineDesktops()
If Nb_Monitors1 <> Nb_Monitors2
Nb_Monitors2 = Nb_Monitors1
Debug "You have "+Nb_Monitors2+" monitor(s) connected!"
EndIf
Delay(1000)
ForEver
- 01.10.2016 22:16
- Forum: Code, Tipps und Tricks
- Thema: CreateWindowShot(hWnd, Client=#True)
- Antworten: 11
- Zugriffe: 5389
Re: CreateWindowShot(hWnd, Client=#True)
Heute mal ein Code, der auf die #WM_PRINT Message setzt: EnableExplicit CompilerSelect #PB_Compiler_OS CompilerCase #PB_OS_Windows ;CompilerError "Dieser Code läuft nicht unter Windows!" CompilerCase #PB_OS_Linux CompilerError "Dieser Code läuft nicht unter Linux!" CompilerCase #...
- 01.10.2016 21:47
- Forum: Anfänger
- Thema: Schleife - Ereigniss erst wenn Änderung?
- Antworten: 7
- Zugriffe: 2344
Re: Schleife - Ereigniss erst wenn Änderung?
Diesen:
Code: Alles auswählen
Nb_Monitors = ExamineDesktops()
Repeat
If Nb_Monitors <> ExamineDesktops()
Nb_Monitors = ExamineDesktops()
Debug "You have "+Nb_Monitors+" monitors connected!"
EndIf
Delay(1000)
ForEver