test si edit est rempli

Bonjour a tous.

Voila je suis entrain de créer un formulaire pour ajouter des nouveaux clients dans une base de données paradox 7.

J'aimerais faire un test sur un Edit pour savoir si elle est remplie ou non et si dans le cas elle est remplie alors ajouter l'information dans la bde sinon mettre un message d'erreur.

J'ai fais ceci mais il me met toukours un message d'erreur...

Citation:

void __fastcall TNclients::Button1Click(TObject *Sender)
{
if ( Edit2.Text <> "" )
{
Table1->Edit(); // Positionne la table en mode Edition
Table1->FieldByName("Nom")->Value=Edit2->Text; //Place le nom dans le TEdit dans la table
Table1->FieldByName("Prenom")->Value = Edit3->Text;
Table1->FieldByName("Adresse")->Value = Edit4->Text;
Table1->FieldByName("Numero")->Value = Edit5->Text;
Table1->FieldByName("Ville")->Value = Edit7->Text;
Table1->FieldByName("Cp")->Value = Edit6->Text;
Table1->FieldByName("Telephone")->Value = Edit8->Text;
Table1->FieldByName("Mail")->Value = Edit9->Text;
Table1->Post(); // Valide l'édition dans la base de données

Edit2->Text="";
Edit3->Text="";
Edit4->Text="";
Edit5->Text="";
Edit6->Text="";
Edit7->Text="";
Edit8->Text="";
Edit9->Text="";

ShowMessage("Nouveau membre créer");

else { ShowMessage("Veuillez remplir la case Nom");}

}

j'ai un probleme dans mon If mais je connais pas exactement la syntaxe j'ai deja essayer plusieurs solution :(

merci

Salut, voici :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
void __fastcall TNclients::Button1Click(TObject *Sender)
{
    if (Edit2.Text == "")
    {
        Table1->Edit(); // Positionne la table en mode Edition
        ...
        Table1->Post(); // Valide l'édition dans la base de données
 
        Edit2->Text = "";
        ...
        Edit9->Text = "";
 
        ShowMessage("Nouveau membre créer");
    }
    else
    {
        ShowMessage("Veuillez remplir la case Nom");
    }
}

merci j'ia modifier mon code pour moi et ca a marcher j'au du mettre

Citation:

if (Edit2->Text != "")
{
....

merci je peux continuer a travailler mtn :king:

if ( Edit2->Text.IsEmpty() == true )

ou

if ( Edit2->Text.IsEmpty() )