Der Gambas Club

Ich würde dafür SQL benutzen. Wenn jeder Eintrag ein Feld für die 'bestellnummer' und eines für die 'anzahl' hat gehts mit

"SELECT bestellnummer, SUM(anzahl) FROM tabelle_name GROUP BY bestellnummer ORDER BY bestellnummer"

mfg. nibbana

Bei WRITE/READ werden die Daten in einem binären Format geschrieben/gelesen. Etwa so wie sie im Speicher stehen. Im Falle einer Zeichenkette wird zusätzlich noch die Länge vor dem eigentliche Text geschrieben. Daher das komische Zeichen am Anfang. Für richtige Textdatein gibt es deshalb die Befehle ...

Wie wäre es mit einem Makefile? #=== 2 zeilen anpassen === EXECPATH = /usr/local/bin PROGNAME = name_des_programs PROGNAME2 = $(PROGNAME).gambas all: $(PROGNAME2) $(PROGNAME2): gbc2 -ag ./ gba2 rm -r .gambas install: $(PROGNAME2) cp $(PROGNAME2) $(EXECPATH...

Versuch mal die Konfiguration von gambas zu löschen.

rm $HOME/.config/gambas/gambas2.conf

mfg. nibbana

Du schreibst eine Funktion zum Aufbau eines Popup-Menus. Diese wird dann beim Klick mit der rechten Maustaste aufgerufen. ' Popup-Menu erzeugen PUBLIC SUB TrayIcon1_Menu() DIM menus, item AS Menu ' Neues Menu anlegen menus = NEW Menu(ME) menus.Visible = FALSE ' Neuer Eintrag im Menu,...

Hast du Schreib- und Leserechte auf die Datei?

mfg. nibbana

Ich habe mal ein Patch gegen die altuelle SVN-Version geschrieben. --- gb.db.mysql/src/main.c (revision 206) +++ gb.db.mysql/src/main.c (working copy) @@ -352,6 +352,11 @@ case FIELD_TYPE_TIMESTAMP: switch(strlen(data)) { + case 19: + sscanf(data, "%4hu-...

PUBLIC SUB Timer1_Timer() m = 0 WHILE 1 Romulus() 'TextLabel1.Text = t_ TextBox1.Text = t_ 'PRINT t_ IF m = 0 THEN Message.Info("", "") ' warum ist dieser Befehl notwendig??? 'TextLabel1.Text = "" ENDIF WEND INC m END Du läufst hier in der WHILE...

Das Format des Rückgabewertes von Timestamp hatte sich bei mysql mal geändert. Von "19981231235959" nach "1998-12-31 23:59:59". Deshalb interpretiert gambas den Wert falsch.

mfg. nibbana

mfg. nibbana

@SaigonKid Du verwechselst hier die Reihenfolge. Der Vater kennt nicht die Fähigkeiten des Kindes, Er weiß nicht einmal das es eine abgeleitete Klasse gibt. Nur das Kind erbt die Fähigkeiten des Vaters und kennt diese. @rolf Vererbung führt immer nur dazu, das die Kind-Klasse Eigenschaften der Elter...

Versuch mal "PictureBox1.Stretch = TRUE". Dann bleibt aber das Seitenverhältnis nicht mehr konstant.

mfg. nibbana

rs1.count gibt die Anzahl der zurückgegebenen Datensätze an. In deinem Fall einen mit dem Inhalt von "count(*)". Lösung 1: rs1 = cn.Exec("SELECT count(*) FROM kunde") Label1.Text = rs1[0] Lösung 2: rs1 = cn.Exec("SELECT count(*) AS n FROM kunde&qu...

' Gambas class file PRIVATE procstr AS String PUBLIC SUB _new() procstr = "run" END SUB PUBLIC SUB run() PRINT "gerunnt" END SUB PUBLIC SUB CallRUN() '' Hier möchte ich einen call auf die prozedur run über procstr machen '' soetwas wie Me(procstr)...

Mit *.ToolTip legst du nur den Text fest. Zum Einschalten mußt du also den alten Text wieder einsetzen.

Man kann die Tooltips auch global für das ganze Project Ein- und Ausschalten

Application.Tooltip.Enabled = TRUE

mfg. nibbana