String ausgeben

[Helmi]

Zitat von Luckie:

Aber wenn ich die Variablen sehe, schreit das gerade zu nach einem Array oder Liste.

ich denke das ist der zweite Schritt den er machen soll
erst mal soll sein vorhandenes funktionieren - danach kann man optimieren (lernen)

[p80286]

Gegenfrage: wird showmessage ausgeführt?

und sieh Dir mal case an.

Gruß
K-H

[himitsu]

Und warum liegen alle Variablen global rum und sind nicht lokal in der Methode deklariert?

Den Sinn der d- und e-Variablen kann ich auch nicht erkennen.

Delphi-Quellcode:

    If zufalldeutsch=1 then
    begin
    editdeutsch.text:=deutsch1;
    editenglisch.text:=englisch1;
    end else
    If zufalldeutsch=2 then

Das mit den Arrays wurde schon gesagt
und für die Edits gibt es FindComponent. (was auch das vorgeschlagene CASE überflüssig machen würde)

Und die (fehlende) Codevormatierung ist eher als grausam zu bezeichnen.

[Puke]

Ich glaub da war was:

Zitat von DelphiDan:

ich bin noch ein "Anfänger" in Delphi

Ach, er ist noch Anfänger. Und warum reiten dann alle (bis auf BUG und p80286) auf ihm rum?

DelphiDan, versuch erstmal den ersten Teil mit einer oder-Verknüpfung zu minimieren (Du musst es noch nicht mit FindComponent machen):

Delphi-Quellcode:

if (deutsch1.text = '') or (deutsch2.text = '') or ... or (englisch11.text = '') or (englisch12.text = '') then
   ShowMessgae('...')
else
begin
  // Hier kommt der Teil ab dem "panel1.visible := false" rein
  panel1.visible := false;
  {...}
end;

Und dann kannst du weitermachen mit der case -Anweisung

Delphi-Quellcode:

case zufallszahl of
 1: begin
       // Hier kommt die Zuweisung dann rein
       editdeutsch.text:=d1;
       editenglisch.text:=e1;
    end;
 2: begin
       // Hier kommt die Zuweisung dann rein
    end;
 {...}
end;

Das wird übersichtlicher und einfacher für dich.

Beste Grüße
Puke

[BUG]

Zitat von Puke:

Und warum reiten dann alle (...) auf ihm rum

Die Kommentare zeigen die nächsten Schritte auf, die DelphiDan mit dem Code gehen sollte.

• bessere Einrückung
• die Wiederholungen vermeiden (Array und Schleifen)
• dann eventuell die globalen Variablen

case wäre zwar eine schönere Krücke, aber erst mit Schleifen bekommt man ein Großteil der Wiederholungen erschlagen.

Es ist halt wirklich "Anfängercode", aber das ist OK für einen Anfänger ... nur möchte man sich eben auch weiterentwickeln und die Kritik in der DP ist dafür aus meiner Erfahrung ein günstiges Mittel. Im Prinzip schreibt jeder mal "gruseligen" Code; die entscheidende Fähigkeit ist es zu erkennen, dass und warum er "gruselig" ist. Es hilft, wenn man es oft genug gesagt bekommt.

Reviewed (~kritisiert) wird der Code, nicht der Programmierer.
In dem Sinne: nicht abschrecken lassen von den Alt-Eingesessenen, wir wollen nur dein Bestes

[Namenloser]

Es hat aber auch keinen Sinn, einen Anfänger, der mit einer konkreten Frage ankommt, mit einer Flut an Informationen zu erschlagen, die mit seinem Problem nicht direkt etwas zu tun haben. Eins nach dem anderen... Erst mal den eigenen Ansatz zum Laufen bringen, danach kann man ggf. schauen, ob/wie es besser geht. Genau wie es in Mathe oder anderen Fächern ja auch am effektivsten ist, erst mal eine Aufgabe selbstständig zu bearbeiten und anschließend mit der Musterlösung zu vergleichen, statt gleich in die Musterlösung zu schauen.

Ist doch normal, dass man so anfängt. Meine ersten Programme sahen genau so aus.

[himitsu]

Zitat von BUG:

Reviewed (~kritisiert) wird der Code, nicht der Programmierer.
In dem Sinne: nicht abschrecken lassen von den Alt-Eingesessenen, wir wollen nur dein Bestes

Und ein Teil der "Kritik"/Fragen geht auch manchmal am Schüler vorbei eher an den Lehrer.

Also wenn es da einen gibt, dann die Erklärungen/Fragen auch bitte mal an Diesen weitergeben.

[Medium]

Och Leute. Wenn doch klar von vorne herein angesagt ist, dass hier gerade erst begonnen wird - sehr wahrscheinlich nicht nur mit Delphi, sondern mit Programmieren allgemein - dann liegt schon mal nahe, dass hier die Schule der Aufgabensteller ist. Wenn wir jetzt daher kommen und (durchaus gut gemeinte) Vorschläge machen, wie man alles viel einfacher, besser, schöner und schneller machen könnte, dann verwirrt man nicht nur den TE gewaltig (ich zumindest wäre es), sondern bringt u.U. den Plan des Lehrers völlig durcheinander.

Ja, viele Lehrer an Schulen bringen fragwürdige Dinge bei, aber es ist der, der hier nachher die Noten gibt. Und was könnte jemanden dazu motivieren mit Softwareentwicklung weiter zu machen? Riiiichtig. Gute Noten können da schon mal helfen. Selbst wenn wir es schaffen dem TE die Superdupermusterlösung mit Profisiegel verständlich ans Herz zu legen, wird der Lehrer vermutlich nur eines sagen: An der Aufgabe vorbei, 6. (Leider ist nicht selten auch zu erwarten, dass Lehrer gewisse Konstrukte und Vorgehensweisen nichtmals als solche erkennen.)

Bevor wir hier also anfangen den Code zur Unkenntlichkeit zu refactorn, lasst uns doch lieber mal versuchen hier jemanden NICHT mit überladener (Semi-)Profimentalität zu verschrecken. So sehen Programme am Anfang nun mal aus. Meine auch. Trotzdem ist aus mir was geworden, auch ohne dass mir jemand auf Nachfragen den halben Fachbegriffekatalog der Informatik an die Stirn geklatscht hat.