I just downloaded the demo of Delphi 2009 and installed it. Watched a few demonstration videos.<\/p>\n
Quite a few to watch:<\/p>\n
http:\/\/dn.codegear.com\/article\/38478<\/p>\n
A good pick:<\/p>\n
http:\/\/windemo1.codegear.com\/Tiburon\/LaunchReplays\/Delphi2009Launch\/Delphi2009Launch.htm<\/p>\n
Was reminded that the Logitech camera interferes with Delphi. I think it still does actually<\/p>\n
http:\/\/bdntv.borland.com\/pix\/nickhodges\/Camtasia\/Logitech\/Logitech.html<\/p>\n
Did another piece of code that wouldn’t compile (here commented out) – The Pos wouldn’t work!<\/p>\n
\/\/ PROBLEM WITH DELPHI 2009<\/p>\n
\/\/\u00a0 with TCustomADODataSet(SelectGrid.DataSource.DataSet) do
\n\/\/\u00a0 begin
\n\/\/\u00a0\u00a0\u00a0 if (Pos(Column.Field.FieldName, Sort) = 1) and (Pos(‘ DESC’, Sort)= 0) then\u00a0\u00a0 \/\/<- It stops here!
\n\/\/\u00a0\u00a0\u00a0\u00a0\u00a0 Sort := Column.Field.FieldName + ‘ DESC’
\n\/\/\u00a0\u00a0\u00a0 else
\n\/\/\u00a0\u00a0\u00a0\u00a0\u00a0 Sort := Column.Field.FieldName + ‘ ASC’;
\n\/\/
\n\/\/\u00a0\u00a0\u00a0 If Column.Field.FieldName = ‘MCC’ then
\n\/\/\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 ADO_Progress.Sort := ‘MCC ASC, MNC ASC’
\n\/\/\u00a0\u00a0\u00a0 else
\n\/\/\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 ADO_Progress.IndexFieldNames := sort; \/\/\/ TEST!
\n\/\/\u00a0 end;<\/p>\n
[EDIT]<\/p>\n
… which I got to work using a RawByteString() typecast …<\/p>\n
with TCustomADODataSet(SelectGrid.DataSource.DataSet) do
\nbegin
\nif (Pos(RawByteString(Column.Field.FieldName), Sort) = 1) and (Pos(RawByteString(‘ DESC’), Sort)= 0) then
\nSort := Column.Field.FieldName + ‘ DESC’
\nelse
\nSort := Column.Field.FieldName + ‘ ASC’;<\/p>\n
If Column.Field.FieldName = ‘MCC’ then
\nADO_Progress.Sort := ‘MCC ASC, MNC ASC’
\nelse
\nADO_Progress.IndexFieldNames := sort; \/\/\/ TEST!
\nend;<\/p>\n","protected":false},"excerpt":{"rendered":"
I just downloaded the demo of Delphi 2009 and installed it. Watched a few demonstration videos. Quite a few to watch: http:\/\/dn.codegear.com\/article\/38478 A good pick: http:\/\/windemo1.codegear.com\/Tiburon\/LaunchReplays\/Delphi2009Launch\/Delphi2009Launch.htm Was reminded that the Logitech camera interferes with Delphi. I think it still does …<\/p>\n