Передача содержимого поля в чужое окно

[Z3rique]

Как мне передать содержимое компонента TMemo в допустим Блокнот? Пожалуйста привидите пример кода, а лучше исходник, что бы я лучше смог разобратся....

[ArtGrek]

вот если ты поишеш по форуму ты все ето наидеш и не в одном екземпляре
http://programmersforum.ru/showthrea...5+%EE%EA%ED%EE
http://programmersforum.ru/showthrea...5+%EE%EA%ED%EE
http://programmersforum.ru/showthrea...5+%EE%EA%ED%EE
P.S. и ето только 3 из 20 -30

[Stilet]

Не смотрел ссылки, но от себя добавлю:

Memo.Lines.SaveToFile('Файл где-то там');

А потом сохраненный файл открывай блокнотом

[Z3rique]

Я поставил вопрос о передаче, а не сохранении файла......

[ArtGrek]

Сообщение от Z3rique

Я поставил вопрос о передаче, а не сохранении файла......

тебе и по передаче ответили и по сохранению, а ты все недаволен
а чего ты ждеш, что б зделали за тебя?
я дал 3 ссылки, такои инфы полно
что б легче искать было
надо сначала наити Handel твоего блокнота,
а потом имитировать нажатия клавиш аналогичных тексту через SendMessage(Handel, команда, параметр, параметр);
для работы с меню блокнота также надо посылать команды через SendMessage
удачи

[_Engine_]

WM_SETTEXT + справка

[Пепел Феникса]

SetWindowText
а еще можно delphi-world посмотреть, там есть.

[asmodey1]

То Z3rique - информация к размышлению:

Как послать текст в Блокнот

procedure TForm1.Button1Click(Sender: TObject);
 var
   wnd: HWND;
   i: Integer;
   s: string;
 begin
   wnd := FindWindow('notepad', nil);
   if wnd <> 0 then
   begin
     wnd := FindWindowEx(wnd, 0, 'Edit', nil);
    s := 'Hello';
     for i := 1 to Length(s) do
       SendMessage(wnd, WM_CHAR, Word(s[i]), 0);
     // Simulate Return Key. 
    PostMessage(wnd, WM_KEYDOWN, VK_RETURN, 0);
     // Simulate Space. 
    PostMessage(wnd, WM_KEYDOWN, VK_SPACE, 0);
   end;
 end;

Это не есть готовый код. Нужно приложить чуть-чуть "моска"

[Z3rique]

Сообщение от ArtGrek

тебе и по передаче ответили и по сохранению, а ты все недаволен
удачи

Почему не доволен то? Мне ссылки дали и я разобрался, но просто зачем отвечать на вопрос, который не был поставлен?

asmodey1, у меня появился другой вопрос, как найти поле окна, в которое нужно вставить текст?

[ArtGrek]

зачем отвечать на вопрос, который не был поставлен?

погоричился, извеняите
надо знать о нем что нибудь
нахождение формы, тоесть самои программы
FindWindow(Класс окна, заголовок)
нахождение в форме компонента к которому обрашаешся
FindWindowEx
(
HWND hwndParent, // дескриптор родительского окна
HWND hwndChildAfter, // дескриптор дочернего окна
LPCTSTR lpszClass, // указатель имени класса
LPCTSTR lpszWindow // указатель имени окна
);