Delphi

Question:
Will be funny if another application shows information from my application.
Can you show me how?

Answer:
Ok .. Ok ...
This example using notepad as application object.
Different application please change the application ID.


procedure TForm1.Button1Click(Sender: TObject);
begin
SetWindowText(FindWindow('notepad', nil), 'Hello!');
SendMessage(FindWindow('notepad', nil), WM_SETTEXT, 0, Integer(PChar('Hello!')));
end;