点击按扭向edit中添加文本时,如何让其在当前光标位置添加? 点击按扭向edit中添加文本时,如何让其在当前光标位置添加? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);begin Edit1.Text := Copy(Edit1.Text,1,Edit1.SelStart) +'abc'+Copy(Edit1.Text,Edit1.SelStart+1,Length(Edit1.Text)-Edit1.SelStart);end; edit1.text:='aaaaaaaaaaaaaaaa';edit1.SetFocus; delphi+ACCESS 问题 查询语句 怎样打开delphi的DateBase Desktop啊~~它在哪里啊???谢谢 窗體顯示問題:兩個窗體Form1和Form2,設置其窗體的FormStyle為fsStayOnTop,或者給窗體發消息為何不能使窗體保持最前? 求助!! access数据库中的表或表中的记录莫名其妙的丢失??? 求源代码 请教所有的delphi高手: win2003为什么SQL Server无法连接 谁有Raize Components Version 2.52? 如何取得动态创建的combobox的值。 listview问题
begin
Edit1.Text := Copy(Edit1.Text,1,Edit1.SelStart)
+'abc'+Copy(Edit1.Text,Edit1.SelStart+1,Length(Edit1.Text)-Edit1.SelStart);
end;
edit1.SetFocus;