Forum: Lazarus (IDE)
by ulrich72,
11. Nov 2018
Hallo @Delphi.Narium,
die erste und die dritte Variante sind genau das, wonach ich gesucht habe. Die entsprechen auch meinem Niveau. Da ich schon ein paar Jährchen über die 70 bin und jetzt versuche mit meinen größeren Enkeln einigermaßen mitzuhalten, entstehen also ganz kleine Anwendungen für den jüngsten.
Ich bin ein absoluter Anfänger, habe zwar schon vor einigen Jahren einwenig mit VBA für...
Forum: Lazarus (IDE)
by ulrich72,
11. Nov 2018
Der Vergleich und die Antwort sind ja einfach,
procedure TForm1.btnSubtraktionClick(Sender: TObject);
var a, b : Integer;
begin
randomize; // Initialisierung von Random
edtMinuend.Caption := IntToStr(Random(10));
edtSubtrahend.Caption := IntToStr(Random(10));
edtDifferenz.Caption := '';
lblHinweis.color := clNone;
Forum: Lazarus (IDE)
by ulrich72,
11. Nov 2018
Hallo,
ich bin mal wieder an einer einfachen Frage gescheitert. Ein kleines Programm soll meinen jüngsten Enkel in Mathematik motivieren. "Computer ist viel besser als Buch" (O-Ton).
Die Addition ist kein Hindernis, aber bei der Subtraktion komme ich nicht weiter. Da in der ersten Klasse negative Zahlen nicht bekannt sind muss der Fall Minuend < Subtrahend irgendwie ausgeschlossen werden. ...