如何在delphi程序中調用TRichEdit方法

Question

我再次向所有人致敬，當然，在編碼時還有另一個問題。

我寫了下面的代碼片段：

procedure add_text(text : String); 
begin 
    MsgBox.SetFocus; 
    MsgBox.SelStart := MsgBox.GetTextLen; 
    MsgBox.Perform(EM_SCROLLCARET, 0, 0); 
    MsgBox.SelText := time_stamp + ' ' + text + #13#10; //time_stamp is a function 
end; 

的問題是，我怎麼能訪問這些MSGBOX的過程裏面的方法呢？ 。編輯的問題，如果它不夠清晰 注2：剛剛還試圖用TChatForm.MsgBox/ChatForm.MsgBox但仍unsuccessfull ..

Answer 1

（程序不能因「未申報undentifier MSGBOX」

注意編譯再次

procedure add_text(MsgBox:TRichedit;const text : String); 
begin 
    MsgBox.SetFocus; 
    MsgBox.SelStart := MsgBox.GetTextLen; 
    MsgBox.Perform(EM_SCROLLCARET, 0, 0); 
    MsgBox.SelText := time_stamp + ' ' + text + #13#10; //time_stamp is a function 
end;