Копирование текста всплывающего окна в файл

[=Kostanakis=]

Объясняю: всплывает модальное окно с текстом в элементе а-ля Edit. Вопрос: как средствами делфи при всплытии данного окна автоматом скопировать текст из Edit'a в txt? В принципе в тхт сохранить смогу - как из окна скопировать текст в программу?

[VeTaL_UA]

procedure TForm2.FormCreate(Sender: TObject);
var
s:TStringList;
begin
s:=TStringList.Create;
s.Add(Edit1.Text);
s.SaveToFile('1.txt');
s.Free;
end;

[Mebius]

Цитата: Сообщение от VeTaL_UA procedure TForm2.FormCreate(Sender: TObject); var s:TStringList; begin s:=TStringList.Create; s.Add(Edit1.Text); s.SaveToFile('1.txt'); end;

а освобождать опять дядя ваня будет?

[VeTaL_UA]

Цитата: Сообщение от Mebius а освобождать опять дядя ваня будет?

Забыл. Спешил просто. Добавил в код.

[=Kostanakis=]

Уточняю - окно с сообщением принадлежит другой программе, к исходникам которой я доступа не имею.

[Mebius]

Цитата: Сообщение от =Kostanakis= Уточняю - окно с сообщением принадлежит другой программе, к исходникам которой я доступа не имею.

телепаты в отпуске.

по делу, ищешь хендл окна, потом субхендл компонента, по типам компонентов для отлова (понадобится при стыривании текста) можешь определить через spy++, писать тут как это делается в плане кода не смогу тк делал это пару раз и не запомнил толком, поищи на делфибейзикс, я оттуда брал пример вроде