1-MSSQL veritabanı kullanıyorum.
2-ADOConnection1 bağlanıyor
ADODataSet1 le sorgulatma yapıyorum...
tarih lere göre sıralatma yaptığımda söyle bir sorunla karşılaştım 30.09.2005 16:10:45 tarihinden sonra 01.10.2005 09:10:11 tarihi en son tarih olarak gelmesi gerekirken 30.09.2005 16:10:45 son tarih 01.10.2005 09:10:11 önceki tarih olarak geliyor
örnek
01.10.2005 16:32:17
02.10.2005 10:52:15
03.10.2005 09:07:26
04.10.2005 10:26:14
05.10.2005 09:55:36
05.10.2005 12:51:43
05.10.2005 12:51:47
05.10.2005 12:52:00
08.09.2005 10:06:59
08.09.2005 10:09:45
08.09.2005 10:17:44
08.09.2005 10:24:19
08.09.2005 10:27:14
08.09.2005 10:29:00
----------------------------
benim istediğim ise
05.10.2005 12:52:00
05.10.2005 12:51:47
04.10.2005 10:26:14
03.10.2005 09:07:26
02.10.2005 10:52:15
01.10.2005 16:32:17
08.09.2005 10:29:00
08.09.2005 10:06:59
program kodu şu
Kod: Tümünü seç
procedure TForm1.DBGrid3TitleClick(Column: TColumn);
{$J+}
const PreviousColumnIndex : integer = 1;
//const PreviousColumnIndex : integer = -1;
{$J-}
begin
if DBGrid3.DataSource.DataSet is TCustomADODataSet then
with TCustomADODataSet(DBGrid3.DataSource.DataSet) do
begin
try
DBGrid3.Columns[PreviousColumnIndex].title.Font.Style :=
DBGrid3.Columns[PreviousColumnIndex].title.Font.Style - [fsBold];
except
end;
Column.title.Font.Style :=
Column.title.Font.Style + [fsBold];
PreviousColumnIndex := Column.Index;
if (Pos(Column.Field.FieldName, Sort) = 1)
and (Pos(' DESC', Sort)= 0) then
Sort := Column.Field.FieldName + ' DESC'
else
Sort := Column.Field.FieldName + ' ASC';
end;
end;
Order By CreateDate Desc
fakat sıralama istediğim gibi olmuyor.
yardımınız için şimdiden teşekkür ederim....
bu arada ben yeni üyeyim beni foruma dahil eden Gökhan Kırmıtlı Kardeşe teşekkür ederim...
Kod: Tümünü seç