程式碼如下 DBEdit3.Text := DBEdit1.Text; 要將DBEdit1.Text前幾位字串給DBEdit3.Text 要如何處理

function Copy(S; Index, Count: Integer): string; DBEdit3.Text := Copy(DBEdit1.Text,從那里要開始，取多少字元);    從思考取勝一切~q

------
從思考取勝一切~q

在 uses 增加 StrUtils 然後就可以使用 DBEdit3.Text := LeftStr(DBEdit1.Text,7) 函數了。 此例為字串中取出7個字‧‧‧ 還有RightStr(String,n).... 發表人 - yenhorng 於 2002/08/02 23:29:05

用 AnsiString 本身不就有 SubString 了嗎？ SubString(起始位置，字元數)

------
http://www.ViewMove.com