windowed Screen auf einem Gadget

Anfängerfragen zum Programmieren mit PureBasic.
smateja
Beiträge: 250
Registriert: 25.11.2004 19:51
Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS

windowed Screen auf einem Gadget

Beitrag von smateja »

Hallo zusammen,

gibt es die Möglichkeit einen windowed screen in ein Gadget zu verpacken welches etwas kleiner ist, sodass ich das ganze scrollen kann - toll wäre es wenn das ganze dann noch auf einem panelgadget plaziert würde.

Jemand hier schon mal was experimentiert oder nen denkansatz für mich !?
PB 4.6 / 32 Bit / 64 Bit
Benutzeravatar
STARGÅTE
Kommando SG1
Beiträge: 7031
Registriert: 01.11.2005 13:34
Wohnort: Glienicke
Kontaktdaten:

Beitrag von STARGÅTE »

so hier:

Code: Alles auswählen

InitSprite()
OpenWindow(0, 0, 0, 800, 600, "Fenster", #PB_Window_SystemMenu|#PB_Window_ScreenCentered)
 CreateGadgetList(WindowID(0))
  PanelGadget(1, 10, 10, 780, 580)
   AddGadgetItem(1, 0, "WindowedScreen")
    ScrollAreaGadget(2, 5, 5, 770, 550, 1000, 1000, 100) 
   AddGadgetItem(1, 1, "Leer")

 OpenWindowedScreen(GadgetID(2), 0, 0, 1000, 1000, 0, 0, 0)

Repeat
 
 Repeat
 
  Event = WaitWindowEvent(10)
  Select Event 
   Case #PB_Event_CloseWindow
    End 
  EndSelect
 
 Until Event = 0
  
 FlipBuffers() 
 ClearScreen(RGB(0, 100, 0))
 
ForEver
den WindowedScreen einfach in ein geeignetes Gadget packen und statt WindowID() die GadgetID() nutzen ...
PB 6.01 ― Win 10, 21H2 ― Ryzen 9 3900X, 32 GB ― NVIDIA GeForce RTX 3080 ― Vivaldi 6.0 ― www.unionbytes.de
Aktuelles Projekt: Lizard - Skriptsprache für symbolische Berechnungen und mehr
smateja
Beiträge: 250
Registriert: 25.11.2004 19:51
Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS

re:

Beitrag von smateja »

lol - ja geil - 1A und genau so

vielmals merci gelle
PB 4.6 / 32 Bit / 64 Bit
Benutzeravatar
kswb73
Beiträge: 319
Registriert: 04.02.2008 16:51
Kontaktdaten:

Re: windowed Screen auf einem Gadget

Beitrag von kswb73 »

smateja hat geschrieben:Hallo zusammen,

gibt es die Möglichkeit einen windowed screen in ein Gadget zu verpacken welches etwas kleiner ist, sodass ich das ganze scrollen kann - toll wäre es wenn das ganze dann noch auf einem panelgadget plaziert würde.

Jemand hier schon mal was experimentiert oder nen denkansatz für mich !?
Ich hab mal versucht das Scrollen einzubauen. In ein Panalgadget hab ich's leider nicht geschaft, dafür mit Scrollbars.

Code: Alles auswählen

InitSprite()
OpenWindow(0, 0, 0, 520, 520, "Fenster", #PB_Window_SystemMenu|#PB_Window_ScreenCentered)
CreateGadgetList(WindowID(0))
  ScrollBarGadget(0,500,0,20,500,0,500,100,#PB_ScrollBar_Vertical)
  ScrollBarGadget(1,0,500,500,20,0,500,100)
OpenWindowedScreen(WindowID(0),0,0,500,500,0,0,0)
Repeat
  Repeat
  WEvent=WindowEvent()
    Select WEvent
      Case #PB_Event_CloseWindow
      End
    EndSelect
  Until WEvent=0

viewY=GetGadgetState(0)*500/(500-GetGadgetAttribute(1,#PB_ScrollBar_PageLength))
viewX=GetGadgetState(1)*500/(500-GetGadgetAttribute(1,#PB_ScrollBar_PageLength))

  If IsScreenActive()
  ClearScreen(RGB(0,255,0))
  
  StartDrawing(ScreenOutput())
  Circle(500-viewX,500-viewY,40,RGB(0,0,255))
  DrawText(10,10,Str(viewX)+"|+"+Str(viewY))
  StopDrawing()
  
  EndIf
FlipBuffers()
ForEver
Windows XP: PB 4.31, PB 4.4, PB 4.51
Open Suse 11.2: PB 4.4
smateja
Beiträge: 250
Registriert: 25.11.2004 19:51
Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS

re:

Beitrag von smateja »

mmhm ist ein wenig getrickst, denn du änderst ja quasi dann nicht den viewport sondern du verschiebs sogesehen ja den kreis.

Experementiere auch gerade herum.

Versuch:

Überdimensionalen Screen in einem Scrollbargadged zu Scrollen - bislang leider noch ohne ausreichendem Ergebnis. Mir persönlich würde wie oben schon erwähnt ein vertikales Scrollen reichen.

Merci an alle die sich hier beteiligen möchten.
PB 4.6 / 32 Bit / 64 Bit
Benutzeravatar
Fluid Byte
Beiträge: 3110
Registriert: 27.09.2006 22:06
Wohnort: Berlin, Mitte

Beitrag von Fluid Byte »

Bevor hier weiter rumgrickelt wird würde ich gern wissen um was genau es sich handelt. Wird das ein Spiel? Map-Editor? 3D Anwendung?
Windows 10 Pro, 64-Bit / Outtakes | Derek
smateja
Beiträge: 250
Registriert: 25.11.2004 19:51
Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS

re:

Beitrag von smateja »

scrollbarer Kalender für meherer Zimmer :)

Zimmerplan für eine kleine Hotelsoftware - pro Zeile ein Zimmer - X - Achse definiert dann quasi die Zeitachse der Termine.
PB 4.6 / 32 Bit / 64 Bit
Benutzeravatar
Fluid Byte
Beiträge: 3110
Registriert: 27.09.2006 22:06
Wohnort: Berlin, Mitte

Beitrag von Fluid Byte »

Und was hat dich dann gebissen das du denkst stinknormale Verwaltungssoftware mit einem Screen zu programmieren?
Windows 10 Pro, 64-Bit / Outtakes | Derek
smateja
Beiträge: 250
Registriert: 25.11.2004 19:51
Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS

re:

Beitrag von smateja »

Anzeige von vielen terminen + Zimmern zeigte in der Praxis ein tolles grafisches Laag - deshalb der griff zum screen

selbst wenn ich an mein auto n riesen würstchen oben drauf bauen mag - so ist doch wurst warum - fakt ist ich mag es machen oder?! - NARF
PB 4.6 / 32 Bit / 64 Bit
smateja
Beiträge: 250
Registriert: 25.11.2004 19:51
Computerausstattung: Alienware Aurora / Intel Core i7 CPU @ 2.8 GHz / 64 Bit OS

Nachtrag:

Beitrag von smateja »

Ich hab vergessen zu sagen, dass ich es dann grafisch hübscher mit tollen effekten machen kann ;) - das sollte Grund genug sein oder?
PB 4.6 / 32 Bit / 64 Bit
Antworten