삭제를 위한 암호를 넣어 주세요

Sub := TForm2.create(nil);

with test_sql do
      begin
      close;
      sql.clear;
      sql.add('select * from test ');
      sql.add( where process_finish = "미처리" ');
      open;
      end;

if test_sql.reccount > 0 then
      begin
      showmessage('미처리 된 건수가 '+ IntToStr(test_sql.reccount) + '있습니다.');
      end;
 
Sub.Show; 
2017-10-13 오전 10:14:25

삭제를 위한 암호를 넣어 주세요

이런식으로 Show로 폼이 뜨기전에 원하시는 기능을 처리하시면 될 것 같습니다. 
2017-10-13 오전 10:15:28