Résultat d'une requete dans un query [Résolu]
armstrong0000
- Messages postés
- 32
- Date d'inscription
- jeudi 30 novembre 2006
- Dernière intervention
- 5 juillet 2010
- Messages postés
- 4580
- Date d'inscription
- samedi 19 janvier 2002
- Dernière intervention
- 9 janvier 2013
A voir également:
- Un query
- Query delphi - Meilleures réponses
- Resultat.asp?query= - Meilleures réponses
- Récupérer le résultat d'une requète sql - Codes sources - ASP / ASP.NET (Base de données)
- Afficher le résultat d'une requête via un contrôle repeater - Codes sources - ASP / ASP.NET (ASP.Net)
- Afficher le résultat d'une requête via un contrôle datalist - Codes sources - ASP / ASP.NET (ASP.Net)
- Afficher le résultat d'une requête via un contrôle datagrid - Codes sources - ASP / ASP.NET (ASP.Net)
- Affichage par page du résultat d'une requête - Codes sources - ASP / ASP.NET (Astuces)
6 réponses
Meilleure réponse
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Dernière intervention
- 27 mars 2018
Il n'y a pas de souci :
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;
cantador
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;
cantador
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
122 internautes nous ont dit merci ce mois-ci
- Messages postés
- 4580
- Date d'inscription
- samedi 19 janvier 2002
- Dernière intervention
- 9 janvier 2013
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.
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.
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Dernière intervention
- 27 mars 2018
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Dernière intervention
- 27 mars 2018
- Messages postés
- 4580
- Date d'inscription
- samedi 19 janvier 2002
- Dernière intervention
- 9 janvier 2013
@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.
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.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.