Fenster Gestalten

[Kaeru Gaman]

das ist die crux mit LIBs

@scholly

warum hast du nicht gleich in deinem ertsen posting geschrieben, dass dort eine LIB benutzt wird?

und einfach nur PBOSL einem Anfänger an den Kopf zu werfen, ist auch nicht die feine englische.

Wenn Ihr LIB Nutzer wollt, dass die starke Opposition gegen LIBs
friedlicher wird, da gewöhnt euch auch an, eure LIB Benutzungen
in Codes anständig zu deklarieren und zu kommentieren!

[Fluid Byte]

+1

[scholly]

Danke für die Motivation zu helfen.
Jetzt habe ich erkannt, daß Nehmen seliger ist denn Geben.

Und Eure Beispiele sind auch suuuuper und helfen Zim total gut.
Klasse.
Echte Vorbilder.

[Fluid Byte]

Wer hat dir denn in den Champagner gepinkelt?

[scholly]

Du und KG.

[Kaeru Gaman]

sorry, scholly, dass es nun ausgerechnet dich "erwischt" hat,
aber anscheinend ist dir die seit jahren schwehlende Diskussion um LIBs entgangen.

zusätzliche LIBs sind kein nativer Bestandteil von PB.
jeder der LIBs verwendet, muss wissen, dass er das tut,
also kann er auch darüber informieren,
dass sein Code Befehle aus einer LIB verwendet,
wenn er diesen im Forum Postet.

Bei Zim hat die Verwendung dieser LIB zu Verwirrung geführt:

Mein PB kann mit

Code: Alles auswählen

SkinWin( hWnd, hBitmap,0,0 )

nix anfangen
Muss ich da noch was installieren????

daraufhin antwortest du

PBOSL

womit du bei einem Einsteiger die Kenntnis dieser Abkürzung voraussetzt.

...dabei kann er die genauso als eine Abkürzung wie "RTFM" interpretieren...

dort hättest du dann einfach ausführlicher erklären können, was die BOSL ist,
wenn du schon im ersten Posting den eigentlich selbstverständlichen Hinweis auf die LIB vergessen hast.


ich bin früher ein strikter Gegner von LIBs gewesen,
seit ich einmal erlebt habe, wie ein kurzer, absolut fehlerfreier code
auf einem PB mit zwei zusätzlichen LIBs Fehler produziert hat.


seit der PBOSL, die eine sehr gute Arbeit darstellt,
bin ich LIBs gegenüber wesentlich liberaler eingestellt,
erwarte allerdings, wie ich finde mit Recht,
dass verwender von LIBs beim posten von Codes der LIBs anspricht,
explicit darauf hinweisen.


ich hoffe, diese ausführliche Erklärung hat die Wogen etwas geglättet.

[scholly]

Wat steht denn wohl in meinem ersten Code als erste Zeile?

Ach, schau einer Guck.

Und wenn ich dann auf Nachfrage nur noch PBOSL antworte, ist das IMHO ausreichend.

Wenn in einem Code als erstes drinsteht

; auf die schnelle per SkinWin aus der PBOSL gelöst

und er tuts bei mir nicht, dann ist es doch wohl logisch und FMPOV auch zumutbar, die Suchfunktion des Boards zu benutzen.

Du hast mich allerdings innerhalb kürzester Zeit zum 2. mal "erwischt".
DAS hat mich primär zu dem fußaufstampfenden Sarkasmus geführt, weil ich mich unschuldig fühle.

Und als unser als API-Wizard geschätzter FB dann noch einen drauf setzten mußte, lief das Faß über.

Vor allen Dingen, weil ich Euch beide so einschätze, daß ihr bessere als meine Lösungen beisteuern könntet.

Aber nein - Schimpf und Schande: scholly, ab in die Ecke.

Nuja, vielleicht hilft der Tapentenwechsel bei Deinem Onkel ja, einen relaxteren KG wiederzubekommen

Nimm ein Flüssiges Bit mit

[Fluid Byte]

Siehste, alles wieder schicki lacki. Außerdem, morgen ist endlich Freitag.

Man diese Woche war zum kotzen ...

[Kaeru Gaman]

Wat steht denn wohl in meinem ersten Code als erste Zeile?

shit ich hab doch 3x hingesehen.. war ich wohl von Blindheit geschlagen.

Nuja, vielleicht hilft der Tapentenwechsel bei Deinem Onkel ja, einen relaxteren KG wiederzubekommen

das will ich schwer hoffen. ich bin z.Zt. einigermaßen im *****
...hab sogar seit tagen ein nervös zuckendes Augenlid.. hatte ich noch nie...

Man diese Woche war zum kotzen ...

Amen

[scholly]

Tja, also da wären dann noch zwei niedliche Fenster:

Code: Alles auswählen

hWnd = OpenWindow(0, 100, 200, 300, 300, "Elliptisches Fenster",#PB_Window_BorderLess|#PB_Window_ScreenCentered)
HideWindow(0, 1)

hBitmap = CreateImage(1,300,300)

StartDrawing(ImageOutput(1))
  Ellipse(150, 150, 140, 100, #Red) 
  Ellipse(150, 150, 138,  98, RGB(244,244,244)) 
StopDrawing()

SkinWin( hWnd, hBitmap,0,0 )

CreateGadgetList(WindowID(0))
ButtonGadget(1,140,140,20,20,"X")
HideWindow(0, 0)
Repeat

  Select WaitWindowEvent()
    Case #PB_Event_Gadget
      Select EventGadget()
        Case 1
          quit = #True
      EndSelect   
  EndSelect
 
Until Quit = #True

CloseWindow(0)
End

und

Code: Alles auswählen

hWnd = OpenWindow(0, 100, 200, 300, 300, "Stern Fenster",#PB_Window_BorderLess|#PB_Window_ScreenCentered)
HideWindow(0, 1)

hBitmap = CreateImage(1,300,300)

StartDrawing(ImageOutput(1))
  LineXY(150,   2, 298, 200, #Red)
  LineXY(298, 200,   2, 200, #Red) 
  LineXY(  2, 200, 150,   2, #Red)
   
  LineXY(150, 298, 298, 100, #Red) 
  LineXY(298, 100,   2, 100, #Red) 
  LineXY(  2, 100, 150, 298, #Red) 
  
  FillArea(150,   5, #Red, RGB(244,244,244))
  FillArea(150, 150, #Red, RGB(244,244,244))
  FillArea(150, 250, #Red, RGB(244,244,244))
  
  FillArea( 20, 120, #Red, RGB(244,244,244))
  FillArea( 20, 180, #Red, RGB(244,244,244))
  FillArea(280, 120, #Red, RGB(244,244,244))
  FillArea(280, 180, #Red, RGB(244,244,244))
  
StopDrawing()

SkinWin( hWnd, hBitmap,0,0 )

CreateGadgetList(WindowID(0))
ButtonGadget(1,140,140,20,20,"X")
HideWindow(0, 0)
Repeat

  Select WaitWindowEvent()
    Case #PB_Event_Gadget
      Select EventGadget()
        Case 1
          quit = #True
      EndSelect   
  EndSelect
 
Until Quit = #True

CloseWindow(0)
End

Sollte reichen, Daß Du mit eigenen Ideen weitermachen kannst