Bonjour,
Dephi 5
ADO
Access 97
lors d'une recherche d'un enregistrement, si celui-ci n'est pas trouvé un message d'erreur apparaît.
Pour géere cette erreur j'ai implanté la routine suivante !
Donc si Presrot reste vide, le message apparaît.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 PresRot:=ADOQuery1.Fields[0].AsString; if PresRot = '' then begin ShowMessage('Aucun titre ne correspond à votre demande'); recherche:=''; Titre1:=''; Titre2:=''; Edit1.Text:=''; if flag = 0 then begin ADOQuery1.First; ADOQuery1.Active:=FALSE; ADOQuery1.SQL[1]:=''; ActiveControl:=Edit1; flag :=1 end; end;
Mon problème est le suivant :
Tout se passe bien avec Windows 98, windows 2000 mais windows XP semble complètement ignorer cette routine, me met le message suivant :
Message que j'obtenais avec les autres os avant d'implanté cette routine
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 BOF ou COF a true ou l'enregistrement actuel a été supprimé - l'opération demande nécessite un enregistrement actuel
Auriez-vous une explication à celà ?
Merci
![]()
Partager