Net Send в цикле, Помогите реализовать Опции

[Atreides]

Народ, подскажите, как реализовать тут одну идейку? Я тут вот написал приложение, которое при нажатии кнопки запускает цикл из 25 шагов, в котором с перерывом в 10000 миллисекунд отправляется сообщение на адрес 192.***.*.***:

Код

var
i:integer;
begin
for i:=0 to 25 do
begin
WinExec('NET SEND 192.***.*.*** текст сообщения',SW_SHOW);
sleep(1000);
end;
end;
end;

Но есть одно неудобство если нужно сменить адрес или изменить сообщение, то приходиться каждый раз менять код. А я хочу сделать, так что бы сообщение с адресом компа можно было вводить в строке типа Edit и желательно что бы net send уже сразу прописывалось в строке, после чего при нажатии на кнопку сообщение отправлялось и можно дальше писать другому адресату , но, не зная как это реализовать?

[xds]

Народный способ борьбы с "NS-флудом": переместите окно сообщения в угол экрана и не обращайте на него внимания. Во-первых, очередное окошко всегда появляются на месте предыдущего. Во-сторых, количество отображаемых одновременно сообщений ограничено некоторым разумным числом и если окошки не закрывать, то приём сообщений через некоторое время прекратится.