Druck abfrage

[schrimm]

Also folgendes:
Ich habe für die Schule einen Cäsar Decoder gebaut.
Der funktioniert fast wie ein texteditor, hat ebend nur 2 Richeditfelder: 1 für den ausgangstext und 1 für den ver oder entschlüsselten.
Nun soll das Zeug auch gedruckt werden und ich möchte eine Auswahl machen, was von denen man drucken möchte.
DAzu habe ich ein Extra formular mit checkboxen erstellt und wollte das über if then else regeln:

Delphi-Quellcode:

 if (CheckBox2.checked=true)and(CheckBox2.checked=true) then
  begin Form1.Re1.Print(''); Form1.Re2.Print(''); end
 else
 if CheckBox1.checked=true then
  begin Form1.Re1.Print(''); end
 else 
 if CheckBox2.checked=true then
  begin Form1.Re2.Print(''); end
 else
  begin showmessage('Bitte geben sie an , welcher Text gedruckt werden soll!'); end;

Das problem: der druckt den ausgangstext(checkbox1 gehört dazu) einzeln, wenn man das ausgewählt hat, wenn man aber den ver oder entschlüsselten drucken will, macht der immer beide texte

[Elicia]

Hallo,

so auf die Schnelle fällt mir ein: nimm eine Memo, mach sie unsichtbar und je nachdem, was gedruckt werden soll, fügst du's mit Memo1.LinesAdd ein, dann nur noch drucken.
Gibt aber sicher bessere Lösungen
MfG

Elicia

[blablab]

du hast geschrieben

if (CheckBox2.checked=true)and(CheckBox2.checked=true) then
anstatt
if (CheckBox1.checked=true)and(CheckBox2.checked=true) then

[Der_Unwissende]

Hi,
zudem kannst Du noch das = true weglassen (ist üblicher, dass man es weglässt), also einfach

Delphi-Quellcode:

if checkbox1.checked then
...

Gruß Der Unwissende

[schrimm]

*ditsch* das mit 1 und 2 wird der fehler gewesen sein.
das mit dem =true hatte ich hingeschrieben, weil ich dachte, dass das evtl irgendwas bewirkt