Hola paladincubano,
si bien me parece que tienes toda la razon del mundo, creo que la agresividad estaba injustificada. Sobre como resolver tu duda, seria algo como :
Código Delphi
[-]
var
d,m,y : word;
t : TDateTime;
s : integer;
begin
d := 7*inttostr(ComboBoxSemana.Text);
m := inttostr(ComboBoxMes.Text);
y := 2000;
t := EncodeDate(y,m,d);
s := WeekOf(t);
end;
es posible que a d le tengas que sumar o restar uno, segun tus necesidades. Saludos.