Wie kann ich zwei Zeilen verbinden

[DeddyH]

Delphi-Quellcode:

If Memo2.Lines.Strings[0]='2301' then
  begin
    Memo2.Lines[1]:='Bitte zahlen Sie '+FloatToStr(2.50)+' Euro';
    LStatus.Caption:='2.50';
  end
else if Memo2.Lines.Strings[0]='2501' then
  begin
    Memo2.Lines[1]:='Bitte zahlen Sie '+FloatToStr(3)+' Euro';
    LStatus.Caption:='70';
  end;

Ich hoffe, ich habe Dich richtig verstanden.