youhibadelphi
Messages postés187Date d'inscriptionjeudi 16 octobre 2008StatutMembreDernière intervention20 février 2010
-
24 juin 2009 à 20:38
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 2021
-
1 juil. 2009 à 15:03
UN GRAND BONJOUR POUR TLM
Besoin d'aide
Dans une base de données je cherche le min et le max entre trois colonne
Par exemple dans la base
Num nom_pren date1 date2 date3
Je cherche a afficher le minimum et le maximum date dans les trois colonnes date
youhibadelphi
Messages postés187Date d'inscriptionjeudi 16 octobre 2008StatutMembreDernière intervention20 février 20103 26 juin 2009 à 19:26
salut cantador
mais je cherche a afficher le résultat min ou max des trois colonne dans une dblabel. je cherche une instruction sql qui cherche le min ou le max dans les trois colonne et affiche la date min, une seule date parmi les trois.
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 202113 26 juin 2009 à 23:06
dans un dblabel ?
pour le SQL ex :
procedure TForm1.Button1Click(Sender: TObject);
begin
With MonQuery1.SQL do
begin
Clear;
Add('SELECT Max(DATE1) AS MaxiDate ');
Add('FROM MaTable ');
end;
MonQuery1.Open;
Edit1.text := MonQuery1.FieldByName('MaxiDate').text;
end;
nb le champ Date1 de la table doit être en Date ou DateTime
cantador
Vous n’avez pas trouvé la réponse que vous recherchez ?
youhibadelphi
Messages postés187Date d'inscriptionjeudi 16 octobre 2008StatutMembreDernière intervention20 février 20103 27 juin 2009 à 22:38
Salut
mais mon amis catador je cherche le max de trois colonne par exemple si c'est possible une instruction qui cherche le max dans la première colonne et le max dans la deuxième et le max dans la troisième
puis le max des trois max. ou une instruction qui cherche le max des trois colonne directement.
Je te remercie infiniment pour ton aide.
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 202113 28 juin 2009 à 18:32
facile, petit Scarabée...
procedure TForm1.Button1Click(Sender: TObject);
begin
With MonQuery1.SQL do
begin
Clear;
Add('SELECT Max(date1) AS MaxiDate1, ');
Add(Max(date2) as MaxiDate2, ');
Add(Max(date3) as MaxiDate3 ');
Add('FROM MaTable ');
end;
MonQuery1.Open;
end;
Ensuite tu stockes les trois max dans un tableau et tu...
je te laisse la suite...
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 202113 28 juin 2009 à 18:37
oubli de cotes..
procedure TForm1.MaxiDateClick(Sender: TObject);
begin
with MonQuery1.SQL do
begin
Clear;
Add('SELECT Max(date1) AS MaxiDate1, ');
Add('Max(date2) as MaxiDate2, ');
Add('Max(date3) as MaxiDate3');
Add('FROM MaTable ');
MonQuery1.Open;
end;
end;
cs_cantador
Messages postés4720Date d'inscriptiondimanche 26 février 2006StatutModérateurDernière intervention31 juillet 202113 28 juin 2009 à 19:24
ben alors, c'est pas encore fini ?
procedure TForm1.MaxiDateClick(Sender: TObject);
var
Tab: array of integer;
GrandMax : integer;
Final : TDateTime;
const
nbreDate = 3;
begin
with MonQuery1.SQL do
begin
Clear;
Add('SELECT Max(DateVisaDPParCG) AS MaxiDate1, ');
Add('Max(DateDemande) as MaxiDate2, ');
Add('Max(DateReelleDebutDesTX) as MaxiDate3');
Add('FROM Devis ');
MonQuery1.Open;
end;
SetLength(Tab, nbreDate);
youhibadelphi
Messages postés187Date d'inscriptionjeudi 16 octobre 2008StatutMembreDernière intervention20 février 20103 30 juin 2009 à 20:17
Salut mon ami Nicolas
En fin ça marche mais avec un petit changement
La variable grand max n'as aucun rôle dans la boucle
J'ai effacé la virgule avant from dans l'instruction SQL
J'ai affiché le résultat dans un label.