Zahlen-Spiel...[ReKoRd B!tTe]-Wetten Dass? (7. Edition)

Status
Not open for further replies.
scheiss gespamme ;)395

john wood wieder hier! tztz, ich dachte du bist zu cool zum spammen :nono
 
Stefros:

wird häufig mit Gott verwechselt......Dabei isser Chuck Norris :o
 
Der Neue

Nun sollen - glaubt man der Quelle von MusicRadar - die Red Hot Chili Peppers bereits mit einem Ersatz liebäugeln und auch schon ein paar Monate gemeinsam mit dem Gitarristen Josh Klinghoffer spielen.

:wub

josh? das ist dann natürlich was anderes ...
 
Also Lunak wo bleibt dein Wunsch ??

Bin erst bei Seite 12 von 130
Leaf_Cat_emoticon_noob_GAIARO_by_kaniachocolate.gif
 
Code:
//---------------------------------------------------------------------------

#include <vcl.h>
#include <time.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "trayicon"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
        SYSTEMTIME time;
        GetLocalTime(&time);
        if(time.wSecond<10)
        {       StatusBar1->SimpleText = "Aktuelle Uhrzeit: "+IntToStr(time.wHour)+":"+IntToStr(time.wMinute)+":0"+IntToStr(time.wSecond);
                if(time.wMinute<10)
                {
                        StatusBar1->SimpleText = "Aktuelle Uhrzeit: "+IntToStr(time.wHour)+":0"+IntToStr(time.wMinute)+":0"+IntToStr(time.wSecond);
                        if(time.wHour<10)
                                StatusBar1->SimpleText = "Aktuelle Uhrzeit: 0"+IntToStr(time.wHour)+":0"+IntToStr(time.wMinute)+":0"+IntToStr(time.wSecond);
                }

        }
        else if(time.wMinute <10)
        {
                StatusBar1->SimpleText = "Aktuelle Uhrzeit: "+IntToStr(time.wHour)+":0"+IntToStr(time.wMinute)+":"+IntToStr(time.wSecond);
                if(time.wHour<10)
                        StatusBar1->SimpleText = "Aktuelle Uhrzeit: 0"+IntToStr(time.wHour)+":0"+IntToStr(time.wMinute)+":"+IntToStr(time.wSecond);
        }
        else if(time.wHour<10)
                StatusBar1->SimpleText = "Aktuelle Uhrzeit: 0"+IntToStr(time.wHour)+":"+IntToStr(time.wMinute)+":"+IntToStr(time.wSecond);
        else
                StatusBar1->SimpleText = "Aktuelle Uhrzeit: "+IntToStr(time.wHour)+":"+IntToStr(time.wMinute)+":"+IntToStr(time.wSecond);
        if(oke==true)
        {
                if(hour==time.wHour&&minu==time.wMinute)
                        {
                                Timer1->Enabled = false;
                                system("shutdown -f -s -t 0");
                        }
        }

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        try
        {
                hour=StrToInt(Edit1->Text);
                minu=StrToInt(Edit2->Text);
        }
        catch(...)
        {
                ShowMessage("             Keine Zeit ausgwählt! \n Das Programm wird jetzt beendet");
                
                exit(0);
        }
        if(hour>23||minu>59||seco>59)
                ShowMessage("Diese Zeit ist ungültig");
        else
        {
                oke=true;
                TrayIcon1->Visible = true;
        if(seco<10)
        {       TrayIcon1->Hint = "Vorrausichtliches Herunterfahren um: "+IntToStr(hour)+":"+IntToStr(minu)+":0"+IntToStr(seco);
                if(minu<10)
                {
                        TrayIcon1->Hint = "Vorrausichtliches Herunterfahren um: "+IntToStr(hour)+":0"+IntToStr(minu)+":0"+IntToStr(seco);
                        if(hour<10)
                                TrayIcon1->Hint = "Vorrausichtliches Herunterfahren um: 0"+IntToStr(hour)+":0"+IntToStr(minu)+":0"+IntToStr(seco);
                }

        }
        else if(minu <10)
        {
                TrayIcon1->Hint = "Vorrausichtliches Herunterfahren um: "+IntToStr(hour)+":0"+IntToStr(minu)+":"+IntToStr(seco);
                if(hour<10)
                        TrayIcon1->Hint = "Vorrausichtliches Herunterfahren um: 0"+IntToStr(hour)+":0"+IntToStr(minu)+":"+IntToStr(seco);
        }
        else if(hour<10)
                TrayIcon1->Hint = "Vorrausichtliches Herunterfahren um: 0"+IntToStr(hour)+":"+IntToStr(minu)+":"+IntToStr(seco);
        else
                TrayIcon1->Hint = "Vorrausichtliches Herunterfahren um: "+IntToStr(hour)+":"+IntToStr(minu)+":"+IntToStr(seco);
                Form1->Hide();

        }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
        if(Key==13)
                Edit2->SetFocus();
                        
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Edit2KeyPress(TObject *Sender, char &Key)
{
        if(Key==13)
                Button1->Click();
}
//---------------------------------------------------------------------------


void __fastcall TForm1::Abbrechen1Click(TObject *Sender)
{
        exit(0);
}
//---------------------------------------------------------------------------
 
Status
Not open for further replies.
Back
Top