salem
dans ma petite application je voudrais dire :
if table1.first then close //par exemple
comment dois être la syntaxe
salem
dans ma petite application je voudrais dire :
if table1.first then close //par exemple
comment dois être la syntaxe
Mais je ne vois pas l'interet !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 if table1.first then table1.close;
Table1.BOF ?
l’intérêt :
l'utilisateur ce déplace sur le DBGrid ,si il passe par le prémier enregistrement j'ai une vérification a faire.
merci Mr Nono40 mais la condition suivant et toujours True
j'ai pas compris pourquoi !procedure TFAffaire.DBGrid6CellClick(Column: TColumn);
begin
if table1.BOF then application.Terminate;
end;
Il faudrait tester le BOF durant le AfterScroll mais couplé à un DBGrid, j'ai un doute sur le comportement à cause de MoveBy qui ne modifie pas BOF comme le fait First mais plutôt comme le ferait Prior, comme il est impossible de sortir d'un DBGrid par le clic, BOF une fois à False ne revient jamais à True !
BOF, après l'ouverture, reste True tant que l'on est sur la 1ere Ligne (après un First ou un Prior si on était déjà sur la première ligne)
Dès que l'on change de ligne, il passe à False !
EOF passe à True lors d'un Last ou un Next (si on était déjà sur la dernière ligne)
First est une procedure donc ne renvoie pas un résultat donc cette fonction n'a pas sa place sans un if
Avant de poster, Merci de lire l'aide et de nous indiquer le fruit de vos recherche !
un TDBGrid utilise MoveBy pour se déplacer :Envoyé par Data.DB.TDataSet.First
A l'ouverture, BOF est à True,Envoyé par Data.DB.TDataSet.MoveBy
Au clic sur le 2nd enregistrement, BOF passe à False
Au clic sur le 1er enregistrement, BOF reste à False !
Une fois sur le 1er, seul la touche Array UP ou Page UP fait repasser BOF à True, mais pas le clic !
Il faudrait tenter un RecNo comme ceci
Code : Sélectionner tout - Visualiser dans une fenêtre à part if Table1.RecNo = 1 then
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager