utiliser commandes sql sous delphi

Question

bonjour,
voila j'aimerais savoir s'il est possible de stocker les resultats d'une requete sous delphi, par exemple dans un tableau, ou comme sous sql server avec l'aide de curseur..
merci de me venir en aide.

qan c abrupt loulou met a pik

moldov · Answer

Bonjour,

Evidemment tu peux stocker le resultat d'une requette sous delphi.

 Alors voici un exemple, c'est pas le meilleurs, c'est pas le plus nul, c'est une solution parmis plein d'autres.
On va prendre l'exemple d'une table client qui contient un ID, un nom, un prenom, une adresse, un code postal et une ville.

On peut faire une requete du genre.

SELECT * FROM Client WHERE ID=5

Le resultat est Durant, Michel, 3 Rue des Bronz&#233;, 00000, CHEZLUI 

Sous delphi il est possbile avec les composant ADO pour l'exemple cela ferai :

var
   aoMonClient : array[1..5] of string;

Fonction RecupClient(iIDClient : integer) : integer
var
   sSQL : string
begin
   ADOQRequete.Active := false;
   sSQL := 'SELECT * FROM Client WHERE ID='+IntToStr(iIDClient);
   ADOQRequete.SQL.Text := sSQL;
   ADOQRequete.Active := true;

   if ADOQRequete.RecordCount <> 0 then
   begin
      aoMonClient[1] := ADOQRequete.FieldsValues['Nom'];
      aoMonClient[2] := ADOQRequete.FieldsValues['Prenom'];
      aoMonClient[3] := ADOQRequete.FieldsValues['Adresse'];
      aoMonClient[4] := ADOQRequete.FieldsValues['CodePostal'];
      aoMonClient[5] := ADOQRequete.FieldsValues['Ville'];
      result := 0;
   end
   else
      result := -1;
end;

J'ai pas tester ce code mais il doit etre correct, normalement....

Bonne Prog

Utiliser commandes sql sous delphi

1 réponse

Votre réponse

Discussions similaires