Italia
Foro

verbesserungsvorschläge

 

diimool25

KompilierenMarkierenSeparieren
Declare button_ende%, button_löschen%,Rahmen%[10], text%[10],RadionButton%[50], Ende%, Knopf%, time%, i% ,  button_weiter1%, Richtige_antworten% , f% , Richtige% ,  button_geschichte% , button_erde%
Declare button_auswerten1% , button_auswerten2% , button_auswerten3%
Declare komma_zahlen!, preise!
Declare text$
'x = richtig

Proc hauptprogramm_skin

    Knopf% = @MessageBox ("Willst Du das Quiz starten?", "",292)

    if knopf% = 6

    else

        end

    endif

    window 0,0 - %maxx,%maxy
    UseBrush 5,@RGB(30,30 ,255)
    UsePen 2,50,@RGB(0,0,0)
    Rectangle 0,0 - %maxx-20, %maxy-100
    Fill 0, 1000, @RGB(0,0,31)
    button_ende% = @Create("Button",%HWnd,"E N D E", %maxx -180,%maxy - 180,145,50)
    button_löschen% = @Create("Button",%HWnd,"Löschen", %maxx -330,%maxy - 180, 150,50)
    button_weiter1% = @Create("Button",%HWnd,"Allgemein", 50,%maxy - 180, 150,50)
    button_geschichte% = @Create("Button",%HWnd,"Geschichte", 200,%maxy - 180, 150,50)
    button_erde% = @Create("Button",%HWnd,"Erdkunde", 350,%maxy - 180, 150,50)
    button_auswerten1% = @Create("Button",%HWnd,"Auswerten", 90,%maxy - 130, 80,20)
    button_auswerten2% = @Create("Button",%HWnd,"Auswerten", 230,%maxy - 130, 80,20)
    button_auswerten3% = @Create("Button",%HWnd,"Auswerten", 380,%maxy - 130, 80,20)
    Rahmen%[1] = @Create("GroupBox",%HWnd,"",20,10,800,250)
    Rahmen%[2] = @Create("GroupBox",%HWnd,"",20,300,800,250)
    Rahmen%[3] = @Create("GroupBox",%HWnd,"",20,600,800,250)
    Rahmen%[4] = @Create("GroupBox",%HWnd,"",900,10,800,250)
    Rahmen%[5] = @Create("GroupBox",%HWnd,"",900,300,800,250)
    Rahmen%[6] = @Create("GroupBox",%HWnd,"",900,600,800,250)
    RadionButton%[1] = @Create("RadioButton",Rahmen%[1],"",10,75,500,18)
    RadionButton%[2] = @Create("RadioButton",Rahmen%[1],"",10,110,500,18)
    RadionButton%[3] = @Create("RadioButton",Rahmen%[1],"",10,145,500,18)'x
    RadionButton%[4] = @Create("RadioButton",Rahmen%[2],"",10,50,500,18)
    RadionButton%[5] = @Create("RadioButton",Rahmen%[2],"",10,90,500,18)
    RadionButton%[6] = @Create("RadioButton",Rahmen%[2],"",10,130,500,18)'x
    RadionButton%[7] = @Create("RadioButton",Rahmen%[3],"",10,50,500,18)
    RadionButton%[8] = @Create("RadioButton",Rahmen%[3],"",10,90,500,18)'x
    RadionButton%[9] = @Create("RadioButton",Rahmen%[3],"",10,130,500,18)
    RadionButton%[10] = @Create("RadioButton",Rahmen%[4],"",10,50,500,18)'x
    RadionButton%[11] = @Create("RadioButton",Rahmen%[4],"",10,90,500,18)
    RadionButton%[12] = @Create("RadioButton",Rahmen%[4],"",10,130,500,18)
    RadionButton%[13] = @Create("RadioButton",Rahmen%[5],"",10,50,500,18)
    RadionButton%[14] = @Create("RadioButton",Rahmen%[5],"",10,90,500,18)
    RadionButton%[15] = @Create("RadioButton",Rahmen%[5],"",10,130,500,18)
    RadionButton%[16] = @Create("RadioButton",Rahmen%[6],"",10,50,500,18)
    RadionButton%[17] = @Create("RadioButton",Rahmen%[6],"",10,90,500,18)
    RadionButton%[18] = @Create("RadioButton",Rahmen%[6],"",10,130,500,18)

Endproc

proc geschichte

    WhileLoop  18

        EnableWindow RadionButton%[&LOOP], 1
        SetCheck RadionButton%[&LOOP], 0
        EnableWindow Rahmen%[1], 1
        EnableWindow Rahmen%[2], 1
        EnableWindow Rahmen%[3], 1
        EnableWindow Rahmen%[4], 1
        EnableWindow Rahmen%[5], 1
        EnableWindow Rahmen%[6], 1

    EndWhile

    Settext Rahmen%[1] , "1)Wo beschlossen die vier Siegermächte des Zweiten Weltkrieges, Deutschland in vier Besatzungszonen aufzuteilen?"
    Settext Rahmen%[2] , "2)Wann wurde die DDR offiziell gegründet??"
    Settext Rahmen%[3] , "3)Wie kam es zu Ulbrichts berühmtem Satz ''Niemand hat die Absicht, eine Mauer zu bauen''?"
    Settext Rahmen%[4] , "4)Mit welchem Begriff bezeichnete die DDR die Mauer?"
    Settext Rahmen%[5] , "5)Wie viele Menschen flohen 1961 noch kurz vor dem Mauerbau?"
    Settext Rahmen%[6] , "6)Über welche Länge erstreckte sich die Berliner Mauer?"
    Settext RadionButton%[1] , "Auf der Potsdamer Konferenz"
    Settext RadionButton%[2] , "Auf der Casablanca-Konferenz"
    Settext RadionButton%[3] , "Auf der Konferenz von Jalta"'x
    Settext RadionButton%[4] , "7. Oktober 1949"
    Settext RadionButton%[5] , "3. Oktober 1919"
    Settext RadionButton%[6] , "23. Mai 1949"'x
    Settext RadionButton%[7] , "Ulbricht sagte den Satz im Rahmen einer Rede"
    Settext RadionButton%[8] , "Er war die Antwort auf eine Frage in einer Pressekonferenz"'x
    Settext RadionButton%[9] , "Er stammt aus einem Brief an den damaligen Bundeskanzler"
    Settext RadionButton%[10] , "Antifaschistischer Schutzwall"'x
    Settext RadionButton%[11] , "Antiföderalistischer Schutzwall"
    Settext RadionButton%[12] , "Antikapitalistischer Schutzwall"
    Settext RadionButton%[13] , "Unter 100.000"
    Settext RadionButton%[14] , "Mehr als 300.000"
    Settext RadionButton%[15] , "Mehr als 200.000"'x
    Settext RadionButton%[16] , "70 Km"
    Settext RadionButton%[17] , "270 Km"
    Settext RadionButton%[18] , "170Km"'x
    count2

endproc

proc Allgemein

    WhileLoop  18

        EnableWindow RadionButton%[&LOOP], 1
        SetCheck RadionButton%[&LOOP], 0
        EnableWindow Rahmen%[1], 1
        EnableWindow Rahmen%[2], 1
        EnableWindow Rahmen%[3], 1
        EnableWindow Rahmen%[4], 1
        EnableWindow Rahmen%[5], 1
        EnableWindow Rahmen%[6], 1

    EndWhile

    Settext Rahmen%[1] , "1. Zum Aufwärmen: Welches Fitnessangebot findet sich heute in vielen Studios?"
    Settext Rahmen%[2] , "2. Wem wird das Bundesverdienstkreuz bei Amtsantritt verliehen?"
    Settext Rahmen%[3] , "3. Wie viel Kakaobutter ist in etwa 100 g weißer Schokolade enthalten?"
    Settext Rahmen%[4] , "4. Was ist ein ''Undercut''?"
    Settext Rahmen%[5] , "5. In welchem Ort schuf der Geigenbauer Antonio Stradivari seine wertvollen Instrumente?"
    Settext Rahmen%[6] , "6. Was berechnet der Pearl-Index?"
    Settext RadionButton%[1] , "Samba"
    Settext RadionButton%[2] , "Zumba"'x
    Settext RadionButton%[3] , "Sumba"
    Settext RadionButton%[4] , "dem Bundestagspräsidenten"
    Settext RadionButton%[5] , "dem Bundespräsidenten"'x
    Settext RadionButton%[6] , "dem Bundeskanzler"
    Settext RadionButton%[7] , "0 g"
    Settext RadionButton%[8] , "28 g"'x
    Settext RadionButton%[9] , "38 g"
    Settext RadionButton%[10] , "eine Methode des Buchsbaumtrimmens"
    Settext RadionButton%[11] , "ein Haarschnitt"'x
    Settext RadionButton%[12] , "eine Operationsmethode"
    Settext RadionButton%[13] , "Rom"
    Settext RadionButton%[14] , "Cremona"'x
    Settext RadionButton%[15] , "Pisa"
    Settext RadionButton%[16] , "den Wert von Zuchtperlen"
    Settext RadionButton%[17] , "die Sicherheit von Empfängnisverhütungsmethoden"'x
    Settext RadionButton%[18] , "die Lautstärke eines Schlagzeugs"
    count

endproc

proc erdkunde

    WhileLoop  18

        EnableWindow RadionButton%[&LOOP], 1
        SetCheck RadionButton%[&LOOP], 0
        EnableWindow Rahmen%[1], 1
        EnableWindow Rahmen%[2], 1
        EnableWindow Rahmen%[3], 1
        EnableWindow Rahmen%[4], 1
        EnableWindow Rahmen%[5], 1
        EnableWindow Rahmen%[6], 1

    EndWhile

    Settext Rahmen%[1] , "1) Welche US-amerikanische Stadt trägt den Beinamen ''Big Apple'' ?"
    Settext Rahmen%[2] , "2)Wie nennt man diejenige der Gezeiten, bei der das Wasser sich zurückzieht?"
    Settext Rahmen%[3] , "3) An welchem Fluss liegt München?"
    Settext Rahmen%[4] , "4)Wie nennt man den verzweigten Mündungsbereich eines Flusses??"
    Settext Rahmen%[5] , "5)Wie heißt die Insel Ceylon heute?"
    Settext Rahmen%[6] , "6) Wie heißt der Stoff, der flüssig aus einem Vulkan tritt?"
    Settext RadionButton%[1] , "Dallas "
    Settext RadionButton%[2] , "New York "'x
    Settext RadionButton%[3] , "Los Angeles "
    Settext RadionButton%[4] , "Elba "
    Settext RadionButton%[5] , "Erle "
    Settext RadionButton%[6] , "Ebbe"'x
    Settext RadionButton%[7] , "Neckar"
    Settext RadionButton%[8] , "Pegnitz "
    Settext RadionButton%[9] , "Isar "'x
    Settext RadionButton%[10] , "Einfluss "
    Settext RadionButton%[11] , "Einströmgebiet "
    Settext RadionButton%[12] , "Delta "'x
    Settext RadionButton%[13] , "Goa "
    Settext RadionButton%[14] , "Srinagar "
    Settext RadionButton%[15] , "Sri Lanka "'x
    Settext RadionButton%[16] , "Lama "
    Settext RadionButton%[17] , "Lava "'x
    Settext RadionButton%[18] , "Lada"
    count3

endproc

proc count

    Set("Decimals",1)
    var time%=&GetTickCount
    var text&=Create("Text",%hwnd,"", 850,%maxy - 180,120,20)

    while @xor(&GetTickCount-time%<60000, @getfocus(button_auswerten1%))

        Case &GetTickCount-time%<60000 : Settext text&,Str$((60000-(&GetTickCount-time%))/1000) + "  Sekunden"

    Endwhile

    EnableWindow Rahmen%[1], 0
    EnableWindow Rahmen%[2], 0
    EnableWindow Rahmen%[3], 0
    EnableWindow Rahmen%[4], 0
    EnableWindow Rahmen%[5], 0
    EnableWindow Rahmen%[6], 0
    auswerten1

Endproc

proc count2

    Set("Decimals",1)
    var time%=&GetTickCount
    var text&=Create("Text",%hwnd,"", 850,%maxy - 180,120,20)

    while @xor(&GetTickCount-time%<60000, @getfocus(button_auswerten2%))

        Case &GetTickCount-time%<60000 : Settext text&,Str$((60000-(&GetTickCount-time%))/1000) + "  Sekunden"

    Endwhile

    EnableWindow Rahmen%[1], 0
    EnableWindow Rahmen%[2], 0
    EnableWindow Rahmen%[3], 0
    EnableWindow Rahmen%[4], 0
    EnableWindow Rahmen%[5], 0
    EnableWindow Rahmen%[6], 0
    auswerten2

Endproc

proc count3

    Set("Decimals",1)
    var time%=&GetTickCount
    var text&=Create("Text",%hwnd,"", 850,%maxy - 180,120,20)

    while @xor(&GetTickCount-time%<60000, @getfocus(button_auswerten3%))

        Case &GetTickCount-time%<60000 : Settext text&,Str$((60000-(&GetTickCount-time%))/1000) + "  Sekunden"

    Endwhile

    EnableWindow Rahmen%[1], 0
    EnableWindow Rahmen%[2], 0
    EnableWindow Rahmen%[3], 0
    EnableWindow Rahmen%[4], 0
    EnableWindow Rahmen%[5], 0
    EnableWindow Rahmen%[6], 0
    auswerten3

Endproc

proc auswerten1

    If GetCheck(RadionButton%[2]) = 1

        EnableWindow RadionButton%[1], 0
        EnableWindow RadionButton%[3], 0

    EndIf

    If GetCheck(RadionButton%[5]) = 1

        EnableWindow RadionButton%[4], 0
        EnableWindow RadionButton%[6], 0

    EndIf

    If GetCheck(RadionButton%[8]) = 1

        EnableWindow RadionButton%[7], 0
        EnableWindow RadionButton%[9], 0

    EndIf

    If GetCheck(RadionButton%[11]) = 1

        EnableWindow RadionButton%[10], 0
        EnableWindow RadionButton%[12], 0

    EndIf

    If GetCheck(RadionButton%[14]) = 1

        EnableWindow RadionButton%[13], 0
        EnableWindow RadionButton%[15], 0

    EndIf

    If GetCheck(RadionButton%[17]) = 1

        EnableWindow RadionButton%[16], 0
        EnableWindow RadionButton%[18], 0

    EndIf

    Richtige% = 0

    If GetCheck(RadionButton%[2]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[5]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[8]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[11]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[14]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[17]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If Richtige% = 0

        @MessageBox("Du hast 0 von 6 richtig !","", 0)

    endif

    If Richtige% = 1

        @MessageBox("Du hast 1 von 6 richtig !","", 0)

    endif

    If Richtige% = 2

        @MessageBox("Du hast 2 von 6 richtig !","", 0)

    endif

    If Richtige% = 3

        @MessageBox("Du hast 3 von 6 richtig !","", 0)

    endif

    If Richtige% = 4

        @MessageBox("Du hast 4 von 6 richtig !","", 0)

    endif

    If Richtige% = 5

        @MessageBox("Du hast 5 von 6 richtig !","", 0)

    endif

    If Richtige% = 6

        @MessageBox("Du hast 6 von 6 richtig !","", 0)

    endif

endproc

proc auswerten2

    Richtige% = 0

    If GetCheck(RadionButton%[3]) = 1

        EnableWindow RadionButton%[1], 0
        EnableWindow RadionButton%[2], 0

    EndIf

    If GetCheck(RadionButton%[6]) = 1

        EnableWindow RadionButton%[4], 0
        EnableWindow RadionButton%[5], 0

    EndIf

    If GetCheck(RadionButton%[8]) = 1

        EnableWindow RadionButton%[7], 0
        EnableWindow RadionButton%[9], 0

    EndIf

    If GetCheck(RadionButton%[10]) = 1

        EnableWindow RadionButton%[11], 0
        EnableWindow RadionButton%[12], 0

    EndIf

    If GetCheck(RadionButton%[15]) = 1

        EnableWindow RadionButton%[13], 0
        EnableWindow RadionButton%[14], 0

    EndIf

    If GetCheck(RadionButton%[18]) = 1

        EnableWindow RadionButton%[16], 0
        EnableWindow RadionButton%[17], 0

    EndIf

    If GetCheck(RadionButton%[3]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[6]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[8]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[10]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[15]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[18]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If Richtige% = 0

        @MessageBox("Du hast 0 von 6 richtig !","", 0)

    endif

    If Richtige% = 1

        @MessageBox("Du hast 1 von 6 richtig !","", 0)

    endif

    If Richtige% = 2

        @MessageBox("Du hast 2 von 6 richtig !","", 0)

    endif

    If Richtige% = 3

        @MessageBox("Du hast 3 von 6 richtig !","", 0)

    endif

    If Richtige% = 4

        @MessageBox("Du hast 4 von 6 richtig !","", 0)

    endif

    If Richtige% = 5

        @MessageBox("Du hast 5 von 6 richtig !","", 0)

    endif

    If Richtige% = 6

        @MessageBox("Du hast 6 von 6 richtig !","", 0)

    endif

endproc

proc auswerten3

    Richtige% = 0

    If GetCheck(RadionButton%[2]) = 1

        EnableWindow RadionButton%[1], 0
        EnableWindow RadionButton%[3], 0

    EndIf

    If GetCheck(RadionButton%[6]) = 1

        EnableWindow RadionButton%[4], 0
        EnableWindow RadionButton%[5], 0

    EndIf

    If GetCheck(RadionButton%[9]) = 1

        EnableWindow RadionButton%[7], 0
        EnableWindow RadionButton%[8], 0

    EndIf

    If GetCheck(RadionButton%[12]) = 1

        EnableWindow RadionButton%[11], 0
        EnableWindow RadionButton%[10], 0

    EndIf

    If GetCheck(RadionButton%[15]) = 1

        EnableWindow RadionButton%[13], 0
        EnableWindow RadionButton%[14], 0

    EndIf

    If GetCheck(RadionButton%[17]) = 1

        EnableWindow RadionButton%[16], 0
        EnableWindow RadionButton%[18], 0

    EndIf

    If GetCheck(RadionButton%[2]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[6]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[9]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[12]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[15]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If GetCheck(RadionButton%[17]) , (Richtige% + 1)

        Inc Richtige%

    EndIf

    If Richtige% = 0

        @MessageBox("Du hast 0 von 6 richtig !","", 0)

    endif

    If Richtige% = 1

        @MessageBox("Du hast 1 von 6 richtig !","", 0)

    endif

    If Richtige% = 2

        @MessageBox("Du hast 2 von 6 richtig !","", 0)

    endif

    If Richtige% = 3

        @MessageBox("Du hast 3 von 6 richtig !","", 0)

    endif

    If Richtige% = 4

        @MessageBox("Du hast 4 von 6 richtig !","", 0)

    endif

    If Richtige% = 5

        @MessageBox("Du hast 5 von 6 richtig !","", 0)

    endif

    If Richtige% = 6

        @MessageBox("Du hast 6 von 6 richtig !","", 0)

    endif

endproc

proc hauptprogramm_run

    Repeat

        waitinput

        if @Clicked(button_auswerten2%)

            auswerten2

        endif

        if @Clicked(button_auswerten1%)

            auswerten1

        endif

        if @Clicked(button_auswerten3%)

            auswerten3

        endif

        If @Clicked (button_erde%)

            erdkunde

        endif

        If @Clicked(button_weiter1%)

            Allgemein

        endif

        If @Clicked(button_geschichte%)

            geschichte

        endif

        If @Clicked(button_löschen%)

            WhileLoop  18

                EnableWindow RadionButton%[&LOOP], 1
                SetCheck RadionButton%[&LOOP], 0
                EnableWindow Rahmen%[1], 1
                EnableWindow Rahmen%[2], 1
                EnableWindow Rahmen%[3], 1
                EnableWindow Rahmen%[4], 1
                EnableWindow Rahmen%[5], 1
                EnableWindow Rahmen%[6], 1

            EndWhile

        endif

    until @XOR(@Clicked(button_ende%), %scankey = 27)

endproc

proc hautprgramm_end

    @DestroyWindow(%hwnd)

endproc

hauptprogramm_skin
hauptprogramm_run
hautprgramm_end
end

hat vielleicht jemand verbässerungsvorschläge oder was was ich ändern sollte ?
 
07.04.2014  
 




Julian
Schmidt
Immer Schleifen verwenden. Z.B. Anstatt
KompilierenMarkierenSeparieren
EnableWindow Rahmen%[1], 1
EnableWindow Rahmen%[2], 1
EnableWindow Rahmen%[3], 1
EnableWindow Rahmen%[4], 1
EnableWindow Rahmen%[5], 1
EnableWindow Rahmen%[6], 1

einfach nur...
KompilierenMarkierenSeparieren
 
XProfan X2
Win7 Professional, SP1, AMD FX(tm)-8350 Eight-Core Processor

˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...] 
07.04.2014  
 




E.T.
Hm, ist das per 'ne Monster-Auflösung geproggt ??
Bei Standart 1024x786 passt nix mehr in's Fenster:



Da fehlt die Anpassung an die Auflösung.
Die Radiobuttons sind auch schon aktiviert.
Hier noch ein Shot mit Texten (den Hintergrund finde ich sowieso grausam):



Und eines missfällt mir gänzlich:
Die "dumme" Frage am Start: würde ich das Progg nicht starten wollen,
hätte ich es nicht angeklickt

Die Texte würd ich in un .INI oder 'ne .DLL auslagern...

101 kB
Hochgeladen:08.04.2014
Downloadcounter125
Download
108 kB
Hochgeladen:08.04.2014
Downloadcounter160
Download
 
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...
08.04.2014  
 




Nico
Madysa
diimool25 (07.04.14)

hat vielleicht jemand verbässerungsvorschläge oder was was ich ändern sollte ?


Bitte schließe deinen Quelltext immer in CODE- statt QUOTE-Blöcken ein. Für deinen Beitrag hier habe ich mir erlaubt, das schon mal zu machen.
 
08.04.2014  
 



Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

5.437 Views

Untitledvor 0 min.
Peter Max Müller09.06.2015
Heinz Bernhard12.12.2014
Andre Rohland26.09.2014
iF09.07.2014
Di più...

Themeninformationen



Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie