cliente cevap
cliente cevap Kod: Kodu kopyalamak için üzerine çift tıklayın! if ListBox.itemindex <> -1 then
begin
if ServerSocket1.Active then
try
ConnectionID := ListBox.Itemindex;
ServerSocket1.Socket.Connections[ConnectionID].SendText(FormatFloat('00#',COMMAND) + Args);
except
end else LogMemo.Lines.add('You''re not connected...');
end else showmessage('You must first select a client to send the command to');
__________________ SusKun ve Sessiz Mürekkep... Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
|