armstrong000032
Messages postés jeudi 30 novembre 2006Date d'inscription
5 juillet 2010
Dernière intervention
-
15 avril 2008 à 19:00 - Dernière réponse : cs_Delphiprog4580
Messages postés samedi 19 janvier 2002Date d'inscription
9 janvier 2013
Dernière intervention
- 18 avril 2008 à 09:28
Voila j'utilise delphi 7 et je voudrai savoir s'il est possible de mettre le resultat d'un query dans un edit en cliquant sur un boutton?!!
Ex: je clique sur un bouton "nombre de clients" et il m'affiche "3" dans mon edit
Je c'est pas si c'est important mais j'utilise ADO comme connexion à ma base (mysql)
procedure TForm1.Button2Click(Sender: TObject);
begin
with MonQuery.SQL do
begin
MonQuery.Close;
Clear;
Add('Select count(*) as NombreClient ');
Add('From MaTableClient ');
MonQuery.Open;
Edit1.text := IntToStr(MonQuery.FieldByName('NombreClient').Value);
end;
end;
A noter que :
Edit1.text := IntToStr(MonQuery.FieldByName('NombreClient').Value);
Est avantgeusement remplacé par :
Edit1.text := MonQuery.FieldByName('NombreClient').AsString;
Pourquoi ?
Tout simplement parce que la propriété Value est en réalité un variant, plus lent en traitement et que tu convertis ensuite en chaine. Autant demander directement la valeur sous forme de chaine dans le cas présent. C'est encore plus vrai quand on opére ce genre de conversion dans une boucle.
May Delphi be with you !
<hr color="#008000" />Pensez à cliquer sur Réponse acceptée lorsque la réponse vous convient.
@khawarizm : "cette méthode est valable pour toutes formes de transtypage ou uniquement dans quelques cas ?"
Je te suggère de te reporter à l'aide en ligne de Delphi à ce sujet où tu trouveras toutes les conversions possible et leurs limites : AsBCD, AsBoolean, AsCurrency, AsDateTime, AsFloat, AsInteger, AsSQLTimeStamp, AsString, AsVariant.
Bonne journée.
May Delphi be with you !
<hr color="#008000" />Pensez à cliquer sur Réponse acceptée lorsque la réponse vous convient.
a aidé 99 internautes ce mois-ci