- Buraya Unit1'deki kodunu yazman veya screenshot vermen gerekirdi. Tersine indy sayfasını yollamışsın.
Kod: Tümünü seç
If NOT IdTCPServer1.Active then begin
IdTCPServer1.DefaultPort := 1024;
IdTCPServer1.Active := True;
Caption := 'Aktif';
end else begin
IdTCPServer1.Active := False;
Caption := 'Pasif';
end;
- Hatanın gerekçesi ise şöyle anlatayım; Indy kurallara ve amaca uygun kod yazmanı ister.
- Buradaki hata sana şunu söylüyor. TIdTCPServer'in OnExecute eventini doldurman gerekiyor. Yani SERVER aktif oldu diyelim, bu sunucuya herhangi bir çağrı / bağlantı olduğunda ne yapacağını bilmek istiyor. Sen OnExecute eventini boş bırakırsan, üç maymunu oynayamam diyor. (duymadım, görmedim, söylemem)
