Segunda Quarta Sexta
16/04/2013
0
Junior
Lindolfo Junior
Posts
16/04/2013
William
[url]http://www.delphibasics.co.uk/RTL.asp?Name=DayOfTheWeek[/url]
Basta adaptar conforme o checkbox selecionado.
16/04/2013
Lindolfo Junior
[url]http://www.delphibasics.co.uk/RTL.asp?Name=DayOfTheWeek[/url]
Basta adaptar conforme o checkbox selecionado.
Então, essa questão do dia da semana eu consegui resolver, oque não estou conseguindo fazer é exatamente vincular os checkbox nos dias da semana e fazer o loop pra pegar somente os dias da semana.. é nisso que to precisando de ajuda... se quiser posso mandar um código que eu fiz pra vc dar uma olhada...
16/04/2013
Douglas
o melhor seria você colocar
com o radiogroup, que fica mais organizado
que o checkbox. Abaixo esta o código e não esqueça de adicionar
os dias na propriedade items do radiogroup.
var
myDate : TDateTime;
day : array[1..7] of string;
begin
case radiogroup1.itemindex of
0:day[1] := 'Monday';
1:day[2] := 'Tuesday';
2:day[3] := 'Wednesday';
3:day[4] := 'Thursday';
4:day[5] := 'Friday';
5:day[6] := 'Saturday';
6:day[7] := 'Sunday';
end;
myDate := EncodeDate(2002, 12, 25);
ShowMessage('Christmas day 2002 is on a '+day[DayOfTheWeek(myDate)]);
end;
Qualquer dúvida é só postar.
17/04/2013
Lindolfo Junior
Então o radiogroup eu não consigo utilizar pois preciso marcar mais de um dia da semana e acho que esse componente não permite, agora coloquei um listbox, mas o problema maior esta no seguinte, tenho 20 agendamentos pra serem feitos todas as terças e sextas por exemplo, não estou conseguindo fazer isso, ou sobra agendamento ou falta agendamento... heheheh
desde ja agradeço a atenção..
Junior
Clique aqui para fazer login e interagir na Comunidade :)
