Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : message d'erreur avec un calcul de valeur TEdit [ Archives / Maths ] (stephanesvh)

jeudi 8 janvier 2004 à 21:12:14 | message d'erreur avec un calcul de valeur TEdit

stephanesvh

salut a tout le monde

Voila, j'ai 3 TEdit
-Edit1
-Edit2
-Edit3

Pour les Edit1 Edit2 et Edit3 la valeur Text est vide et recevras des nombres decimal (exemple 0,02)

procedure TForm1.BitBtn1Click(Sender: TObject);
var
Edit5,Edit1, Edit2 : extended;

begin
try
Edit3.Text := floattostr(strtofloat (Edit1.Text) + strtofloat (Edit2.Text));
except
ShowMessage('Veuillez entrer un nombre !');
end;


Lorsque je lancer l'execution j'ai un message d'erreur du type
[Error]Unit.pas(77): Record,Object or class type required


Il y a t il quelqu'un qui pourrai m'explique l'erreur que j'ai commise dans le script ??

merci par avance pour votre aide

jeudi 8 janvier 2004 à 22:19:47 | Re : message d'erreur avec un calcul de valeur TEdit

g0belin


oui moi en fait ce que tu voulais faire c'etait avoir trois edit pour rentrer des valeurs dans se cas la il faut faire :

var
Edit5,Edit1, Edit2 : TEdit;
begin
try
Edit3.Text := floattostr(strtofloat (Edit1.Text) +
-> strtofloat (Edit2.Text));
except
ShowMessage('Veuillez entrer un nombre !');
end;

jeudi 8 janvier 2004 à 22:45:50 | Re : message d'erreur avec un calcul de valeur TEdit

stephanesvh

Salut

Merci g0belin pour ta reponse aussi prompt

Je viens de taper la modification au niveau de la declaration des variables, je n'ai plus le message d'erreur que j'ai cité dans le 1er post , mais par contre ça ma generer un autre message d'erreur


[Warning]Unit1.pas(73): Variable 'Edit1' might not have been initialized

Comment initialiser les varaibles s'il vous plait ??

PS je suis un Newbie en delphi

mercredi 20 juillet 2005 à 01:59:35 | Re : message d'erreur avec un calcul de valeur TEdit

RedDevlopper

desolé c'est trop tard maintenant mais pour initiliser les variable issues d'une classe comme (TEdit) tu dois mettre:
Edit1:=TEdit.Create(nil);
avant d'utiliser ta variable




Cette discussion est classé dans : text, code, erreur, edit1, edit2


Répondre à ce message

Sujets en rapport avec ce message

recrire dans un exe [ par molotof_FC ] salut a tous,comme dabitude un probleme con,voila mon code (que j'ai recuperé ici dailleur, il et un peu bidouillé) var FB : file of Byte;      b : by base de données [ par liza06_1 ] salut tout le monde c'est encore moi, voila j'ai un petit problème concernant la mise à jour de ma table " Section " je voulais créer des enregistreme Arrondir une donnée numérique [ par buguetj ] Bonjour, J'ai créé 2 Edit (Edit1) et (Edit2) sur un Tform ( Form1) contenant des chiffres décimaux.Je voudrais savoir comment arrondir ces chiffres à  Faire affecter deux Edits à la fois? [ par yeho ] Salut chers developppeurs! J'ai sur ma form un combobox accompagné de deux tedit (Tedit1, Tedit2).je suis entrain d'affecter le contenu de mon combo Pb de tri avec base paradox [ par lohot ] Bonsoir,J'ai un problème avec un tri d'une base de type Paradox dans Delphi. J'utilise ce code pour trier :Filtre := 'CHAMP1 = ''*' + Edit1.Text + '*' (toujours suite) faire affecter deux Tedits accompagné... [ par yeho ] Chers Developpeurs!Merci pour ceux qui m'ont aidé dans ce cas. Mais je voulais juste souligner qu'il y a un Bug sur les lignes en rouge. C'est dire qu calculer une équation dans un TEdit... [ par Crocodile306 ] Tout est dans le titre !Je me demandais seulement si il y aurais pas un moyen de calculer le contenu d'un TEdit...Par exemple :Edit1.Text := '3*sqrt(1 Image et acces [ par Rapakooti ] salut, et merci d'avance pour vos réponse.Je sais que tu as déjà repondu a la question  Delphiprog dans le forum mais j'ai pas réussi à appliqué ta ré .... TTreeView(2) [ par MAsterC ] Ok Merci ! Mais sa ne marche pas avec le "Selected" et avec le "Itemindex".Regarder ce code... :beginIf View.Items = 'Sons' then begin Form10.Tables.A erreur de transactions [ par deubal ] bonjour, voila dan mon appli j'utilise du dbexpress, je passe pas mal de requete par le code et je souhaite les gerer avec des transactions. Je lance


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,218 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.