witam mam taki problem
procedure TForm1.ClientError(Sender: TObject; Socket: TCustomWinSocket;
ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
label1.Caption:='Błąd połączenia nr '+inttostr(ErrorCode);
end;
mam taki kod działa on dobrze ale podwójnie
tzn no wypisuje mi w labelu oczywiście ze jest błąd ale też wyskakuje mi msgbox
jak zrobić żeby ten msgbox nie wyskakiwał?