TClientDataSet.Filter und SetRange definieren ?

[madina]

Hallo,

ich habe ein Problem:

ich habe ein TClientDataSet1 mit den Feldern:
iMT := StrToInt('MVom'+'TVom'); // enthält Monat und TagVom
iTagVom:= StrToInt('TVom'); // enthält TagVom
ITagBis:= StrToInt('TBis'); // enthält TagBis

TClientDataSet1.IndexName:= i_iMT; // Index auf Feld iMT, sortiert nach iMT
TClientDataSet1.Filter:= 'TagVom<='+QuotedStr(Tag)+'TagBis>='+QuotedStr(Tag );
TClientDataSet1.SetRange([IntToStr(Monat)+'01'], [IntToStr(Monat)+'31']);
TClientDataSet1.Filtered:= true;

Meine Frage ist:

Monat:= 7; Tag:= 9;

wie kann ich z.B. SetRange(IntToStr(Monat)+Format('%.2u', [Tag])], [IntToStr(Monat)+'31']); oder Filter definieren, daß er bei einem Tag:= 9 die Tage eines Monats vom z.B. 9-31 filtert (dh zeigt alle iMT= 709 bis 731 an und nicht iMT= 701 bis 731)?

mfg