affichage message d'erreur

Question

Bonjours tout le monde 

lorsque je click sur le boutton valider et que je ne respecte pas certaine contrainte je voudrait affiche des message d'erreur

procedure TForm1.DBAdvNavigator4Click(Sender: TObject;
  Button: TAdvNavigateBtn);
begin
IF  DBEDIT12.Text = ('') THEN
SHOWMESSAGE('Veuillez indiquer le prix d achat ')
END;

IF DBEdit11.Text = ('') THEN
ShowMessage('Veuillez indiquer la désignation du produits')
END;
end.

malheureusement il me dit que c est faut j arrive c est juste que lorsqu'il y a 1 seul if commment je pourrait faire si je doit insere plusieur if

voici mes message d'erreur

[Error] uProdAch.pas(144): Declaration expected but 'IF' found
[Error] uProdAch.pas(146): '.' expected but ';' found
[Error] uProdAch.pas(76): Unsatisfied forward or external declaration: 'TForm1.DBAdvNavigator3Click'

dubois77 · Answer

commence par supprimer les () de ('')
après on verra

Dubois77

fbalien · Answer

Bonjour

faut revoir l'aide sur le IF THEN
il ne faut pas mettre de END; après un IF

A+

Caribensila · Answer

Bonjour,

« IF DBEDIT12.Text = ('') » est correct, bien que ça suppose une incompréhension profonde de la programmation en Delphi.

Incompréhension d'ailleurs confirmée par le 'END' après le 'IF' et les nombreuses demandes d'aide quotidiennes de la part de Luigi.

Il faut commencer par étudier les bases avant de se lancer dans la programmation d'une application.

Parce qu'à ce train, ce sera une application par delphifr et non pas par Luigi.  


Nous sommes tous passés par ici.

cheurfipep · Answer

cheurfipep · Answer

quand j'ouvre le module base de donnée du delphi, il m'affiche le message suivant: "L'application n'a pas réussi à s'initialiser correctement(0xc0000005). Cliquez sur OK pour arrêter l'application.

Affichage message d'erreur

5 réponses

Votre réponse

Discussions similaires