loutwice
Messages postés37Date d'inscriptionjeudi 11 mars 2004StatutMembreDernière intervention29 janvier 2006
-
28 janv. 2006 à 07:10
moldov
Messages postés165Date d'inscriptionmercredi 8 octobre 2003StatutMembreDernière intervention10 novembre 2008
-
30 janv. 2006 à 10:52
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.
moldov
Messages postés165Date d'inscriptionmercredi 8 octobre 2003StatutMembreDernière intervention10 novembre 2008 30 janv. 2006 à 10:52
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é, 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....