AddPanelItem()

[pede]

Hallo

Kann man im Visual Designer ein PanelItem adden, also nicht programmieren?

ich such schon ne ganze Weile und hab noch nix gefunden...

lg

[mk-soft]

Versuch es mal mit den dicken fetten plus Button im ersten Fenster rechts nehen den Mauszeiger Button.

FF

[PureLust]

Oder benutze gleich Gnozals PureFORM.

[pede]

aso, wieder was dazugelernt

danke

[pede]

ich werd schon zu dämlich sein, aber wo kann man im VD im ListView, ListIcon, Tree und Comboboxgadget die Einträge hinenschreiben?


langsam wirds mir echt zu blöd zu fragen

[Falko]

Naja, so fortschrittlich ist der VisualDesigner noch nicht, sodass du im fertigen Source
etwas von Hand nachhelfen musst.
Ein Beispiel vom VisualDesigner habe ich ein klein wenig ergänzt.

Die Include und Mainfile habe ich zusammen kopiert und das
IncludeFile() mit Semikolon ausgeklammert.
Zusätzlich habe ich im Mainteil eine For/Nextschleife hinzugefügt
um die Einträge im ListViewGadget zu bekommen.

Code: Alles auswählen

;--------- GeneratedIncludeFile.pb -----------------------------


; PureBasic Visual Designer v3.95 build 1485 (PB4Code)


;- Window Constants
;
Enumeration
  #Window_0
EndEnumeration

;- Gadget Constants
;
Enumeration
  #Listview_0
EndEnumeration


Procedure Open_Window_0()
  If OpenWindow(#Window_0, 220, 0, 600, 300, "New window ( 0 )",  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
    If CreateGadgetList(WindowID(#Window_0))
      ListViewGadget(#Listview_0, 50, 50, 200, 170)

    EndIf
  EndIf
EndProcedure


;----------------- GeneratedMainFile.pb --------------------------


; PureBasic Visual Designer v3.95 build 1485 (PB4Code)

;IncludeFile "GeneratedIncludeFile.pb" ; Dieses habe ich ausgeklammert, da includfile hier oben in Mainfile steht.

Open_Window_0()
For i=1 To 100
   AddGadgetItem(#Listview_0,-1,"Test "+Str(i)); Hier werden z.B. die Items hinzugefügt(Manuell)
Next i


Repeat ; Start of the event loop
  
  Event = WaitWindowEvent() ; This line waits until an event is received from Windows
  
  WindowID = EventWindow() ; The Window where the event is generated, can be used in the gadget procedures
  
  GadgetID = EventGadget() ; Is it a gadget event?
  
  EventType = EventType() ; The event type
  
  ;You can place code here, and use the result as parameters for the procedures
  
  If Event = #PB_Event_Gadget
    
    If GadgetID = #Listview_0
      
    EndIf
    
  EndIf
  
Until Event = #PB_Event_CloseWindow ; End of the event loop

End
;

Zur Strafe ab in die Anfängerecke
Gruß Falko

[pede]

Wie man es im Source selbst macht war mir schon klar, wollt nur wissen wie es und ob es im VD funzt!

trotzdem danke für die Hilfe