Danke für den Tipp aber die jetzige Lösung find ich gut.
Mein nächstes Problem: Ich möchte gern automatisiert den mittleren Button der MessageBox klicken. Geht das auch über SendMessage Ereignisse?
Was ich bis jetzt probiert habe:
hWnd := FindWindow(nil,'Microsoft Office Professional Edition 2003');
hWnd := GetWindow(hWnd,GW_CHILD);
SendMessage(hWnd,WM_KEYDOWN,VK_TAB,1);
SendMessage(hWnd,WM_KEYUP,VK_TAB,1);
SendMessage(hWnd,WM_KEYDOWN,VK_RETURN,1);
SendMessage(hWnd,WM_KEYUP,VK_RETURN,1);
funktioniert leider nicht