Надеюсь никто не скажет, что функция получения времени с указанного NTP сервера бесполезная :)

Если будит проще, могу сделать сохранение данных в какой нибудь текстовик.

Ну, еще Андрей (frolandr), Гарик, Дембель, может mishem возьмется... У Андрея сейчас два плагина в работе, у Петра тоже... как минимум три плагина в работе, Гарик вроде пропал куда-то, Дембелю похоже некогда, остается надеяться на mishem`а !

И что же должно быть в переменной [RezultTimeInternet]

Все правильно, программа выполняется и сразу закрывается. Чтобы посмотреть ее результат надо сначала запустить командную строку, а в ней уже прописать путь до программы NTPClient.exe. как у меня на скриншоте.

Вместо паузы поставь галочку в команде dmRun напротив пункта "Ждать завершения работы" или помести команды обработки даты и времени в подпрограмму и запускай их в блоке "Подпрограмма по получении данных" команды dmRun.

НЕЕЕ, я на ближайший месяц как минимум, на расстояние пушечного выстрела к SDK не подойду. Я пол дня вечера сидел пытался сделать из этой кмдешки плагин и ни в какую. Пока мозг из ушей вытекать не начал не бросал все надеялся и верил... Не выходит у меня пока сделать плагин, знаний не хватает... Вроде все верно, компиляция проходит без ошибок. А как подключать к NeoBook, так постоянно хрень какая то ошибки, зависания и т.д...

А что снова Peter-то?
Peter, он что, "пуп Земли " что-ли?
А то, что все ОС после хрюши имеют (для меня, по крайней мере) больше недостатков, чем достоинств (которые можно лишь притянуть за уши при очень большом желании), мне и так давно ясно.

Ну, разьве это срок!
Бывает что не один день убъешь, а решения так и не найти, апотом оно само приходит, как озарение, и задача решается в пять минут.
А то привыкли, понимаешь, что в NB все быстро и просто, теперь кажется что и в Delphi так будет.
Нет, господа, захотели делать плагины - настраивайтесь на долгий и кропотливый труд.

В данном же случае, все достаточно просто: нужно оформлять код в виде функции/процедуры (лучше двух функций), что-то в этом духе:

/////////////////////////////////////////////
uses
SysUtils,
IdBaseComponent,
IdComponent,
IdUDPBase,
IdUDPClient,
IdSNTP;

......
procedure DoSNTP (AHost : string; var AData1 : string: var AData2 : string) ;
var
SNTP: TIdSNTP;
temp: TIdSNTP;
begin
SNTP := TIdSNTP.Create(temp);
if AHost = '' then
SNTP.Host := 'ntp1.stratum1.ru'
else
SNTP.Host := AHost;
try
if SNTP.SyncTime then
begin
AData1:= DateTimeToStr(SNTP.DateTime);
AData2:= SNTP.Host;
end;
except
begin
AData1:= 'Error';
AData2:= SNTP.Host;
end;
end;
end.

function GetTime (AHost, AVar1, AVar2 : PChar) : Boolean;
var AData1, AData2 : string;
begin
Result:= False;
DoSNTP (string(AHost), AData1, AData2);
If StrPas(AVar1) <> '' then
nbSetVar (PChar(AVar1), PChar(AData1));
If StrPas(AVar2) <> '' then
nbSetVar (PChar(AVar2), PChar(AData2));
Result:= True;
end;
///////////////////////////////////

Вызывать в плагине GetTime через nbAxecAction.
Естесственно, что возможны варианты, и это - не единственное решение.

Форматирование слетело, но, думаю разобраться, можно.

я просто не понял сразу :)

Ну пуп не пуп, а человек не последний на форуме... к тому же как не кто сможет оценить еще один плюс в отношении WindowsXP


Да, представляю какую приходится делать работу, окучиваю библиотеки VLC. Тут три строчки кода разобрать не могу, а там теперь вообще заблудишься. Спасибо тебе за труды. И огромное спасибо за пример кода для плагина, постараюсь в него получше вникнуть, и понять в чем у меня были проблемы...

Слово "Укажите" из заголовков в окне помощника предлагаю убрать.

Кстати, новому плагину - новая тема! Предлагаю создать :)

mishem, я специально постараюсь за ближайшие выходные доперевести справку, ну а дальше..
Дальше ты убедишься в том, что стало на 0.001% понятнее.

Но, только все вопросы уже не ко мне, плиз!