продолжение старой темы по D2009
(приложение небольшой чат для локалки)

При запуске из под Delphi (после компиляции) все работает отлично.

Но при запуске готового exe файла проекта Сервер Сокет не может инициализироваться:

(Вызываю ServerSocket.Active:=True из метода OnShow главной формы проги)

procedure TForm1.FormShow(Sender: TObject);
begin
.........
try
if not ServerSocket.Active then ServerSocket.Active:=True;
except
 on e:exception do
   begin
   MessageDlg('Не могу открыть сокет для работы в сети. '+#13#10+
               E.Message,mtError,[mbOk],0);
   end;
end;
......
end;

Ось Windows 7, Delphi 2009

во второй строке мессаджа что нарисовано?

#13#10 - перевод каретки, конец строки

ИЗвиняюсь за беспокойство , все разобрался
Под семерку прогу нужно запускать в режиме совместимости с WinXP SP2
и пришло счастье..........