[Requête SQL] '.' expected but ',' found

Résolu
kopierreko Messages postés 139 Date d'inscription mercredi 12 mars 2008 Statut Membre Dernière intervention 10 juillet 2010 - 28 oct. 2008 à 11:09
kopierreko Messages postés 139 Date d'inscription mercredi 12 mars 2008 Statut Membre Dernière intervention 10 juillet 2010 - 28 oct. 2008 à 19:03
Bonjour,
Toujours dans mon projet de chat, je créé les requêtes sql qu'il me faut.
Mais un problème apparaît, alors que j'ai suivi à la lettre un tuto de Delphipage.
Voici mon code:

procedure TForm1.Btn_SqlClick(Sender: TObject);
Var
  Resultat: PMYSQL_RES;
  Compteurchamps:Longword;
  row: PMYSQL_ROW;
  ligne:string;
  I: Word;
begin
  mysql_select_db(mysql, pChar(dbname)); <= [Error] Unit2.pas(75): '.' expected but ',' found.
  mysql_query(mysql, pChar('SELECT * FROM '+table)); <= [Error] Unit2.pas(76): '.' expected but ',' found.
  Resultat:=mysql_use_result(MySQL); <= [Error] Unit2.pas(77): '.' expected but ')' found.

  Compteurchamps := mysql_num_fields(Resultat);
  row:= mysql_fetch_row(Resultat);
  while Row <> nil do begin
   ligne:='|';
   for I := 0 to Compteurchamps - 1 do begin
    ligne:=ligne+row[i]+' | ';
   end;
   Mm_Msg.Lines.Add(ligne);
   Row := mysql_fetch_row(Resultat);
  end;
end;

Merci

1 réponse

kopierreko Messages postés 139 Date d'inscription mercredi 12 mars 2008 Statut Membre Dernière intervention 10 juillet 2010
28 oct. 2008 à 19:03
C'est bon ! erreur de ma part :)
3
Rejoignez-nous