1.如何判断TEdit.Text中的字符串是数字而不是其他字符串?
2.我用TQuery构件通过SQL语句查询得到一个可改示图(只有一个纪录)显示在DBGird构件中,我想把示图中字段的值同时显示在TEdit构件中,然后对TEdit中的内容进行修改,把修改后的内容再写回到示图的对应字段,最后实现对数据库的修改。该怎么做?
3.要想让TEdit构件中由键盘输入的内容只能为指定形式的字符串该怎么弄(如只能输入“09#102”,“08#109”这种形式的字符串)

解决方案 »

  1.   

    1,
    如果不長, 可以用
    if TryStrToInt(Edit1.Text) then2,
     Query.Open;
     Edit1.Text := Query.FieldByName['aaa'].AsString;
      

  2.   

    我用了“TryStrToInt(Edit1.Text)”,编译通不过,提示“TryStrToInt(Edit1.Text)”(我用的是Delphi5.0)
      

  3.   

    我用了“TryStrToInt(Edit1.Text)”,编译通不过,提示"[Error] Unit1.pas(30): Undeclared identifier: 'TryStrToInt'"(我用的是Delphi5.0)
      

  4.   

    可以直接用
     try
        strtoint(edit1.text);
     except
        showmessage('输入的不是数值');
     end; 
    Edit1.Text := Query.FieldByName['aaa'].AsString; Query.FieldByName['aaa'].AsString:=edit1.text;
     Query.Post;
      

  5.   

    if Edit1.text='' then 不是数字。
    else for idx :=1 to Length(Edit1.text) do
    if not (Edit1.text[idx] in ['0'..'9']) then 不是数字