Procedure TDBManager.Load_Query_Listview(Querys: String; List : TListview);
var
  presults : pmysql_res;  prow     : pmysql_row;
  row      : mysql_row;   Query    : String;
  num, num2: Integer;     DItems   : TStringList;
begin
  Query := Querys;
  Presults:= nil;

  try
     Mysql_query(@mysqlrec, PChar(query));
     Presults:= Mysql_store_result(@mysqlrec);
     DItems := TStringList.Create;

     for num := 0 to Presults.row_count -1 do
       begin
         Prow:= mysql_fetch_row(presults);   Row:= Prow^;

         DItems.Clear;
         for num2 := 0 to Presults^.field_count -1 do begin
             DItems.Add (StrPas(row[num2]));
         end;
         ListItemAdd(List, DItems, 0);
       end;
  finally
    DItems.Free;
    mysql_free_result(presults);
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  ID, PW, ssql : String;      // ssql : 검색문 저장 버퍼
begin
  ID := Edit1.Text;
  PW := Edit2.Text;
  DBManager.Load_Query_Listview('Select * from mem_table where id='''+ID+''' and pass='''+PW+'''', Listview1);
end;

이렇게 하면 리스트뷰에 뿌려주는것인데 이것을 제가 입력한값과 맞으면 리스트뷰를 보여주지 않고 다른 폼을 뛰우게 할려고 합니다.
제발좀 도와주세요 ㅜ.ㅜ
만드는 부분은 로그인 부분을 지금 현재 만들고 있습니다.