PDA

View Full Version : شبیه سازی کلید Enter در Memo



FirstLine
یک شنبه 02 دی 1386, 10:34 صبح
با سلام
یه Memo دارم و داخلش یک سری نوشته فرض کنیم الان کرسور در خط دوم است ، چجوری میشه با زدن یک دکمه میشه دکمه اینتر را شبیه سازی کرد؟
یعنی بجای اینکه کلید Enter را بزنم که از خط دوم به سوم بره ، با زدن دکمه از خط دوم به سوم بره.
با تشکر

rasool_brn
یک شنبه 02 دی 1386, 11:35 صبح
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Append(#13);
Memo1.SetFocus;
end;