Memo1 feld

[lbccaleb]

Zitat von Blackheart:

Delphi-Quellcode:

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  Memo1.SetFocus;
  Memo1.SelStart:=Length(Memo1.Text)+1;
end;

du hast die enterzeile vergessen

Delphi-Quellcode:

procedure TForm1.SpeedButton1Click(Sender: TObject);
  begin
    memo1.Lines.Text := memo1.Lines.Text + #13#10;
    Memo1.SetFocus;
    Memo1.SelStart:=Length(Memo1.Text)+1;
  end;