Escolha do dia do vencimento

Delphi

05/07/2004

Ola á todos da lista

Estou com um plobleminha, tenho um Radiogroup com os seguintes itens
para escolher

º Domingo
º Segunda - Feira
º Terça - Feira
º Quarta - Feira
º Quinta - Feira
º Sexta - Feira
º Sábado

E queria quando eu selecionasse qualquer um deles o Valor que eu declarei no var que se chama V_date:TDateTime recebesse o 1º dia da semana por exemplo:

Escolhi o item Domingo entao queria que ficasse assim.

If radiogroup.itemindex = 1 then
tbcarne.fieldbyname(´dt_venc´).asDateTime:= dayofweek(v_date);


Pellegrini

Pellegrini

Curtidas 0

Respostas

Marcelino

Marcelino

05/07/2004

Prezado Pellegrini,

Por favor, refaça a sua pergunta. Não entendi o que vc quer exatamente

[]s


GOSTEI 0
Zottis

Zottis

05/07/2004

sua pergunta não foi muito clara, mas pelo que entendi dayofweek não funciona do jeito que você mencionou,

seria mais ou menos assim:

[b:656872b094]implementation[/b:656872b094]

{$R *.dfm}

[b:656872b094]const[/b:656872b094]
dias:array [1..7] of string=(´Domingo´,´Segunda Feira´,´Terça Feira´,´Quarta Feira´,´Quinta Feira´,´Sexta Feira´,´Sábado´);

....

DiarioDiaSemana.Value:=dias [dayofweek(DiarioData.value)];

Você precisará colocar um campo dia da semana.

If radiogroup.itemindex = 1 then
tbcarne.fieldbyname(´dt_venc´).[b:656872b094]asDateTime[/b:656872b094]:= dias [dayofweek(v_date)];


espero que te ajude,


GOSTEI 0
POSTAR