with form1.ADOCommand1 do begin
parameters.ParamByName('0').Value := e_Code.Text;
CommandText := 'select code from jobperson where code = :0';
execute;
// c_Code := ??????????????????
if c_Code = e_Code.text then begin
showmessage('기등록코드 입니다');
e_Code.SetFocus;
exit;
end;
end;
위의 C_Code에 어떤값을 넣어서 check해야 하나여..
델파이는 처음하는 거라 좀 서툴거든여... 고수님들의 지도 부탁드립니다..
ㅠ,.ㅠ
rs: Recordset;
begin
with form1.ADOCommand1 do begin
parameters.ParamByName('0').Value := e_Code.Text;
CommandText := 'select code from jobperson where code = :0';
rs := execute;
if not rs.EOF then
c_Code := rs.Fields['code'].Value;
if c_Code = e_Code.text then begin
showmessage('기등록코드 입니다');
e_Code.SetFocus;
exit;
end;
end;
...