Başka bir uygulamaya data göndermek.

[mnhas]

Arkadaşlar,
Notepad'e 'A' gönderen bir source aşağıda (Delphitürkiye web sitesinden)
Ancak Ms Access veya başka bir uygulamaya gönderirken ne yapmalı? işin içinden çıkamadım. Yardımcı olursanız sevinirim.

procedure TForm1.Button1Click(Sender: TObject);
var
g,d:integer;
begin
{uygulamanın ana penceresini bul}
g:=FindWindow('Notepad',nil);
Edit1.Text:=IntToStr(g);
{uygulama penceresindeki text box'ı bul}
d:=ChildWindowFromPoint(g,point(50,50));
{karakteri gönder}
SendMessage(d,WM_CHAR,Ord('A'),0);
end;

[karflake]

Aşağıdaki makaleyi okumanızda fayda olabilir.
viewtopic.php?t=1587