Funktion läuft unter Vista nicht mehr

[Christian18]

Hallo,

kann es sein, das unter Windows Vista folgende funktion nicht mehr funktioniert?

Delphi-Quellcode:

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect; 
  Field: TField; State: TGridDrawState); 
begin 
   with (Sender as TDBGrid) do 
    begin 
     if ((DataSource.DataSet.RecNo mod 2) = 0) then         //jede zweite Zeile berücksichtigen 
      begin 
       if (not (gdSelected in State)) then 
        begin 
         Canvas.Brush.Color := clGreen;    //Farbe die jede zweite Zeile bekommen soll. 
         Canvas.FillRect(Rect); 
        end; 
      end; 
     if ((not (dgRowSelect in Options)) and (gdFocused in State)) then //Wenn RowSelect = False die aktive Zelle blau färben 
      begin 
       Canvas.Brush.Color := clBlue;      //Farbe der selektierten Zelle wenn RowSelect = False; 
       Canvas.FillRect(Rect); 
      end; 
     Canvas.TextOut(Rect.Left + 2, Rect.Top + 1, Field.AsString);  //Denn Text in der Zelle ausgeben 
    end; 
end;

MFG Christian18

[Die Muhkuh]

Was funktioniert denn nicht mehr?

[Christian18]

Hallo,

na das was die Funktion eigentlich machen soll. Die Daten werden einfach nur angezeigt nichts weiter.

MFG Christian18

[mkinzler]

Funktioniert die selbe Exe auf XP?

[RavenIV]

Zitat:

Zitat von Christian18

Hallo,

na das was die Funktion eigentlich machen soll. Die Daten werden einfach nur angezeigt nichts weiter.

MFG Christian18

Also ich sehe da nichts, was von der Windows-Version abhängig sein sollte.

Mit welchem Delphi hast Du kompiliert?
Liegt es evtl. an den Compiler-Einstellungen?

[Christian18]

Hallo,

ich habe mir gerade die eigentschaft genommen und einfach ein ShowMessage('Hallo'); rein geschrieben. Das zeigt das programm auch nicht an. Die procedure wird gar nicht ausgeführt. Woran kann das liegen? Ich mache auch dem Formular nichts anderes es soll nur das gemacht werden.

MFG Christian18

[HalloDu]

Ist das Ereignis bei der entsprechenden Komponente im ObjektInspektor eingetragen?

[Christian18]

Zitat:

Zitat von HalloDu

Ist das Ereignis bei der entsprechenden Komponente im ObjektInspektor eingetragen?

ja

[Dunkel]

Zitat:

Zitat von mkinzler

Funktioniert die selbe Exe auf XP?

Und wie schaut's damit aus, wenn Du die Möglichkeit hast es zu testen.

[Christian18]

Unter Windows XP läuft die Routine.