Самый простой способ: программой test2 сохраняй нужную переменную в файл с определенным путем, а уже программой test1 загружай (допустим, в том же таймере)
Можно же пойти иным путем - взаимодействие приложений. Например самый простой пример, посылай своему приложению нужную переменную, хоть так:
Код:
var
h,sh:HWND;
begin
h:=FindWindow(nil, 'test1');
sh:=FindWindowEx(h,0,'Edit',nil);
SendMessage(sh,WM_SETTEXT,0,LParam(PChar('Моя переменная')));
Ну и наконец, гугли - DDE, COM, если не понравились выше описанные примерчики.