Datum erhöhen

Übersicht BlitzBasic BlitzPlus

Neue Antwort erstellen

 

ETsoftware

Betreff: Datum erhöhen

BeitragDi, Dez 26, 2006 18:44
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo,

wie kann ich in BlitzPlus zum Datum, das ich mit CurrentDate$(),
herausgefunden habe, 31(/14) Tage hinzufügen?
Oder kann ich sonst das Datum herausfinden und dann etwas
dazu addieren?

Danke im voraus

Smily

BeitragDi, Dez 26, 2006 20:50
Antworten mit Zitat
Benutzer-Profile anzeigen
auf blitzbase.de findest du den Julianischen zeitrechner. Der müsste dir helfen.
Lesestoff:
gegen Softwarepatente | Netzzensur | brain.exe | Unabhängigkeitserklärung des Internets

"Wir müssen die Rechte der Andersdenkenden selbst dann beachten, wenn sie Idioten oder schädlich sind. Wir müssen aufpassen. Wachsamkeit ist der Preis der Freiheit --- Keine Zensur!"
stummi.org
 

ETsoftware

BeitragMi, Dez 27, 2006 9:36
Antworten mit Zitat
Benutzer-Profile anzeigen
Danke für die Antwort, das wäre genau so etwas wie ich
brauche, nur verstehe ich es nicht.
Könnte man, als Notlösung, die Funktionen kopieren, denn
ich glaube nicht, dass ich soetwas selber hinbekomme.
Wenn ich mir schon die JulianAusDatum-Funktion ansehe...
ETsoftware 2007

BladeRunner

Moderator

BeitragMi, Dez 27, 2006 14:25
Antworten mit Zitat
Benutzer-Profile anzeigen
Wofür brauchst du das denn - vielleicht ist ja ein vereinfachter Workaround möglich.
Zu Diensten, Bürger.
Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3
Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64
B3D BMax MaxGUI

Stolzer Gewinner des BAC#48, #52 & #92
 

ETsoftware

BeitragMi, Dez 27, 2006 16:06
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich schreibe eine Art Programm für eine Biblio-
thek, bei dem man das Datum eingeben
muss (oder über Button direkt das heutige Datum,
in eine textarea), und dann über einen Button wird
das Datum um einen Monat(Buch/31 Tage) oder 2 Wochen
(Kassette/14 Tage) erhöht/verlängert.
Wenn's jemandem hilft, kann ich den Quellcode hoch-
laden!
ETsoftware 2007

BladeRunner

Moderator

BeitragMi, Dez 27, 2006 16:14
Antworten mit Zitat
Benutzer-Profile anzeigen
Da wirst du um den julianischen Kalender nicht rumkommen.
Zu Diensten, Bürger.
Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3
Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64
B3D BMax MaxGUI

Stolzer Gewinner des BAC#48, #52 & #92
 

$tankY

BeitragMi, Dez 27, 2006 23:31
Antworten mit Zitat
Benutzer-Profile anzeigen
-Datum splitten
-dann zum Tag 14 / 31 Tage hinzufügen
-und mit folgendem Code (von BlitzBase.de) auf Richtigkeit prüfen:
Code: [AUSKLAPPEN]

;---------------------------------------------------------------------
;Ermittelt die max. Anzahl der Tage in einem Monat
;
;EINGABE: monat=1-12 , jahr=1583-4712
;AUSGABE: max. Anzahl der Tage (0=Fehler)
;---------------------------------------------------------------------
Function TageImMonat(monat,jahr)
  If jahr<1583 Or jahr>4712 Then Return
  If monat<1 Or monat>12 Then Return
  If monat=1 Or monat=3 Or monat=5 Or monat=7 Or monat=8 Or monat=10 Or monat=12 Then Return 31
  If monat=4 Or monat=6 Or monat=9 Or monat=11 Then Return 30
  If monat=2 Then
    tage=28
    If (jahr Mod 4)=0 Then tage=29
    If (jahr Mod 100)=0 Then tage=28
    If (jahr Mod 400)=0 Then tage=29
    Return tage
  EndIf
End Function

-eventuell anpassen

Wo ist das Problem?
 

ETsoftware

BeitragFr, Dez 29, 2006 9:32
Antworten mit Zitat
Benutzer-Profile anzeigen
Danke $tankY, so habe ich es irgendwie hinbekommen.
Jetzt habe ich aber eine andere Frage, ich möchte mehr-
mals die gleichen Buttons haben (kein Problem), aber wie
mache ich Schalter mit Symbolen. Symbolliste wäre glaub
ich nicht ideal.
ETsoftware 2007
 

$tankY

BeitragFr, Dez 29, 2006 14:57
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich schätze, in BlitzPlus gibt es leider keine Buttons mit Symbolen (zumindest weiß ich nicht, wie man das hinbekommt), deshalb könntest du höchstens die Buttons mit Canvas faken.

Neue Antwort erstellen


Übersicht BlitzBasic BlitzPlus

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group