Ayuda con formula

[[Lepe]]

Hola:

¿no puedes usar un TDateTimePicker? es un control donde eliges la fecha directamente y no tienes que lidiar con errores como 30/02/2010.

Saludos

[paladincubano]

Empezado por Lepe

Hola:

¿no puedes usar un TDateTimePicker? es un control donde eliges la fecha directamente y no tienes que lidiar con errores como 30/02/2010.

Saludos

Lepe, vuelve a leer mi pregunta, porque parece no has entendido.
Olvidate de fecha... No tengo fecha alguna, solo tengo un numero del 1 al 5 y otro del 1 al 12, el primero indica el NUMERO DE LA SEMANA del MES del segundo numero.
EJ: 3 y 10, significa, 3ra semana del mes de octubre.
y necesito:
de esos dos numeros, poder sacar el NUMERO de la semana del AÑO.
EJ: 3ra semana del mes de octubre = xx SEMANA DEL AÑO.
Gracias por tu comentario.

[[coso]]

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.

[paladincubano]

Muchas gracias, luego lo pruebo, ahora no estoy delante del ordenador. Con respecto a la agresividad, perdonenme si lo han entendido asi, pero afirmo, no hay agresividad ninguna en mis palabras, al menos es lo que siento, y cuando lo escribi, pues por supuesto no estab agresivo. Vuelvo y repito, si heri a alguien los sentimientos pues disculpadme pero no fue mi intencion.
Y menos en esta web que ayuda tanto a los demas y principalmente pues ami que lo necesito mucho de vez en cuando.
saludos y gracias por sus posts.

[fidel]

Hola:

Una pequeña idea que puedes ampliar, aunque quizás sea un poco enrevesada.

Semana del mes igual a 1 (el primer día)

Vas recorriendo día a día todos los días del mes pedido y cogiendo a que semana del año pertenece caa día.
Cuando cambie la semana del año a la que pertenece aumentas en uno la semana del mes y sabrás en que semana de ese més estás.
Comparas la semana del mes con la semana pedida y cuando coincida ya la tienes.

No se si se entiende muy bien en tan pocas líneas.

Un saludo.

[[Lepe]]

Lo que necesitas es la función EncodeDayOfWeekInMonth que te devuelve una fecha, ¿fecha?, ¿he dicho fecha? miedo me da pensar lo que puede decir nuestro amigo paladincubano como se enoje

Una vez tienes tienes la fecha usa weekOf y sacas el número de la semana.

La verdad, he estado a punto de no responder porque, para hallar la semana del año, necesitas saber el año en cuestión, y en tu mensaje original no dices nada del año, solo tienes el número de mes y el número de semana dentro del més. He querido aclarar esto no vaya a ser que....

Saludos

[[coso]]

Bueno, la verdad es que es bastante mas sencillo...

semanadelaño = (mes-1)*4 + numerosemanames

...mas o menos...

esto seria mas correcto :

Código Delphi [-]
function SemanadelAño(n,m : integer) : integer;
const
     diaspormes = [31,28,31,30,31,30,31,31,30,31,30,31]
begin
     result := 0;
     while m > 0 do
     begin
        result := result + diaspormes[m];
        dec(m);
     end;

     result := result div 7 + n;
end;

aunque tambien daria fallos segun bisiesto, 1 de enero domingo, etc...