有很多編輯軟體都能依輸入的關鍵字,而將關鍵字變色. 請問這要如何寫? 謝謝.

引言: 有很多編輯軟體都能依輸入的關鍵字,而將關鍵字變色. 請問這要如何寫? 謝謝.

我的方法如下: RichEdit1.SelAttributes.color:=clBlue; RichEdit1.Lines.Add('123'); RichEdit1.SelAttributes.color:=clRed; RichEdit1.Lines.Add('123'); 如果要同一行有兩種顏色,方法如下 : uses clipbrd; procedure TForm1.Button1Click(Sender: TObject); begin RichEdit1.SelAttributes.color:=clBlue; clipboard.SetTextBuf(pchar('123')); RichEdit1.PasteFromClipboard; RichEdit1.SelAttributes.color:=clRed; clipboard.SetTextBuf(pchar('abc')); RichEdit1.PasteFromClipboard; end; ～～～Delphi K.Top討論區站長～～～

謝謝您的回答. 但好像不是我要的功能. 想要的是當在RichEdit中輸入完關鍵字如"For",For馬上就變色,但卻不會影響 下一個輸入字.

MyPos: integer; MyPos:=RichEdit1.FindText(KeyWord,0,Length(KeyWord),[stMatchCase]); if MyPos<>-1 then begin RichEdit1.SelStart:=MyPos; RichEdit1.SelLength:=Length(KeyWord); RichEdit1.SelAttributes.Color:=clBlue; end;

參考 "Automatic Syntax Highlighting Using a RichEdit Control" 一文:    http://www.google.com.tw/search?q=cache:GK54Em1-PiAJ:www.csdn.net/dev/Delphi/Document/richedit.html+%22Jon+Hogan-Doran%22+%2B+richedit&hl=zh-TW&ie=UTF-8    --- 歡迎光臨 KTop 研究院--<-<-<@ 發表人 - hagar 於 2003/08/20 11:26:43

或 TAdvMemo 這個元件: http://www.tmssoftware.com/advmemo.htm    --- 歡迎光臨 KTop 研究院--<-<-<@

請問: 那可以不同列不同字型大小及畫線嗎? 謝謝