ClientSocket ile bağlanıp veri alıyorum verilerin gelmesinde bir problem yok
Fakat 3 Tane Teraziden 3 Farklı Clientsocket ile veri geliyor ve bu programın işlemcide sürekli artmasına neden alıyor
%25 ini kullanmaya başlayınca da program Donuyor.
Bu Konuda Yardım Edebilir misiniz?
*tek bir terazi varken donma olmuyordu
*Saniyede 5-6 kayıt geliyor her bir her bir teraziden
*forma Bir Timer Koyup Her saniye Terazilere bağlantıyı Kapat açmayı denedim bu donmayı biraz geciktirdi fakat bi sonuca ulaşamadım
Kod: Tümünü seç
procedure TfKayit.Timer1Timer(Sender: TObject);
begin
if ClientSocket1.Tag=1 then ClientSocket1.Active := not ClientSocket1.Active;
if ClientSocket2.Tag=1 then ClientSocket2.Active := not ClientSocket2.Active;
if ClientSocket3.Tag=1 then ClientSocket3.Active := not ClientSocket3.Active;
if ClientSocket4.Tag=1 then ClientSocket4.Active := not ClientSocket4.Active;
end;