Nemme point memo1.lines + edit 1.text

Memo1.Lines.TEXT = memo2.lines.TEXT + edit1.Text + memo3.lines.TEXT + edit1.text + memo4.lines.TEXT + edit1.text + memo5.lines.TEXT + edit1.Text + memo6.lines.TEXT + edit1.Text

Hold op med at lave klyt kode !

Jens B

Jens >>

"lines" skal ikke være der.

Men du glemte selvfølgelig også at bruge hest.

Stoney

der er fejl i koden

som sagt holder op med at klyt kode :

  Memo1.Clear;
  Memo1.Lines.AddStrings(Memo2.Lines);
  Memo1.Lines.Add(Edit1.Text);
  Memo1.Lines.AddStrings(Memo3.Lines);
  Memo1.Lines.Add(Edit1.Text);
  Memo1.Lines.AddStrings(Memo4.Lines);
  Memo1.Lines.Add(Edit1.Text);
  Memo1.Lines.AddStrings(Memo5.Lines);
  Memo1.Lines.Add(Edit1.Text);
  Memo1.Lines.AddStrings(Memo6.Lines);
  Memo1.Lines.Add(Edit1.Text);


Jens B

hvad er klyt kode

Klyt er et sønderjydsk (tror jeg nok) udtryk for noget dårligt. Det hedder også jøl, i den anden af landet, eller Gøje møj andere stedder.

Noget Klyt kode er altså noget ustrukureret kode !

jens B

eller noget slam kode !

Jens B

er noob så har brug for noget hjælp

du får 5+ point hvis du siger hvad der er galt med

If Edit1.Text = '123'
then memo1.Visible + groupbox2.Visible := true
else
memo1.Visible + groupbox2.visible := false

else bliver rød

Gemo1.Visible := Edit1.Text = '123';
GroupBox2.Visible := Edit1.Text = '123';

Jens B

Lav det sådan her:

var
  Value: Boolean;
begin
  Value := Edit1.Text = '123';
  Memo1.Visible := Value;
  GroupBox2.Visible := Value;
end;