Поиск и перевод слов в TStringList

[sariman]

Огромное спасибо) все пашет)))

да и еще вопрос не по теме, у меня программа зависает при выходе, из-за того, что она запускает процесс (java), а при выходе он мешает проге закрыться, подскажите, как остановить процесс java.exe при выходе с программы

[Stilet]

а при выходе он мешает проге закрыться,

Это ты с чего решил?

[sariman]

я так думаю :D

хм..а вот например если я все команды с OnClose на OnDestroy скопирую, то окно закрывается норм, но висит java.exe и cmd.exe который не висел

[Stilet]

Верно.
Ты создаешь процессы:

CreateProcess(nil, PChar('cmd')

Но не нужно забывать их убирать после отработки скажем функцией TerminateProcess.
Погугли по этому поводу.
Вот поанализируй код: http://www.programmersforum.ru/showthread.php?t=22381
Обрати внимание на завершение процесса:

CloseHandle(pi.hProcess);

[sariman]

на OnDestroy

  TerminateProcess(hProcess, 255);
  WaitForSingleObject(hProcess, INFINITE);
  CloseHandle(hProcess);
  AReadThread.Terminate;
  CloseHandle(hPipeInputWrite);
  CloseHandle(hPipeInputRead);
  CloseHandle(hPipeOutputWrite);
  CloseHandle(hPipeOutputRead);
  AReadThread.WaitFor;
  AReadThread.Free;
  Strings.Free;