1.如何判断TEdit.Text中的字符串是数字而不是其他字符串?
2.我用TQuery构件通过SQL语句查询得到一个可改示图(只有一个纪录)显示在DBGird构件中,我想把示图中字段的值同时显示在TEdit构件中,然后对TEdit中的内容进行修改,把修改后的内容再写回到示图的对应字段,最后实现对数据库的修改。该怎么做?
3.要想让TEdit构件中由键盘输入的内容只能为指定形式的字符串该怎么弄(如只能输入“09#102”,“08#109”这种形式的字符串)
2.我用TQuery构件通过SQL语句查询得到一个可改示图(只有一个纪录)显示在DBGird构件中,我想把示图中字段的值同时显示在TEdit构件中,然后对TEdit中的内容进行修改,把修改后的内容再写回到示图的对应字段,最后实现对数据库的修改。该怎么做?
3.要想让TEdit构件中由键盘输入的内容只能为指定形式的字符串该怎么弄(如只能输入“09#102”,“08#109”这种形式的字符串)
如果不長, 可以用
if TryStrToInt(Edit1.Text) then2,
Query.Open;
Edit1.Text := Query.FieldByName['aaa'].AsString;
try
strtoint(edit1.text);
except
showmessage('输入的不是数值');
end;
Edit1.Text := Query.FieldByName['aaa'].AsString; Query.FieldByName['aaa'].AsString:=edit1.text;
Query.Post;
else for idx :=1 to Length(Edit1.text) do
if not (Edit1.text[idx] in ['0'..'9']) then 不是数字