TChatForm = class(TForm) StatusBar1: TStatusBar MsgMemo: TMemo btnSend: TButton btnCancel: TButton procedure btnSendClick(Sender: TObject) procedure btnCancelClick(Sender: TObject) procedure MsgMemoKeyDown(Sender: TObject var Key: Word Shift: TShiftState) private { Private declarations } public { Public declarations } FromIP,RemoteComputName:String end

neticq\ChatRoomUnit.dcu
......\ChatRoomUnit.dfm
......\ChatRoomUnit.pas
......\ChatUnit.dfm
......\ChatUnit.pas
......\main.dcu
......\main.dfm
......\main.pas
......\NetICQ.cfg
......\NetICQ.dof
......\NetICQ.dpr
......\neticq.exe
......\NetICQ.res
......\neticq.txt
......\NickNameUnit.dcu
......\NickNameUnit.dfm
......\NickNameUnit.pas
......\ReceivedUnit.dcu
......\ReceivedUnit.dfm
......\ReceivedUnit.pas
neticq

• We are an exchange download platform that only provides communication channels. The downloaded content comes from the internet. Except for download issues, please Google on your own.
• The downloaded content is provided for members to upload. If it unintentionally infringes on your copyright, please contact us.
• Please use Winrar for decompression tools
• If download fail, Try it againg or Feedback to us.
• If downloaded content did not match the introduction, Feedback to us，Confirm and will be refund.
• Before downloading, you can inquire through the uploaded person information

Nothing．