Чат на Delphi

[Spawn.Ivan]

Здравствуйте. Я пытался сделать простейший чат для делфи при помощи сокетов. Но сразу же столкнулся с такой вот ошибкой:

Когда программа начинает обрабатывать вот это:

ServerSocket1.Port:=2024;
ServerSocket1.Active:=true;

меня выкидывает вот с такой ошибкой:

First chance exception at $7556B9BC. Exception class EAccessViolation with message 'Access violation at address 004A8570 in module 'Project1.exe'. Read of address 00000038'. Process Project1.exe (1568)

Позже я пытался поставить вот это

ServerSocket1.create;

в начале... и снова та же самая ошибка но на этот раз выделил эту строку...


Не знаю что уже делать... весь день ищу и не могу понять почему ошибка... Он мне даже не указывает место ошибки когда я Брэйк жму.. Помогите пожалуйста?

[QunneD]

Вы объект TServerSocket поместили на форму откуда вызываете, или Вы динамически пытаетесь создать объект?

[Spawn.Ivan]

Если я правильно понял тооо.. на одной форме все... Хотя честно говоря я не очень понял вопрос =)

[Spawn.Ivan]

Я пытался сделать как тут ... Но выдает ошибку.. " Uses scktcomp; " - использую.

[Shouldercannon]

На форме есть компонент TServerSocket? Хотя если его нет, то должна была выводиться другая ошибка.