在edit1 中输入学号
来判断是否有重复的数
有则弹出提示该生已存在
要怎么写
来判断是否有重复的数
有则弹出提示该生已存在
要怎么写
解决方案 »
- delphi如何取得网页服务器的标准时间
- 求RzSplitter下载地址,这个是第三方控件。我急用
- 请教各位大侠:关于Delphi7实时通信的问题。提供思路亦可。
- 寻找控件?
- 有关SocketConnection的问题
- 修改数据库数据出错,小弟在线等,速结贴。
- 请问在哪儿能找到fastreport2.5 的控件详解???
- 紧急求助!delphi开发的数据库程序客户端怎么连接到数据库服务器?
- 求助???????????????????????给分
- 如何编写个输入法安装程序用Delphi?(各位大虾帮帮我啊!)
- TStringGrid网格数据显示不稳定
- 数据库中性别列数据类型为为false true 怎么在显示时改为男女
begin
close;
sql.text:='select 1 from 表t where 学号='+Quotedstr(Edit1.Text);
open;
if not isempty then
showmessage('学号重复!')
else
{... 做其它事}
end;
if ADOQuery1.fieldby('字段').asboolean then
a:=男
else
a:=女;
你那么a:=男
要怎么替换成我的
求助怎么改呢
之前是false true
现在要改成 男 女
求助要怎么做
我现在是不知道你那个男要赋值给谁 、
我现在是 表person 其中SEX 列
要怎么写代码
begin
close;
sql.text:='select count(*) from 表t where 学号=:学号');
parambyname('学号'').asstring := edit1.text;
try
open
except
end;
if fields[0].Asinteger > 0 then showmessage('此学号已经存在!')
end;
//男女赋值问题if ADOQuery1.fieldby('sex).asboolean then
edit2.text:='男'
else
edit2.text:='女';
是在编程时
在gird控件上显示成男女
不是最终程序完成时的显示
求助怎么做
除非点到其他edit上