Discussion :

[abdmaa]

Bonjour à tous,
Ci-après un petit bout de code pour visualiser ma question :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
with Sqlite3Dataset1 do begin
     FileName:='ma_base';
     TableName:='ma_table';
     Open;
     SQL:='SELECT ma_colonne FROM ma_table where macolonne = "mon_argument"';
     ExecSQL;
     ==> 	ici j'aimerais récupérer les informations de la table pour les placer dans un memo par exemple ou dans une liste
	 Close;
end;

Comme expliqué, comment faire pour récupérer les données du SELECT ?
Dans quoi Lazarus les met-il ? Dans quel composant puis-je retrouver ces informations ?

Merci à tous pour vos réponses.

[chris37]

Au risque de passer pour un casse-pied ! La moindre recherche permet de répondre à votre question. Plusieurs post traitent de ce sujet

Un petit effort svp

[tintinux]

Bonjour,

Le Chris fait sa crise... mais il aurait été plus intéressant qu'il dise où peut-on trouver l'information. J'ai cherché et ce n'est absolument pas évident à trouver pour un débutant qui parle mal anglais, notamment s'il ne sait pas que Delphi a copié Lazarus et que sa doc est généralement valable

http://wiki.lazarus.freepascal.org/index.php?title=Using_Dataset_and_Field_components

En réponse à ta question, récupère le résultat dans la propriété Fields de ton dataset (Query ou Table). C'est un tableau indexé à partir de l'indice 0, Il existe plusieurs moyens qui sont détaillés dans la documentation de l'objet TFields.

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sqlite3Dataset1.Open ;
If not Sqlite3Dataset1.Eof then
  begin
  PremierChamp := Sqlite3Dataset1.Fields[0].Value ;
  DeuxiemeChamp := Sqlite3Dataset1.Fields[1].Value ;
  end ;

Variante 1 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

PremierChamp := Sqlite3Dataset1.Fields[0].AsString ;

Qui présente l'avantage de détecter une grave erreur de type à la compilation, plutôt qu'à l'exécution.

Variante 2 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

PremierChamp := Sqlite3Dataset1.FieldByName('ma_colonne').Value ;

En supposant que tu aies créé les champs dans ton dataset. Je n'ai eu que des ennuis avec ça et je préfère la première notation parce que la définition des noms de champs SQL est proche de leur utilisation.

Je ne connais pas SqlLite, mais il me semble que tu dois assigner la propriété SQL avant d'ouvrir le dataset, et que l'instruction ExecSql n'a pas lieu d'être ici.



Espérant de permettre d'avancer.

Bon courage,
Tintinux

[Invité]

Bonjour,

Peut-être un vieux "post" pourra-t-il vous aider ?
http://www.developpez.net/forums/d70...ion-tsqlquery/

Bonne journée.
Cordialement. Gilles

[abdmaa]

Bonjour à tous,
Merci à tintinux et à selzig.
Comme me le conseillait chris37, j'ai bien essayé avant de poster, d'effectuer une recherche...C'est pas aussi évident. Bien sûr pour quelqu'un qui connait le sujet à fond cela ne pose pas de problème. Raison pour laquelle les forums existent. N'est-il pas?

Enfin j'ai mes infos encore merci tintinux. Ca fonctionne nickel .
Bonne journée