Discussion :

[liza06_1]

salut tout le monde, voila je suis une débutante et j'ai un problème au niveau de mon application je suis en train de développer une application avec delphi7 sous SQL SERVER 2000 et voudrais faire des mises à jour sur ma table facture (T_Table et le Datasource) , j'ai programmé le boutton ajouter et voila la source:

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
19
20
21
22
23
24
25
26
 procedure TFacture.JvXPButton1Click(Sender: TObject);
begin
 IF   (edit1.Text='') then
raise exception.Create('VOUS DEVEZ SAISIR LES CHAMPS')
else
T_Facture.Insert;
T_Facture.FieldByName('Num_Fact').Value:=edit1.Text;
T_Facture.FieldByName('Date_Fact').Value:=Datetimepicker1.DateTime;
T_Facture.FieldByName('Désig_Four').Value:=edit3.Text;
T_Facture.FieldByName('Prix_Unit').Value:=edit8.text;
T_Facture.FieldByName('TVA').Value:=edit7.Text;
T_Facture.FieldByName('Mont_Four').Value:=edit5.Text;
T_Facture.FieldByName('Mont_TVA').Value:=edit6.Text;
T_Facture.FieldByName('Mont_TTC').Value:=edit4.Text;
IF messagedlg('Ajout Effectuer',mtConfirmation,[mbYES,mbNO],0)=mrYes
then T_Facture.Post
else T_Facture.Cancel;
edit1.Text:='';
Datetimepicker1.DateTime:=date;
edit3.Text:='';
edit8.Text:='';
edit7.Text:='';
edit5.Text:='';
edit6.Text:='';
edit4.Text:='';
end;

ça marche mais il ne teste pas si le l'enregistrement existe ou pas j'ai essayé de le mettre au début mais ça n'a rien donné SVP AIDEZ MOI !!!!!
merci.

[qi130]

Bonjour et bienvenue sur Developpez.

Un coup d'oeil sur les règles http://club.developpez.com/regles/#L3.3 t'aurait appris qu'il est plus que souhaitable de mentionner un titre explicite

Les titres de questions sans aucuns sens du genre "Au secours" , "Help !!!", "aidez moi", "une question" , "Petit problème", etc. font perdrent un temps considérable aux lecteurs

De plus, il existe un forum spécialisé pour Delphi et les bases de données...

Je pense que ton message y serait en meilleure place

N'oublie pas de préciser la version de Delphi utilisée, ainsi que le SGBD attaqué (Paradox,Interbase,...) et le mode d'accès (BDE, composant dbExpress, etc...)


Demande à un modérateur de déplacer ton post,

[Bejaia-In]

Bonsoir,
Je vous conseil de repenser carément votre application,
vous devez mettre vos tables de données dans un module de données pour séparer la gestion proprement dite de la facturation de l'interface utilisateur.
Vous pouvez alors gérer directement sur les Tables les évenemnts du genre insertion, édition ou supression.
Ainsi que la gestion des changements dans les Champs des tables et faire vos vérifications avant et aprés tout évenements qui puisse se produire.
Vous devez aussi relier les champs éditables de vos tables a des composants d'édition (DBEdit, DBMemo, DBGrid ...).
Beaucoup de travail vous attend, alors bon courage.
Lisez l'aide de DELPHI.