C ++ Forum | | | | - page 1 - |
| Detlef Jagolski | allô Sebastian,
je bekomme depuis aujourd'hui beim Linken meines mittelgroßen Projektes une Linker Fehlermeldung:
MAKE Version 5.2 Copyright (c) 1987, 2000 Borland "C rogrammeBorlandBCC55incc32.exe" -o".objPrfMain.obj" -c -w-8026 -w-8057 -w-8060 -w-8017 -w-8004 -w-8066 -w-8041 -w-8027 -q -O2 -tWM -v- -D_WINVER=0x0400 -D_WIN32_WINNT=0x0400 -I"C rogrammeBorlandBCC55include" PrfMain.cpp PrfMain.cpp: "C rogrammeBorlandBCC55incc32.exe" -o".objBusiness-Calc_Edition_2010.obj" -c -w-8026 -w-8057 -w-8060 -w-8017 -w-8004 -w-8066 -w-8041 -w-8027 -q -O2 -tWM -v- -D_WINVER=0x0400 -D_WIN32_WINNT=0x0400 -I"C rogrammeBorlandBCC55include" Business-Calc_Edition_2010.cpp Business-Calc_Edition_2010.cpp: "C rogrammeBorlandBCC55inilink32.exe" @MAKE0000.@@@ Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland Fatal: Error detected (IMP302) Fatal: Access violation. Link terminated. ** error 2 ** deleting "Business-Calc_Edition_2010.exe" Finished.
ou bien
MAKE Version 5.2 Copyright (c) 1987, 2000 Borland "C rogrammeBorlandBDS4.0incc32.exe" -o".objPrfMain.obj" -c -w-8026 -w-8057 -w-8060 -w-8017 -w-8004 -w-8066 -w-8041 -w-8027 -q -O2 -tWM -v- -D_WINVER=0x0400 -D_WIN32_WINNT=0x0400 -I"C rogrammeBorlandBDS4.0include" PrfMain.cpp PrfMain.cpp: "C rogrammeBorlandBDS4.0incc32.exe" -o".objBusiness-Calc_Edition_2010.obj" -c -w-8026 -w-8057 -w-8060 -w-8017 -w-8004 -w-8066 -w-8041 -w-8027 -q -O2 -tWM -v- -D_WINVER=0x0400 -D_WIN32_WINNT=0x0400 -I"C rogrammeBorlandBDS4.0include" Business-Calc_Edition_2010.cpp Business-Calc_Edition_2010.cpp: "C rogrammeBorlandBDS4.0inilink32.exe" @MAKE0000.@@@ Turbo Incremental Link 5.69 Copyright (c) 1997-2005 Borland Warning: CODE : 0x0000014f / 0x00400000 Warning: DATA : 0x000000a3 / 0x00400000 Warning: DEBSYM : 0x0000000e / 0x00400000 Warning: Extdef flags : 0x00000021 / 0x00004000 Warning: Extdefs : 0x00000084 / 0x00004000 Warning: importation symbols : 0x00000000 / 0x00100000 Warning: OBJ symbols : 0x00000b60 / 0x00100000 Warning: Public GSX : 0x0000003c / 0x000c0000 Warning: Publics : 0x0000021c / 0x000c0000 Warning: SegRelocs : 0x00000438 / 0x00400000 Warning: StringBlock : 0x0000000a / 0x00400000 Warning: Virdefs : 0x00000004 / 0x00020000 Warning: BSS : 0x00000000 / 0x00400000 Warning: CODE : 0x0025c2là / 0x00400000 Warning: D:/Eigene données/Programmieren/Profan/Business-Calc/Business-Calc_Edition_2010_cpp/Business-Calc_Edition_2010.ilc: 0x00010000 / 0x03000000 Warning: D:/Eigene données/Programmieren/Profan/Business-Calc/Business-Calc_Edition_2010_cpp/Business-Calc_Edition_2010.ild: 0x00010000 / 0x03000000 Warning: D:/Eigene données/Programmieren/Profan/Business-Calc/Business-Calc_Edition_2010_cpp/Business-Calc_Edition_2010.ilf: 0x00010000 / 0x03000000 Warning: D:/Eigene données/Programmieren/Profan/Business-Calc/Business-Calc_Edition_2010_cpp/Business-Calc_Edition_2010.ils: 0x00050000 / 0x03000000 Warning: D:/Eigene données/Programmieren/Profan/Business-Calc/Business-Calc_Edition_2010_cpp/Business-Calc_Edition_2010.tds: 0x00010000 / 0x06000000 Warning: DATA : 0x000d9830 / 0x00400000 Warning: Extdef flags : 0x000000aa / 0x00004000 Warning: Extdefs : 0x000002a8 / 0x00004000 Warning: importation symbols : 0x00000000 / 0x00100000 Warning: OBJ symbols : 0x00021e8c / 0x00100000 Warning: Public GSX : 0x00002700 / 0x000c0000 Warning: Publics : 0x00015f00 / 0x000c0000 Warning: SegRelocs : 0x00000014 / 0x00400000 Warning: StringBlock : 0x0000001f / 0x00400000 Warning: UNKNOWN : 0x00000006 / 0x00400000 Warning: Virdefs : 0x0000101c / 0x00020000 Warning: unknown heap nom : 0x03000000 / 0x03000000 Fatal: Speicherbeschrõnkung f³r Block SegRelocs dans Modul Business-Calc_Edition_2010.cpp wurde ³berschritten ** error 2 ** deleting "Business-Calc_Edition_2010.exe" Finished.
peux Du mir une Tipp donner?
Salut
Detlef |
| | | XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 29.01.2010 ▲ |
| |
| | | | | - page 1 - |
| | je sais malheureusement pas simple une commutateur X, um cela Problem so trop lösen.
je vois maintenant seulement qui annonce "... Block SegRelocs überschritten", vlt. ist dem Linker cela objet trop grand. quoi aussi son peux, dass dem Linker lediglich une Funktion trop grand ist statt cela ganze objet, hierbei pourrait quelque chose "Umschreiben" qui Funktion aider - alors Teile qui Funktion wiederum dans Funktionen aufteilen et cet neuen Funktion ensuite mais pas comme Unterfunktionen déclarer. Vlt. bekommst Du es mais aussi z.B. avec PoLink gelinkt, z.B. simple ici de [...] herunterladen. si pas, ensuite devrait là Sebastian simple la fois ran, andernfalls müsstest Du arrêt cela Programme partager, un Workaround wäre vlt. avec Profan2CPP aus Programmteilen une DLL herstellen à Funktionen aus cette ensuite dem Programme seulement zur Laufzeit hinzuzufügen. égal la fois comment, irgendwelche Grenzen et cela Aufteilen dans kleinere Arbeitsschritte gibts toujours. j'aime à XProfan, dass je avec PRCs comme "Module" travailler peux, quoi mir z.B. cela Programmieren unheimlich erleichtert. avec Profan2CPP peux on oui ähnlich travailler, comment on "teilt" ist oui presque égal. |
| | | | |
| | Detlef Jagolski | allô IF, seulement einmal merci pour Votre Propositions.
Aus qui Aider de Profan2Cpp: une größere Einschränkung gibt es malheureusement: dedans qui DLL devrait aucun Befehle ou bien Funktionen, qui la fenêtre ou bien Fensterelemente erzeugen, verwendet werden; cela Verhalten ist sonst unvorhersehbar.
mon Programme hat maintenant ca. 24000 Zeilen, et ist trop ca. 30% fertig. ce sont seulement Dialoge, Edit‘s usw. Alles autre ist déjà dans quatre Dll‘s untergebracht. je hoffe dass Sebastian encore une concept hat. Salut Detlef |
| | | XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 30.01.2010 ▲ |
| |
| | | la hâte Du simple Schonmal (s.o.) une anderen Linker comment z.B. POLink probiert? |
| | | | |
| | Detlef Jagolski | Den werde je juste encore Testen. |
| | | XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 30.01.2010 ▲ |
| |
| | | dis donc "Fensterelemente erzeugen" mais est selten, den größten partie sollte cela doch pas betreffen. |
| | | | |
| | Detlef Jagolski | Fensterelemente
et avec cela mon je Textes, Buttons, Checkboxes, Selectfelder, Radiobuttons, Übersichtsfelder usw.
ou bien quoi meint Sebastian dans qui Aider avec Fensterelemente? |
| | | XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 30.01.2010 ▲ |
| |
| | | Durchschnittlich sommes doch qui wenigsten Zeilen beschäftigt, Elemente trop erstellen, statt avec cette trop hantieren - kenne mais den Code pas. comment grand ist car qui Objektdatei? Zeilenzahl sagt oui rien sur le nombre qui Anweisungen/ Programmgröße aus. |
| | | | |
| | Detlef Jagolski | OBJ Dossier 4401 KB Programme 3,7 MB |
| | | XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 30.01.2010 ▲ |
| |
| | | | - page 2 - |
| | | une 4 MB OBJ ist déjà riesig, XProfan venez avec einem Virtel dessen aus.
je sais, dass es pas qui "Optimierungstips" sommes, quelle Du grad brauchst, mais vous "funktionieren" indépendant.
Vlt. könntest Du la fois une INC ou bien une Programmteil montrer, de dem du pas du tout wüsstest, comment cette wegzuoptimieren ist. |
| | | | |
| | Detlef Jagolski |
Proc DesignForm_Lieferantendaten
Déclarer DesignForm&
Déclarer dlgexit%
Déclarer Dlg2Button1&
Déclarer Dlg2Button2&
Déclarer Dlg2Button3&
Set("TrueColor", 1)
DesignForm&=Créer("Dialog",%hwnd,"Lieferantenstammdaten",%maxx + 5,114,521,415)
Text1&=Créer("Text",DesignForm&,"Lieferanten-Nr.:",20,100,102,17)
SetFont Text1&,TextFont4&
Text2&=Créer("Text",DesignForm&,"Anrede:",20,120,62,17)
SetFont Text2&,TextFont1&
Text3&=Créer("Text",DesignForm&,"Name 1:",20,140,52,17)
SetFont Text3&,TextFont1&
Text4&=Créer("Text",DesignForm&,"Name 2:",20,160,52,17)
SetFont Text4&,TextFont1&
Text5&=Créer("Text",DesignForm&,"Straße:",20,180,52,17)
SetFont Text5&,TextFont1&
Text6&=Créer("Text",DesignForm&,"Land/Plz/lieu:",20,200,92,17)
SetFont Text6&,TextFont1&
Text7&=Créer("Text",DesignForm&,"PLZ/Postfach:",20,220,92,17)
SetFont Text7&,TextFont1&
Text8&=Créer("Text",DesignForm&,"Telefon:",20,240,72,17)
SetFont Text8&,TextFont1&
Text9&=Créer("Text",DesignForm&,"Telefax:",20,260,82,17)
SetFont Text9&,TextFont1&
Text10&=Créer("Text",DesignForm&,"Email:",20,280,62,17)
SetFont Text10&,TextFont1&
Text11&=Créer("Text",DesignForm&,"URL:",20,300,82,17)
SetFont Text11&,TextFont1&
Text12&=Créer("Text",DesignForm&,"Ansprechpartner:",20,320,122,17)
SetFont Text12&,TextFont1&
Text13&=Créer("Text",DesignForm&,"Mobil:",20,340,52,17)
SetFont Text13&,TextFont1&
DlgEdit1&=Créer("Edit",DesignForm&,»,170,100,121,21)
SetFont DlgEdit1&,TextFont4&
SendMessage(DlgEdit1&,~EM_LIMITTEXT,15,0)
DlgChoiceBox1&=Créer("ChoiceBox",DesignForm&,»,170,120,82,120)
ClearList
AddStrings "Firma"
AddStrings "Frau"
AddStrings "Herr"
MoveListToChoice(DlgChoiceBox1&)
ClearList
SendMessage(DlgChoiceBox1&,~CB_SETCURSEL,0,0)
SetFont DlgChoiceBox1&,TextFont4&
DlgEdit2&=Créer("Edit",DesignForm&,»,170,140,242,21)
SetFont DlgEdit2&,TextFont4&
SendMessage(DlgEdit2&,~EM_LIMITTEXT,35,0)
DlgEdit3&=Créer("Edit",DesignForm&,»,170,160,242,21)
SetFont DlgEdit3&,TextFont4&
SendMessage(DlgEdit3&,~EM_LIMITTEXT,35,0)
DlgEdit4&=Créer("Edit",DesignForm&,»,170,180,242,21)
SetFont DlgEdit4&,TextFont4&
SendMessage(DlgEdit4&,~EM_LIMITTEXT,35,0)
DlgEdit5&=Créer("Edit",DesignForm&,»,170,200,32,21)
SetFont DlgEdit5&,TextFont4&
SendMessage(DlgEdit5&,~EM_LIMITTEXT,3,0)
SetStyle DlgEdit5&, GetStyle(DlgEdit5&) | ~ES_UPPERCASE
DlgEdit6&=Créer("Edit",DesignForm&,»,200,200,72,21)
SetFont DlgEdit6&,TextFont4&
SendMessage(DlgEdit6&,~EM_LIMITTEXT,15,0)
DlgEdit7&=Créer("Edit",DesignForm&,»,271,200,142,21)
SetFont DlgEdit7&,TextFont4&
SendMessage(DlgEdit7&,~EM_LIMITTEXT,25,0)
DlgEdit8&=Créer("Edit",DesignForm&,»,170,220,72,21)
SetFont DlgEdit8&,TextFont4&
SendMessage(DlgEdit8&,~EM_LIMITTEXT,25,0)
DlgEdit9&=Créer("Edit",DesignForm&,»,240,220,82,21)
SetFont DlgEdit9&,TextFont4&
SendMessage(DlgEdit9&,~EM_LIMITTEXT,25,0)
DlgEdit10&=Créer("Edit",DesignForm&,»,170,240,152,21)
SetFont DlgEdit10&,TextFont4&
SendMessage(DlgEdit10&,~EM_LIMITTEXT,35,0)
DlgEdit11&=Créer("Edit",DesignForm&,»,170,260,152,21)
SetFont DlgEdit11&,TextFont4&
SendMessage(DlgEdit11&,~EM_LIMITTEXT,35,0)
DlgEdit12&=Créer("Edit",DesignForm&,»,170,280,242,21)
SetFont DlgEdit12&,TextFont4&
SendMessage(DlgEdit12&,~EM_LIMITTEXT,35,0)
DlgEdit13&=Créer("Edit",DesignForm&,»,170,300,242,21)
SetFont DlgEdit13&,TextFont4&
SendMessage(DlgEdit13&,~EM_LIMITTEXT,35,0)
DlgEdit14&=Créer("Edit",DesignForm&,»,170,320,242,21)
SetFont DlgEdit14&,TextFont4&
SendMessage(DlgEdit14&,~EM_LIMITTEXT,35,0)
DlgEdit15&=Créer("Edit",DesignForm&,»,170,340,152,21)
SetFont DlgEdit15&,TextFont4&
SendMessage(DlgEdit15&,~EM_LIMITTEXT,35,0)
Dlg2Button1&=Créer("Button",DesignForm&,"&Speichern",430,90,75,25)
SetFont Dlg2Button1&,ButtonFont1&
Dlg2Button2&=Créer("Button",DesignForm&,"&Hilfe",430,120,75,25)
SetFont Dlg2Button2&,ButtonFont1&
Dlg2Button3&=Créer("Button",DesignForm&,"&Abbrechen",430,350,75,25)
SetFont Dlg2Button3&,ButtonFont1&
SubClass DlgEdit1&,1
SubClass DlgEdit2&,1
SubClass DlgEdit3&,1
SubClass DlgEdit4&,1
SubClass DlgEdit5&,1
SubClass DlgEdit6&,1
SubClass DlgEdit7&,1
SubClass DlgEdit8&,1
SubClass DlgEdit9&,1
SubClass DlgEdit10&,1
SubClass DlgEdit11&,1
SubClass DlgEdit12&,1
SubClass DlgEdit13&,1
SubClass DlgEdit14&,1
SubClass DlgEdit15&,1
Cas Lieferantenstammdaten% = 2: GetListView_Lieferantenstammdaten
SetFocus(DlgEdit1&)
SetWindowPos DesignForm& = CalcLeft(521),CalcTop(415) - 521,415;0
Claire dlgexit%
WhileNot dlgexit%
Si GetText $(DlgEdit1&) = »
EnableWindow Dlg2Button1&,0
D'autre
EnableWindow Dlg2Button1&,1
EndIf
WaitInput
Si %clé = 2
dlgexit% = 1
ElseIf Clicked(Dlg2Button1&)
Si Lieferantenstammdaten% = 1
Pruefen_Lieferanten
Cas &SQLCount = 0: INSERT_Lieferantenstammdaten
ElseIf Lieferantenstammdaten% = 2
UPDATE_Lieferantenstammdaten
EndIf
GetSatz_Lieferantenstammdaten
ElseIf Clicked(Dlg2Button2&)
ElseIf Clicked(Dlg2Button3&)
dlgexit% = 1
ElseIf %clé = 5
Aider
EndIf
Endwhile
Claire Lieferantenstammdaten%
DestroyWindow(DesignForm&)
SubClass DlgEdit1&,0
SubClass DlgEdit2&,0
SubClass DlgEdit3&,0
SubClass DlgEdit4&,0
SubClass DlgEdit5&,0
SubClass DlgEdit6&,0
SubClass DlgEdit7&,0
SubClass DlgEdit8&,0
SubClass DlgEdit9&,0
SubClass DlgEdit10&,0
SubClass DlgEdit11&,0
SubClass DlgEdit12&,0
SubClass DlgEdit13&,0
SubClass DlgEdit14&,0
SubClass DlgEdit15&,0
ENDPROC
So vois qui Dialoge aus, alles autre ist dans DLL |
| | | XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 30.01.2010 ▲ |
| |
| | | Rein quoi avec "Suchen et Ersetzen" trop faire wäre, z.B. chez:
Text2&=Créer("Text",DesignForm&,"Anrede:",20,120,62,17)
SetFont Text2&,TextFont1&
Text3&=Créer("Text",DesignForm&,"Name 1:",20,140,52,17)
SetFont Text3&,TextFont1&
Text4&=Créer("Text",DesignForm&,"Name 2:",20,160,52,17)
SetFont Text4&,TextFont1&
Text5&=Créer("Text",DesignForm&,"Straße:",20,180,52,17)
SetFont Text5&,TextFont1&
Text6&=Créer("Text",DesignForm&,"Land/Plz/lieu:",20,200,92,17)
SetFont Text6&,TextFont1&
Text7&=Créer("Text",DesignForm&,"PLZ/Postfach:",20,220,92,17)
SetFont Text7&,TextFont1&
Text8&=Créer("Text",DesignForm&,"Telefon:",20,240,72,17)
SetFont Text8&,TextFont1&
Text9&=Créer("Text",DesignForm&,"Telefax:",20,260,82,17)
SetFont Text9&,TextFont1&
Text10&=Créer("Text",DesignForm&,"Email:",20,280,62,17)
SetFont Text10&,TextFont1&
Text11&=Créer("Text",DesignForm&,"URL:",20,300,82,17)
SetFont Text11&,TextFont1&
Text12&=Créer("Text",DesignForm&,"Ansprechpartner:",20,320,122,17)
SetFont Text12&,TextFont1&
Text13&=Créer("Text",DesignForm&,"Mobil:",20,340,52,17)
SetFont Text13&,TextFont1&
DlgEdit1&=Créer("Edit",DesignForm&,»,170,100,121,21)
SetFont DlgEdit1&,TextFont4&
vlt. trop
DlgEdit1&=Créer("Edit",DesignForm&,»,170,100,121,21)
Text9&=Créer("Text",DesignForm&,"Telefax:",20,260,82,17)
Text8&=Créer("Text",DesignForm&,"Telefon:",20,240,72,17)
Text7&=Créer("Text",DesignForm&,"PLZ/Postfach:",20,220,92,17)
Text6&=Créer("Text",DesignForm&,"Land/Plz/lieu:",20,200,92,17)
Text5&=Créer("Text",DesignForm&,"Straße:",20,180,52,17)
Text4&=Créer("Text",DesignForm&,"Name 2:",20,160,52,17)
Text3&=Créer("Text",DesignForm&,"Name 1:",20,140,52,17)
Text2&=Créer("Text",DesignForm&,"Anrede:",20,120,62,17)
Text13&=Créer("Text",DesignForm&,"Mobil:",20,340,52,17)
Text12&=Créer("Text",DesignForm&,"Ansprechpartner:",20,320,122,17)
Text11&=Créer("Text",DesignForm&,"URL:",20,300,82,17)
Text10&=Créer("Text",DesignForm&,"Email:",20,280,62,17)
SetFont Text9&,TextFont1&
SetFont Text8&,TextFont1&
SetFont Text7&,TextFont1&
SetFont Text6&,TextFont1&
SetFont Text5&,TextFont1&
SetFont Text4&,TextFont1&
SetFont Text3&,TextFont1&
SetFont Text2&,TextFont1&
SetFont Text13&,TextFont1&
SetFont Text12&,TextFont1&
SetFont Text11&,TextFont1&
SetFont Text10&,TextFont1&
SetFont DlgEdit1&,TextFont4&
Wobei:
SetFont Text9&,TextFont1&
SetFont Text8&,TextFont1&
SetFont Text7&,TextFont1&
SetFont Text6&,TextFont1&
SetFont Text5&,TextFont1&
SetFont Text4&,TextFont1&
SetFont Text3&,TextFont1&
SetFont Text2&,TextFont1&
SetFont Text13&,TextFont1&
SetFont Text12&,TextFont1&
SetFont Text11&,TextFont1&
SetFont Text10&,TextFont1&
SetFont DlgEdit1&,TextFont4&
avec einer Funktion sur 1 la ligne reduzierbar wäre: et ensuite seulement
ou bien chez ständigen Edits avec Limittext
DlgEdit14&=Créer("Edit",DesignForm&,»,170,320,242,21)
SetFont DlgEdit14&,TextFont4&
SendMessage(DlgEdit14&,~EM_LIMITTEXT,35,0)
simple avec einer Hilfsfunktion myCreateEdit(DesignForm&,vorgabeText$,maxLen&,TextFont4&,X&,Y&,...) une la ligne draus faire. Ebenso chez
SubClass DlgEdit1&,1
SubClass DlgEdit2&,1
SubClass DlgEdit3&,1
SubClass DlgEdit4&,1
SubClass DlgEdit5&,1
SubClass DlgEdit6&,1
SubClass DlgEdit7&,1
SubClass DlgEdit8&,1
SubClass DlgEdit9&,1
SubClass DlgEdit10&,1
SubClass DlgEdit11&,1
SubClass DlgEdit12&,1
SubClass DlgEdit13&,1
SubClass DlgEdit14&,1
SubClass DlgEdit15&,1
, pourquoi pas et aus
SubClass DlgEdit1&,0
SubClass DlgEdit2&,0
SubClass DlgEdit3&,0
SubClass DlgEdit4&,0
SubClass DlgEdit5&,0
SubClass DlgEdit6&,0
SubClass DlgEdit7&,0
SubClass DlgEdit8&,0
SubClass DlgEdit9&,0
SubClass DlgEdit10&,0
SubClass DlgEdit11&,0
SubClass DlgEdit12&,0
SubClass DlgEdit13&,0
SubClass DlgEdit14&,0
SubClass DlgEdit15&,0
vlt.
avec cela sparst Du enorm.
je hab zwar ne...aucune Profan2Cpp mais tu peux mir cela Verzeichnis avec dem CPP-projet aussi zusenden et je schaue, si es avec irgend einem Linker trop linken ist. Den Voir le texte source besoin je pour pas. |
| | | | |
| | Detlef Jagolski | allô IF,
nochmal vielen Dank pour Votre Aider. je werde seulement einmal selber autre Linker Testen z.B. VC++ et PoLink. seulement ist es ärgerlich alles encore einmal Durchzuackern quoi maintenant déjà fonctionne. Bisher habe je grand Projekte avec Delphi geschrieben. Möglicherweise suis je plus rapide si Je l' partie avec Delphi récente schreibe. peut-être hat Sebastian encore une concept.
Salut
Detlef |
| | | XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 31.01.2010 ▲ |
| |
|
répondreOptions du sujet | 17.074 Views |
Themeninformationencet Thema hat 2 participant: |