2012-05-09 10 views
1

は、私はこれをやっている:stringgrid ColumnNameに挿入日付と情報

procedure TForm1.Button1Click(Sender: TObject); 
var dtStart: TDateTime; 
    I: Integer; 
begin 
    dtStart := DateTimePicker1.Date; 
    for I := 0 to 6 do 
    StringGrid1.Cells[I+1, 1] := FormatDateTime('dd/mm/yyyy', dtStart + I); 
end; 

任意の方法を

+0

たとえば、いくつかの日付形式の例があります。 [ここに](http://www.delphibasics.co.uk/Article.asp?Name=Dates)。 – TLama

答えて

4

はちょうどあなたのFormatDateTime形式を変更MON TUE WEDなどのように、すなわち、日付と一緒に一日の名を追加します文字列:

StringGrid1.Cells[I+1, 1] := FormatDateTime('ddd dd/mm/yyyy', dtStart + I); 
+0

追加すると、デフォルトで追加された日付が取得され、日/月のご注文について心配する必要はありません。ウィンドウの短い日付形式は、一緒につながって5日かかる長い日付は6が必要です。 –

+0

私は知っています。 :)それは質問が頼んだものではありません。日付の前に短い曜日の名前(たとえば、MON TUE WED)を追加するように求めました。これは私が答えたものです。 –

+0

私は知っています。 :)これがコメントなのです。ちょうどもし人々が興味を持っているなら、彼らはそれについて知っています。 –

関連する問題