Filtrer avec datatimepicker
Résolu/Fermé
fifisoum5
Messages postés
19
Date d'inscription
mercredi 8 avril 2015
Statut
Membre
Dernière intervention
7 mai 2015
-
26 avril 2015 à 18:05
nabil-bago Messages postés 255 Date d'inscription mercredi 22 mai 2013 Statut Membre Dernière intervention 24 novembre 2021 - 27 avril 2015 à 20:16
nabil-bago Messages postés 255 Date d'inscription mercredi 22 mai 2013 Statut Membre Dernière intervention 24 novembre 2021 - 27 avril 2015 à 20:16
Bonjour,
comment filtrer avec le datetimepicker
exp je choisis une date et il m'affiche tous les patients arrivés de cette date
merci d'avance
comment filtrer avec le datetimepicker
exp je choisis une date et il m'affiche tous les patients arrivés de cette date
merci d'avance
A voir également:
- Filtrer avec datatimepicker
- Comment filtrer sur excel - Guide
- Comment créer un filtre avec une liste déroulante sur excel - Guide
- Trier avec Excel : toutes les méthodes de tri de données - Guide
- Photo avec filtre gratuit - Télécharger - Retouche d'image
- TCD excel Filtre Date que faire ? ✓ - Forum Excel
1 réponse
nabil-bago
Messages postés
255
Date d'inscription
mercredi 22 mai 2013
Statut
Membre
Dernière intervention
24 novembre 2021
13
Modifié par nabil-bago le 26/04/2015 à 19:58
Modifié par nabil-bago le 26/04/2015 à 19:58
j'ai déjà cassé ma tete avec ce filtre, mais bon j'ai pas trouver une solution direct, mais j'ai trouvé une solution indirect LOL
donc je place un edit ( caché + readonly)
un datetimepicker ( dans l'evenement OnChange : edit1.text:=datetostr(datetimepicker1.date);
//donc l'edit reçoit automatiquement la date choisir dans le datetimepicker//
et puis je filtre avec le edit qui contient la date
Tpatients:= 'date_arrive='''+edit1.text+'''';
tpatients.filtred:=true;
donc je place un edit ( caché + readonly)
un datetimepicker ( dans l'evenement OnChange : edit1.text:=datetostr(datetimepicker1.date);
//donc l'edit reçoit automatiquement la date choisir dans le datetimepicker//
et puis je filtre avec le edit qui contient la date
Tpatients:= 'date_arrive='''+edit1.text+'''';
tpatients.filtred:=true;
27 avril 2015 à 00:43
peut être elle va t'aider
procedure TArchive.DateTimePicker1Change(Sender: TObject);
begin
datamodule2.ADOpatient.Filtered:=true;
datamodule2.ADOpatient.Filter:='DateExamPatient='+ QuotedStr(datetostr(DateTimePicker1.Date));
end;
27 avril 2015 à 10:34
par contre je pense que y'a une petite erreur dans l'ordre des instruction, ça doit etre :
begin
datamodule2.ADOpatient.Filter:='DateExamPatient='+ QuotedStr(datetostr(DateTimePicker1.Date));
datamodule2.ADOpatient.Filtered:=true;
end;
puisque on active le filtrage de table apres avoir donné la valeur de filtre
27 avril 2015 à 20:10
ben comme j'avais fais le filtrage je voulais que tous les patients arrivés de la date choisie soient tous archivés
mon code :
with datamodule2.ADOArchive do
begin
insert;
Fieldbyname('NPatient').AsString := datamodule2.ADOPatient.Fieldbyname('NPatient').AsString;
Fieldbyname('NomPatient').AsString :=datamodule2. ADOPatient.Fieldbyname('NomPatient').AsString;
Fieldbyname('PrenomPatient').asstring :=datamodule2. ADOPatient.Fieldbyname('PrenomPatient').AsString;
Fieldbyname('DateExamPatient').AsString := datamodule2.ADOPatient.Fieldbyname('DateExamPatient').AsString;
Fieldbyname('PrixTotalPatient').AsString := datamodule2.ADOPatient.Fieldbyname('PrixTotalPatient').AsString;
Fieldbyname('TauxTotalSS').AsString := datamodule2.ADOPatient.Fieldbyname('TauxTotalSS').AsString;
Fieldbyname('CompteRendu').AsString := datamodule2.ADOPatient.Fieldbyname('CompteRendu').AsString;
post;
end;
archive un par un un mais moi je souhaiterai archiver des dizaines au mm temps
:(
27 avril 2015 à 20:16