Привет всем.
Есть демо апликация с формои и DataSnap сервером.
В сервере по дефаулту демо функция ReverseString:




Сами обекти класа TServerMethods создаются как то, где то, хрен знает как и когда...
У обекта TServerMethods вроде даже owner-a нету, а мне надо из функции ReverseString
достучатся к главнои форме или хотябы до главного серверного компонента ТDSServer или
к чему то другому через кого смог бы выити на другие обекти апликации.

Кто знает как ето сделать?

WBR
Janex

X-Cite
Цель?
Хорошим тоном будет то, что каждый серверный метод изолирован. Потому что это бизнес-логика, которая ничего не знает о транспорте и фреймворке который занимается ее трансляцией..

Цель такова, что мне надо не просто от клиента сделать запрос чтоб сервер сложил 1+1 и дал ответ, мне надо из
клиента серверу переслать, например, String и что то сделать в главном потоке с ним.
Пока дёргаю демо апликацию, но в конце мне надо создать компонент с Event-ом:
OnClientData(Var Data :String)

В Event-е обрабатываю Data и отдаю обратно клиенту.
Понемаю что для обрашения к главному потоку нужна синхронизатия, но с етим буду разбератся потом, шас
главная задача понять как из TServerMethods выбратся в наружу к другим обектам...

Вот тривиальныи пример - апликация с формои и DataSnap сервером, на форме TEdit, в нём что то записано
и клиент должен церез DataSnap получить то что в TEdit-е ...