Forum: Programmieren allgemein
Delphi
by nuclearping,
1. Okt 2012
Wie schon gesagt, Einrückung ... :stupid:
procedure TForm1.Button2Click(Sender: TObject);
begin
// Warum klammerst du hier nur (Checkbox4.Checked) statt das "not" mit reinzunehmen?
if (Edit3.Text='') or (Edit4.Text='') or (MaskEdit1.Text='') or (Edit6.Text='') or (ComboBox3.Text='') or (not Checkbox4.Checked) then
begin
ShowMessage('Ungenügende Angaben');
Exit; // <--...
Forum: Programmieren allgemein
Delphi
by nuclearping,
30. Sep 2012
Deswegen ist auch eine ordentliche Einrückung so wichtig. Es gibt auch Tools wie Castalia, die Blöcke durch Linien visuell kennzeichnen.
Was? Lass mich raten: Du führst nach ShowMessage kein Exit aus? :stupid:
Forum: Programmieren allgemein
Delphi
by nuclearping,
29. Sep 2012
Was? Euch wurde gesagt, dass ihr die Inhalte der Form per Code erstellen müsst? Wer verlangt denn sowas absurdes? :stupid:
Ich meine es ist gut zu wissen, wie es funktioniert und wenn man es kann. Aber das jemandem als (Haus?)Aufgabe zu Lernzwecken aufzubürden ... Ich weiß ja nicht. :mrgreen: