PETIT REPERTOIRE
jmp77
Messages postés
1119
Date d'inscription
lundi 4 février 2002
Statut
Membre
Dernière intervention
4 octobre 2006
-
15 févr. 2005 à 14:17
lapucedu88 Messages postés 96 Date d'inscription jeudi 1 avril 2004 Statut Membre Dernière intervention 22 mai 2008 - 17 févr. 2005 à 15:28
lapucedu88 Messages postés 96 Date d'inscription jeudi 1 avril 2004 Statut Membre Dernière intervention 22 mai 2008 - 17 févr. 2005 à 15:28
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/29519-petit-repertoire
https://codes-sources.commentcamarche.net/source/29519-petit-repertoire
17 févr. 2005 à 15:28
Merci pour le tuyau.
17 févr. 2005 à 15:24
Avantages nombreux:
- Pas besoin de fermer/ouvrir la table
- Tu peux visualiser/modifier les enregistrements dans une DBGrid.
- Nouveau => Table.Append; ... Table.Post;
- Editer => Table.Edit; ... Table.Post;
- Eliminer => Table.delete;
- Rechercher => Locate;
PS: au lieu d' utiliser des GroupBox, utilise un TPageControl. Tu ecrits ensuite un code comme celui-ci dans le OnShow de la Form:
for i := 0 to PageControl1.PageCount-1 do
PageControl1.Pages[i].tabVisible := False;
Ensuite, pour montrer celui que tu veux tu fais:
PageControl1.ActivePageIndex := 0 ou 1 etc ... ;
17 févr. 2005 à 13:34
Je vais le faire tout de suite.
Merci
17 févr. 2005 à 12:22
Par contre, les groupBoxs Ajout/modif/eliminer contact ont la propriété left à 719 pixels ?! Donc, on les voient pas à moins de changer la valeur à 0.
17 févr. 2005 à 07:52
Les deux première lignes servent à l'utilisation de l'appli en réseau, sa j'ai compris.
La troisième ligne je l'ai déjà paramètré à false au niveau de mon composant de connection alors quel avantage à le mettre aussi en ligne de code dans le programme.
La quatrième ligne se trouve au niveau de ma chaine de connection alors maintenant elle y est deux fois, à quoi sa sert de mettre deux fois la même chose.
Les deux dernières lignes si je comprend bien servent à se que deux personnes utilissant l'appli ne puissent modifier ou supprimer un élément de la base utilisé par une autre personne.
C'est bien cela ?
16 févr. 2005 à 19:03
Connection.cursorLocation := clUseServer;
(curseur coté server)
Connection.IsolationLevel := ilReadCommitted;
(permet de lire les changements faits par d' autres PCs en reseau)
Connection.LoginPrompt := False;
(Pas de mot de passe exigé)
Connection.Mode := cmReadWrite;
(Mode lecture/ecriture)
ReqContact.cursorLocation := clUseServer;
ReqContact.LockType := ltPessimistic;
(le Edit ne fonctionne que si le record actuel n' est pas en edition)
A+
16 févr. 2005 à 15:31
16 févr. 2005 à 14:41
16 févr. 2005 à 14:26
C'est pas le temps que sa va me prendre.
16 févr. 2005 à 14:10
Il vaut cependant mieux mettre des compos standards car certains sont "allergiques" aux composants additionnels... D'un certain coté, ils ont raison, car si dans chacune des sources déposées sur ce site, il y avait un compo additionnel, on ne s'y retrouverait plus dans la palette :P
Bien sur, je ne dis pas ça pour les composants que je pense indispensables, tels que Indy, Jedi, ou bien la RXLib... ;)
Perso, je préfère une source simple qui marche plutôt qu'une source très belle à regarder qui ne peut pas fonctionner... ;) Je pense que d'autres seront de mon avis :D
Conclusion : Fais une mise à jour avec des TButton svp...
@+
Nico
16 févr. 2005 à 13:50
Je savais pas qu'il s'apellait comme sa.
Si ça interesse quelqu'un j'ai encore la source.
15 févr. 2005 à 19:56
Allez la pucedu88 mets nous des compos standard ca arrangera bien tout le monde.
Bonne prog,
JMP77.
15 févr. 2005 à 18:54
jmp77 >> Non, ce compo n'est pas du tout présent dans Delphi... :P
lapucedu88 >> C'est sur qu'à partir du moment où l'on utilise un compo, on se doit de savoir ce que c'est lol ;) Remplace les GradBtn par des composants standards et tout le monde sera content :)
@+
Nico
15 févr. 2005 à 16:24
Tu as ceci dans les declarations :
B_nom: TGradBtn;
b_tel: TGradBtn;
et dans les uses :
GradBtn
Tu travailles avec delphi combien?
15 févr. 2005 à 16:09
15 févr. 2005 à 16:08
15 févr. 2005 à 14:17
Il manque un compo TGradBtn.
++,
JMP.