Bonjour,

Dans mon programme j'utilise un composant TSocketClient pour communiquer avec un serveur. Lorsqu'il y a une erreur, le composant génère une erreur ESocketError et célà affiche un fenetre supplémentaire. Afin d'eviter celà j'ai mis un "try" & "catch" pour bypasser l'erreur. Mais j'ai toujours le fenetre d'erreur :

Voici mon code :

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
27
28
29
30
31
/---------------------------------------------------------------------------
bool __fastcall TVFM::MessageSend(AnsiString Message)
{
        try
        {
                int n = 0;
                n = CliSock->Socket->SendText(Message);
                if(n != 0)
                        return true;
                else
                        return false;
        }
        catch(ESocketError& e)
        {
                return false;
        }
}
 
//---------------------------------------------------------------------------
void __fastcall TVFM::Button1Click(TObject *Sender)
{
        AnsiString m = FindDirForFilesExt("C:\\Jobs","DAT");
        try
        {
                MessageSend(ReadMesageFile(m));
        }
        catch(ESocketError &e)
        {
                UpdateHistoryList("ESocketError !!!", true);
        }
}
J'ai vu un sujet similaire :
www.developpez.net/forums/viewtopic.php?t=256195
Mais j'ai exactement le meme code.

Comment faire ?
Est ce que qeulqu'un aurait une idée ?
Merci d'avance.