请问粘贴1,2,3这样一组数据自动根据逗号顺序粘贴到三个编辑框 Delphi?
1个回答
展开全部
var
list:TStringlist;
s:string;
begin
s:='1,2,3';//赋值原始数据给S
list := TStringlist.Create;
list.Delimiter := ',';
list.DelimitedText := s;
edit1.text:=list.Strings[0];
edit2.text:=list.Strings[1];
edit3.text:=list.Strings[2];
end;
list:TStringlist;
s:string;
begin
s:='1,2,3';//赋值原始数据给S
list := TStringlist.Create;
list.Delimiter := ',';
list.DelimitedText := s;
edit1.text:=list.Strings[0];
edit2.text:=list.Strings[1];
edit3.text:=list.Strings[2];
end;
追问
谢谢你的回答,我需要实现的是监视剪切板,获取复制数据。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询