Tabellen in Fenstern

[Oli]

Hallo zusammen!

Wie kann ich solche Tabellen in einem Fenster darstellem?
Irgendwie komme ich mit den Fenstern nicht klar.

Vielen Dank für Eure Hilfe
Oli

Dim a$(3)
Dim punkte$(3)

a$(1)="Peter"
a$(2)="Klaus"
a$(3)="Heiner"

punkte$(1)="7"
punkte$(2)="5"
Punkte$(3)="2"

OpenConsole()

For i = 1 To 3

PrintN(Str(i) + ". " +a$(i) + " "+ punkte$(i))

Next
Input()

End

[Kiffi]

ist relativ einfach (PB3.94-Code):

Code: Alles auswählen

Enumeration
  #frmTabelle
  #Tabelle
EndEnumeration

OpenWindow(#frmTabelle, 0, 0, 200, 100, #PB_Window_ScreenCentered | #PB_Window_SystemMenu, "Tabelle")
CreateGadgetList(WindowID(#frmTabelle))
ListIconGadget(#Tabelle, 5, 5, 190, 90, "Platz", 40)
AddGadgetColumn(#Tabelle, 1, "Name", 70)
AddGadgetColumn(#Tabelle, 2, "Punkte", 70)

Dim a$(3)
Dim punkte$(3)

a$(1)="Peter"
a$(2)="Klaus"
a$(3)="Heiner"

punkte$(1)="7"
punkte$(2)="5"
punkte$(3)="2"

For i = 1 To 3
  AddGadgetItem(#Tabelle, -1, Str(i) + "." + Chr(10) + a$(i) + Chr(10) + punkte$(i))
Next

Repeat
  
Until WaitWindowEvent()=#PB_Event_CloseWindow

Schau Dir das Beispiel mal in Ruhe an. Wenn Du nicht weisst, was die
einzelnen Befehle machen, dann positioniere den Cursor darauf und
drücke <F1>. Dann wird die entsprechende Hilfe dazu angezeigt.

Grüße ... Kiffi

[Oli]

Hallo Kiffi,

vielen Dank für deine Antwort - auch wenn ich nicht wirklich alles verstehe ....

Irgendwie werde ich das Gefühl nicht los, dass der Umgang mit Fenstern wesentlich komplizierter ist als der mit einer Darstellung auf Console (was ich bisher immer gemacht habe) ...

Na ja, werd ich wohl wieder viel lernen müssen ...

Vielen Dank nochmal
Oli

[Kiffi]

> Irgendwie werde ich das Gefühl nicht los, dass der Umgang mit Fenstern
> wesentlich komplizierter ist als der mit einer Darstellung auf Console (was
> ich bisher immer gemacht habe) ...

dafür hast Du im Vergleich zur Console wesentlich mehr Möglichkeiten, was
die Anzeige von Daten und die Bedienung des Programmes anbelangt.

Und sooo kompliziert ist es nun auch nicht. Es gibt halt neue Befehle, die man
jedoch schnell erlernt und ein paar Stolpersteine, auf die man achten muss.
Aber keine Panik! Im Ernstfall sind wir für Dich da

> Na ja, werd ich wohl wieder viel lernen müssen ...

tu das. Es lohnt sich!

Grüße ... Kiffi

[OptimusPrime]

tu das. Es lohnt sich! Smile

Oh ja, das kann ich bestätigen.

Nach meinem ersten rahmenlosen, transparentem, verschiebarem, kreisförmigen, always on Top Or always on Back - erstellten Fenster mit Background-Images für individuelles Design und Menuführung waren alle Unklarheiten beseitigt .

Es lohnt sich wirklich - und Beispielcodes für alles findet man im Forum oder
in dem Code-Archiv.

Mfg