지가 if 문을 사용을 하여서...테이블을 조회해서...데이터가 없으면
다시 조회하라는 메시지를 내보내구 싶어여..어케하면 될까여
begin
ADOQuery1.Close ;
ADOQuery1.Open ;
WITH ADOQuery2 DO
BEGIN
CLOSE ;
SQL.Clear ;
sQL.Add('SELECT * FROM H04_INSA ');
sQL.Add(Format('where H04_EMPLNO like ''%S''',[Edt_EMPLNO.text+'%']));
Edit30.Text :=sql.Text ;
OPEN;
First ;
while not(eof) do
begin
Edt_EMPLNO.Text := FieldByName('H04_EMPLNO').AsString;
Edt_HNAMNA.Text := FieldByName('H04_HNAMNA').AsString;
Edt_CNAMNA.Text := FieldByName('H04_CNAMNA').AsString;
Edt_ENAMNA.Text := FieldByName('H04_ENAMNA').AsString;
Edt_JUNORG.Text := FieldByName('H04_JUNORG').AsString;
next ;
end ;
END ;
end;
뿌려주면 될것 같네요..
그럼 즐프하세요~