Discussion :

[nassimanocus]

bonjour;
Je veux afficher le mot ('coucou') dans un champ NumOrdre voilà mon source

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
procedure TForm2.Button2Click(Sender: TObject);
begin;
table1.edit;
table1.FieldByName('NumOrdre').asstring:='coucou';
end;

{Le type du champ NumOrdre est auto incrément dans la base de donnees}
Lors de l'exécution il s'affiche un message d'erreur, comme quoi le type de champ est un entier
J'aimerais savoir pourquoi? Car Asstring est une propriété qui permet de convertir le type natif du champ en string. Voilà le message

[Paul TOTH]

et bien que dire...est-ce que tu sais réellement ce que tu fais ?

'coucou' ne me semble en effet pas être un nombre, or NumOrdre en réclame un...il est même auto incrémenté, il n'est donc pas nécessaire de lui attribuer une valeur.

c'est comme si je te demandais ton age et que tu me répondais "coucou"...ça n'a pas de sens.

[ShaiLeTroll]

Définitivement "coucou" NE PEUT PAS devenir un entier !

TIntegerField.AsString en lecture va transforme un integer 123 en chaine '123'.

TIntegerField.AsString en écriture va transforme une chaine '123' en integer 123.

Faut que les données soient interprétables !

Si tu veux afficher du Texte, il te faut remplacer le TDBEdit relié au champ NumOrdre par un TEdit que tu gère manuellement !

Avec un TDBEdit, en modifiant sa fonction de dessin (voir WndProc), tu dois pouvoir dessiner un texte genre "taper ici" tant que le texte est vide

[Ph. B.]

Bonjour,

bonjour;
Je veux afficher le mot ('coucou') dans un champ NumOrdre voilà mon source
//procedure TForm2.Button2Click(Sender: TObjectbegin;
table1.edit;
table1.FieldByName('NumOrdre').asstring:='coucou';
end;
end.//
{Le type du champ NumOrdre est auto incrément dans la base de donnees}
Lors de l'exécution il s'affiche un message d'erreur, comme quoi le type de champ est un entier
J'aimerais savoir pourquoi? Car Asstring est une propriété qui permet de convertir le type natif du champ en string. Voilà le message

Vous avez vous même répondu à votre question...
La colonne NumOrdre de votre table est de type Auto Incrément sous entendu Entier.
L'instruction table1.FieldByName('NumOrdre').asstring:='coucou'; est syntaxiquement correcte (cad que le compilateur peut la traduire en code machine). Par contre à l'exécution, lorsque le champ NumOrdre de votre table va être rempli, une erreur de conversion va être générée ('coucou' ne peut être traduite en valeur entière).
Il faut que la chaine de caractères soit une réprésentation littérale d'une valeur entière, par exemple : table1.FieldByName('NumOrdre').asstring:='123';

[edam]

c'est comme si je te demandais ton age et que tu me répondais "coucou"...ça n'a pas de sens.

[nassimanocus]

oui justement , puisque je suis entrain de tester la propriété asstring

[cantador]

Bonjour,

si tu souhaites tester la propriété AsString,

utilise un autre champ mais ne touche pas à ta clé auto-incrémentale
qui par nature et sécurité ne doit pas être modifiée..

par ailleurs, pour stocker une modification dans une table, il faut ajouter également une autre instruction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
procedure TForm2.Button2Click(Sender: TObject);
begin;
table1.Edit;
table1.FieldByName('TonChamp').asstring:='coucou';
table.Post;
end;

c'est le minimum en dehors du mode transactionnel..

[nassimanocus]

merci pour tes reponses,
c'est ok! cantador