Qual é o tamanho da barra de tarefas?

Do fórum ClubeDelphi:

Como conseguir a altura e a posição da barra de tarefas?

O código seguinte obtem o retângulo que contem a barra de tarefas do Windows:

1 var
2   TaskBarH: THandle; 
3   TaskBarR: TRect; 
4 ... 
5   // obtem o retangulo com o taskbar 
6   TaskBarH := FindWindow('Shell_TrayWnd', nil); 
7   GetWindowRect(TaskBarH, TaskBarR);
8      
9   // altura do taskbar = TaskBarR.Bottom - TaskBarR.Top