Tesszük primitív csevegés delphi
Azt hiszem, nem csak van egy ötlet, hogy a (vállalati) chat. Ugyanez a gondolat jutott eszembe, és mint mindig elkezdtem keres információt az interneten, de még mindig nem olyan jó, és nem találtam. Minden, mivel nem teljesen írja le, hogyan kell csinálni.
Telepítse előfeltételek
Mivel csináltam delphi7 nem volt alapértelmezett komponensek, amit kell. (ServerSocket1. ClientSocket1).
Ehhez meg kell adni az alkatrészek az aljzatból.
A menüben menjen Component -> Csomagok telepítése ... -> Add -> dclsockets70.bpl
És adja meg az elérési utat a csomagot a komponenseket, ez található a gyökér mappában mappa Delphi Bin. Voltam benne:
C: # 92; Program Files # 92; Borland # 92; Delphi7 # 92; Bin # 92; dclsockets70.bpl
Az adagolás befejezése után, akkor az Internet fülre, ezek az alkatrészek meg kell jelennie.
Forgalomba alkatrészek és kód írása
Ahhoz, hogy hozzon létre egy kiszolgáló írásban egy eseményt a gomb egy ilyen dolog:
Figyelmeztetés. Az ügyfél csak akkor küld egy üzenetet, és a szerver viszont - figyelembe. Annak érdekében, hogy a kétirányú kommunikáció a kliens és a szerver programok két különböző végén a hálózaton.
Ahhoz, hogy elolvasta az üzenetet, a szerver a várakozás olyan üzenet fogadása ... ennyi
Ahhoz, hogy küld egy üzenetet, azt írta a két eljárást. Itt vannak:
Ez az! Primitív Chat akkor készen áll. Ezután a képzelet és gyakorlott kezek.