Supportnet / Forum / Anwendungen(Java,C++...)
Liebe Programmierer bitte helft mir, dringend C++ !
Frage
Hallo Leute es ist sehr wichtig, es geht um meine Zukunft(Leben) !
Ich muss am Montag(17.02.03) eine Dokumentation zur folgenden Quelltext schreiben, wenn nicht werde ich nicht versetzt und würde mein Leben ruinieren!
Bitte erklärt mir den folgenden C++ Quelltext, was die einzelnen Zeilen bedeuten...danke !
void __fastcall TBiorythmus::DatumFilter(String Buffer)
{
TDate geburtsdatum = Buffer;
DecodeDate(geburtsdatum, geburtsjahr, geburtsmonat, geburtstag);
DecodeDate(Date(), yearnow, monthnow, daynow);
FunktionDay = geburtstag;
FunktionMonth = geburtsmonat;
FunktionYear = geburtsjahr;
}
//---------------------------------------------------------------------------
void __fastcall TBiorythmus::ZeitFilter(String Buffer)
{
TTime geburtszeit = Buffer;
DecodeTime(geburtszeit,geburtsstunde,geburtsminute, geburtssekunde,0);
DecodeTime(Time(),hournow, minutenow, secondnow, 0);
}
//---------------------------------------------------------------------------
void __fastcall TBiorythmus::Timer1Timer(TObject *Sender)
{
GelebteTage();
LivedHourMinuteSecond();
}
//---------------------------------------------------------------------------
void __fastcall TBiorythmus::GelebteTage()
{
// Das aktuelle Datum wird gesplittet
int fgeburtsdatum = StrToDate(editDatum->Text);
int fdatenow = StrToDate(Date());
if (fgeburtsdatum < 0)
{ ShowMessage("Bitte geben Sie ein Wert größer als 1900 ein !");
Abort();
}
tagezaehlen = fdatenow - fgeburtsdatum;
Label3->Caption = IntToStr(tagezaehlen);
Label1->Caption = yearnow - geburtsjahr;
if((monthnow == geburtsmonat && daynow<geburtstag) || (monthnow<geburtsmonat))
{
Label1->Caption = Label1->Caption -1;
}
}
//---------------------------------------------------------------------------
void __fastcall TBiorythmus::LivedHourMinuteSecond()
{
ZeitFilter(TimeToStr(editZeit->Time));
int Sekunden;
int ZaehleJetztSekunden = (((hournow * 60)+ minutenow) *60)+ secondnow; //Tageszeit in Sekunden
int ZaehleGeburtsSekunden = (((geburtsstunde * 60)+ geburtsminute) *60)+ geburtssekunde;
if (ZaehleJetztSekunden >= ZaehleGeburtsSekunden)
{ Sekunden = ZaehleJetztSekunden - ZaehleGeburtsSekunden; }
else {
Sekunden = 3600+(ZaehleJetztSekunden - ZaehleGeburtsSekunden);
tagezaehlen--;
}
Sekunden += tagezaehlen * 24 * 3600;
int Minuten = floor(Sekunden / 60);
int Stunden = floor(Minuten /60);
Label2->Caption = IntToStr(round(tagezaehlen/30.475));
Label4->Caption = Stunden;
Label5->Caption = Minuten;
Label6->Caption = Sekunden;
}
//---------------------------------------------------------------------------
void __fastcall TBiorythmus::bBiorythmusClick(TObject *Sender)
{
DatumFilter(editDatum->Text);
Timer1->Enabled = true;
GelebteTage();
LivedHourMinuteSecond();
sternzeichen(geburtstag,geburtsmonat);
Label14->Caption = wsternzeichen;
// Wochentag
Label18->Caption = FormatDateTime("dddd", editDatum->Text);
Koordinate->Show();
Timer1->Enabled = true;
Label1->Enabled = true;
Label2->Enabled = true;
Label3->Enabled = true;
Label4->Enabled = true;
Label5->Enabled = true;
Label6->Enabled = true;
Label18->Enabled = true;
Label14->Enabled = true;
}
Antwort 1 von antaressolution
schwer zu erklären wenn man deine kenntnisse nicht kennt,
für einen dem der code NICHTS sagt würde die beschreibung zig a4 seiten umfassen.........
für einen dem der code NICHTS sagt würde die beschreibung zig a4 seiten umfassen.........
Antwort 2 von snale
haaah ?
Hallo Leute es ist sehr wichtig, es geht um meine Zukunft(Leben) !
Ich muss am Montag(17.02.03) eine Dokumentation zur folgenden Quelltext
morgen ist doch schon 3 märz ? oder ?
oder hab ich wieder übersehen ?
mfg
snale
Hallo Leute es ist sehr wichtig, es geht um meine Zukunft(Leben) !
Ich muss am Montag(17.02.03) eine Dokumentation zur folgenden Quelltext
morgen ist doch schon 3 märz ? oder ?
oder hab ich wieder übersehen ?
mfg
snale
Ich möchte kostenlos eine Frage an die Mitglieder stellen:
Ähnliche Themen:
- Wie kann ich yahoo aus meinem Proramm entfernen???????
- Kann ich bei SQL am Encde einer Spalte die Werte der Spalte summieren lassen?
- Batch Anzahl Ordner ermitteln XP
- brauche ganz dringend hilfe bei azureus
- brauche ganz dringend de norton commander 4.0 für dos! oder auch nur die Dateien NC Main.exe;NC Edit.exe;NC Zip.exe.vom Nortoncommander 4.0

