MySQL-API will nicht die 1.

[CalganX]

Hm... habe das ganze mal geändert:

Delphi-Quellcode:

procedure TMainFrm.dxButton1Click(Sender: TObject);
var
  _Query: String;
  _connecter: PMYSQL;
begin
  _connecter.host := PChar(sDBHost);
  _connecter.user := PChar(sDBUser);
  _connecter.passwd := PChar(sDBPass);
  mysql_init(_connecter);

  mysql_select_db(_connecter, 'chrishde');
  _Query := 'SELECT * FROM members WHERE charUsername LIKE '''+LabeledEdit1.Text+''' AND charPassword LIKE '''+LabeledEdit2.Text+''';';
  if mysql_real_query(_connecter, PChar(_Query), 1024) <> 0 then begin
    MessageDlg('Fehler beim senden einer MySQL-Abfrage', mtError, [mbOK], 0);
    Exit;
  end;
  if mysql_num_rows(mysql_store_result(_connecter)) = 1 then
    ShowMessage('Right!');

  mysql_close(_connecter);
end;

Allerdings wird das Programm mit einer einfachen AV gestoppt. Allerdings wird keine Zeile makiert. Hast du da noch eine Idee?

Chris