TStrings与Memo.Lines赋值的问题

//想实如今函数中生成Memo1的内容,然后赋给Memo.Lines //方法1: var s: TStrings; begin s := TStringList.Create; AddMemoData(s); Memo1.Lines := s; //进行对象复制,而不是简单的指针赋值 { procedure TCustomMemo.SetLines(Value: TStrin
相关文章
相关标签/搜索