كيف أستطيع حسابة عدد الأحرف و الأسطر في memo

[MRS_FPS]

السلام عليكم

كيف أستطيع حسابة عدد الأحرف و الأسطر في عنصر المذكرة memo

و السلام عليكم

[S.FATEH]

MRS&FPS هذه صعبة اخي :p

PHP كود :

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(Memo1.Lines.Count));
  ShowMessage(IntToStr(Length(Memo1.Text)));
end;